diff options
Diffstat (limited to 'src/lisp')
-rw-r--r-- | src/lisp/core.lisp.in | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/lisp/core.lisp.in b/src/lisp/core.lisp.in index 6b57b73a..303ad074 100644 --- a/src/lisp/core.lisp.in +++ b/src/lisp/core.lisp.in @@ -98,6 +98,7 @@ "inputTextFile" "outputTextFile" "closeFile" + "closeStream" "prettyPrint" "readLine" "readExpr" @@ -506,6 +507,9 @@ (defun |closeFile| (f) (close f)) +(defmacro |closeStream| (s) + `(close ,s)) + ;; Read a line from the input text file. Quietly return ;; %nothing at end of file. (defmacro |readLine| (f) |