diff options
Diffstat (limited to 'src/interp/lisp-backend.boot')
-rw-r--r-- | src/interp/lisp-backend.boot | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/interp/lisp-backend.boot b/src/interp/lisp-backend.boot index acf96392..321fc017 100644 --- a/src/interp/lisp-backend.boot +++ b/src/interp/lisp-backend.boot @@ -46,6 +46,7 @@ module lisp_-backend where printBackendStmt: %Code -> %Void printBackendDecl: (%Symbol,%Code) -> %Void evalAndPrintBackendStmt: %Code -> %Void + evalAndPrintBackendDecl: (%Symbol,%Code) -> %Void --% @@ -837,3 +838,7 @@ printBackendDecl(label,decl) == if $PrettyPrint or not ioTerminal? st then PRINT_-FULL(decl,st) flushOutput st + +evalAndPrintBackendDecl(label,decl) == + eval decl + printBackendDecl(label,decl) |