mes: Single environment lookup for variables, SICP chapter 3.
[mes.git] / module / mes / guile.scm
index ca61412c46c2c36ff2915cefbde215447f25f0ab..1af8f6b4f010308902b6f327cd7b68e0c91a93e9 100644 (file)
             core:write-error
             core:write-port
             core:type
+            pmatch-car
+            pmatch-cdr
             )
   ;;#:re-export (open-input-file open-input-string with-input-from-string)
   )
 
 (cond-expand
  (guile
+  (define pmatch-car car)
+  (define pmatch-cdr cdr)
   (define core:exit exit)
   (define core:display display)
   (define core:display-port display)