mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-31 01:10:24 +02:00
Code Activity

* string=? requires a string argument. Thanks to Dale P. Smith.

Browse source
This commit is contained in:
Dirk Herrmann 2000-11-01 09:37:30 +00:00
parent a3a329390f
commit f304437e70
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
ice-9/ChangeLog
View file

@ -1,3 +1,8 @@
2000-10-10 Dirk Herrmann <D.Herrmann@tu-bs.de>
* syncase.scm (eval): string=? requires a string argument.
Thanks to Dale P. Smith for the patch.
2000-10-15 Neil Jerram <neil@ossau.uklinux.net> 2000-10-15 Neil Jerram <neil@ossau.uklinux.net>
* optargs.scm: Fix typos in commentary for bound? and lambda*. * optargs.scm: Fix typos in commentary for bound? and lambda*.

2
ice-9/syncase.scm
View file

@ -155,7 +155,7 @@
(define-public (eval x environment) (define-public (eval x environment)
(internal-eval (if (and (pair? x) (internal-eval (if (and (pair? x)
(string=? (car x) "noexpand")) (equal? (car x) "noexpand"))
(cadr x) (cadr x)
(sc-expand x)) (sc-expand x))
environment)) environment))