summaryrefslogtreecommitdiff
path: root/module/ice-9/sandbox.scm
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2019-09-12 21:50:51 +0200
committerAndy Wingo <wingo@pobox.com>2019-09-12 21:50:51 +0200
commit374c1e5807a35b16170ed7686abcd5c407554d78 (patch)
tree121a61d8a7560a0671d296b7922a53c567ea7046 /module/ice-9/sandbox.scm
parent4e89d0c061c585ca56a96ef8410dad17979ca5eb (diff)
downloadguile-374c1e5807a35b16170ed7686abcd5c407554d78.tar.gz
Define top-level bindings for aux syntax: else, =>, _, ...
* module/ice-9/boot-9.scm (else, =>, ..., _): New definitions. These are specified by the r6rs and the r7rs. * module/ice-9/sandbox.scm (core-bindings): Include the aux syntax definitions. * module/rnrs/base.scm: * module/rnrs.scm: Re-export aux syntax.
Diffstat (limited to 'module/ice-9/sandbox.scm')
-rw-r--r--module/ice-9/sandbox.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/module/ice-9/sandbox.scm b/module/ice-9/sandbox.scm
index bbb811952..3f9359dab 100644
--- a/module/ice-9/sandbox.scm
+++ b/module/ice-9/sandbox.scm
@@ -314,6 +314,7 @@ allocation limit is exceeded, an exception will be thrown to the
;;
(define core-bindings
'(((guile)
+ else => _ ...
and
begin
apply