From fa3f23105ddcf07c5900de47f19af43d1db1b597 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:27 -0800 Subject: Import Upstream version 2c3 --- scheme48.init | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'scheme48.init') 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)) -- cgit v1.2.3