diff options
Diffstat (limited to 'src/interp/int-top.boot')
| -rw-r--r-- | src/interp/int-top.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/int-top.boot b/src/interp/int-top.boot index cc7edb7b..94e83572 100644 --- a/src/interp/int-top.boot +++ b/src/interp/int-top.boot @@ -215,7 +215,7 @@ intloopInclude(name, n) == try st := inputTextFile name intloopInclude0(st, name, n) - finally (if st ~= nil then closeFile st) + finally (if st ~= nil then closeStream st) intloopInclude1(name,n) == a:=ncloopIncFileName name @@ -352,7 +352,7 @@ ncloopInclude(name, n) == try st := inputTextFile name ncloopInclude0(st, name, n) - finally (if st ~= nil then closeFile st) + finally (if st ~= nil then closeStream st) ncloopInclude1(name,n) == a:=ncloopIncFileName name |