diff options
| -rw-r--r-- | sb-eval2.lisp | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/sb-eval2.lisp b/sb-eval2.lisp index 2b80efb..7ee46c5 100644 --- a/sb-eval2.lisp +++ b/sb-eval2.lisp @@ -513,6 +513,11 @@ (declare (ignore context)) (sb-c::internal-make-lexenv nil nil nil nil nil nil nil nil nil nil nil)) +(defun native-environment->context (lexenv) + ;;FIXME + (declare (ignore lexenv)) + (make-null-context)) + (defun globally-special-p (var) (eq :special (sb-int:info :variable :kind var))) |