Solved hygiene problem, MCE runs (VERY slowly)
[scheme.forth.jl.git] / examples / metacirc.scm
index d63e685..f28367b 100644 (file)
     (define-variable! 'false false initial-env)
     initial-env))
 
+
 (define (primitive-procedure? proc)
   (tagged-list? proc 'primitive))
 
          (list 'primitive (cadr proc)))
        primitive-procedures))
 
-
-
 (define (apply-primitive-procedure proc args)
     (apply-in-underlying-scheme
          (primitive-implementation proc) args))
             '<procedure-env>))
     (display object)))
 
-;; (define the-global-environment (setup-environment))
+
+(define the-global-environment (setup-environment))
+