mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-22 19:44:10 +02:00
Code Activity

* test-suite/tests/chars.test: Added test, attempting to apply a

Browse source 
character.  This test will only pass if the other changes that are
	submitted together with this patch are also applied.

	* libguile/tags.h: Fixed comment about the immediate type code
	layout.

	* libguile/eval.c: Fixed handling of non-special instructions.
	Without this patch, guile will segfault on (#\0) and similar
	instructions.
This commit is contained in:
Dirk Herrmann 2003-06-04 23:22:54 +00:00
parent 18f7ef3859
commit 47dbd81e77
5 changed files with 40 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/eval.c
View file

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