diff options
Diffstat (limited to 'module/c/eval-basic.scm')
| -rw-r--r-- | module/c/eval-basic.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/module/c/eval-basic.scm b/module/c/eval-basic.scm index 9a16a095..7335e3ea 100644 --- a/module/c/eval-basic.scm +++ b/module/c/eval-basic.scm @@ -60,4 +60,6 @@ => (lambda (op) (apply op (map loop args)))) (else - (err "Unknown operator ~s" f))))))))) + (err "Unknown operator ~s" f)))) + (_ (err "Invalid (inner) form for basic eval: ~s" ast))))) + (_ (err "Invalid (outer) form for basic eval: ~s" ast)))) |