diff options
author | Bryan Newbold <bnewbold@robocracy.org> | 2017-02-20 00:05:27 -0800 |
---|---|---|
committer | Bryan Newbold <bnewbold@robocracy.org> | 2017-02-20 00:05:27 -0800 |
commit | fa3f23105ddcf07c5900de47f19af43d1db1b597 (patch) | |
tree | b2c6cce6b97698098f50cbc78c23fdc0f8d401ab /scheme48.init | |
parent | f24b9140d6f74804d5599ec225717d38ca443813 (diff) | |
download | slib-upstream/2c3.tar.gz slib-upstream/2c3.zip |
Import Upstream version 2c3upstream/2c3
Diffstat (limited to 'scheme48.init')
-rw-r--r-- | scheme48.init | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/scheme48.init b/scheme48.init index e65ae8e..6df37b8 100644 --- a/scheme48.init +++ b/scheme48.init @@ -87,8 +87,8 @@ delay ;has delay and force with-file char-ready? ;has + eval ;proposed 2-argument eval values ;proposed multiple values - eval ;slib:eval is single argument eval. dynamic-wind ;proposed dynamic-wind full-continuation ;can return multiple times macro ;R4RS appendix's DEFINE-SYNTAX @@ -155,8 +155,7 @@ ;;; Return argument (define (identity x) x) -;;; If your implementation provides eval, SLIB:EVAL is single argument -;;; eval using the top-level (user) environment. +;;; SLIB:EVAL is single argument eval using the top-level (user) environment. (define slib:eval (let ((eval eval) (interaction-environment interaction-environment)) |