mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-15 16:20:17 +02:00
Code Activity

* test-suite/tests/chars.test: Fixed test comment. The bug that

Browse source 
this test detects was actually introduced by my patch from
	2003-05-31.

	* libguile/eval.c: Partially undid my patch from 2003-05-31.  This
	patch caused the segfault referenced in the previous changelog
	entry.
This commit is contained in:
Dirk Herrmann 2003-06-04 23:50:13 +00:00
parent 47dbd81e77
commit f5c6ec2fb0
4 changed files with 12 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/eval.c
View file

@ -2448,7 +2448,7 @@ dispatch:
/* new syntactic forms go here. */
case SCM_BIT7 (SCM_MAKISYM (0)):
proc = SCM_CAR (x);
if (!SCM_IFLAGP (proc))
if (!SCM_ISYMP (proc))
goto evapply;
switch (SCM_ISYMNUM (proc))