085-internal-define-error.scm (289B)
1 ; Internal `define` -- inside any non-empty lexical env (lambda body, 2 ; let body) -- is forbidden in this Scheme. eval_define rejects with 3 ; a clear message and exits 1 via runtime_error. Use a top-level 4 ; define or named-let for local recursion. 5 ((lambda () (define x 1) x)) 6 (sys-exit 0)