X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=scheme.forth.jl.git;a=blobdiff_plain;f=src%2Fscheme.4th;h=3931dad19d68bd141f609ce8cb297a6634621cdd;hp=10682292f0f28215ea43c9d7bf106716a9d4800c;hb=02868ff84afc9b2fb4fafa7247d09ee2a1e98f59;hpb=6a04a1527adf7d707b0340f43d5392df9a8ecd72

diff --git a/src/scheme.4th b/src/scheme.4th
index 1068229..3931dad 100644
--- a/src/scheme.4th
+++ b/src/scheme.4th
@@ -1766,6 +1766,15 @@ hide env
     extend-env eval-sequence eval
 ;
 
+: expand-quasiquote ;
+: expand-definition ;
+: expand-assignment ;
+: expand-define-macro ;
+: expand-if ;
+: expand-lambda ;
+: expand-begin ;
+: expand-application ;
+
 :noname ( exp -- result )
 
     quasiquote? if expand-quasiquote exit then