diff --git a/forge/forge.lisp b/forge/forge.lisp
index 4ec2c77..bfff48d 100644
--- a/forge/forge.lisp
+++ b/forge/forge.lisp
@@ -181,7 +181,8 @@
            #:ptr #:get #:put
            #:in #:next 
            #:call #:call-if #:call-while #:comp #:lit #:val
-           #:<comp #:reg #:regc #:reg-lisp #:/>
+           #:<comp #:reg #:regc #:/>
+           #:lisp #:reg-lisp
            #:setup-builtins
            ))
 
@@ -230,10 +231,12 @@
 
 (f:reg 'reg #'f:reg-code)
 (f:reg 'regc #'(lambda () (f:reg-code 'f:comp-word)))
-(f:reg 'reg-lisp (lambda () (f:reg (f:popd) (f:compile-lisp (f:popd)))))
 
 (f:reg '/> #'(lambda () (iter:stop f:*input*)) 'f:comp-word)
 
+(f:reg 'lisp (lambda () (cons (f:compile-lisp (f:popd)) f::*buffer*)))
+(f:reg 'reg-lisp (lambda () (f:reg (f:popd) (f:compile-lisp (f:popd)))))
+
 ;;;; forge-code word definitions
 
 (defun setup-builtins ()