[comp.lang.scheme] patches for scm2b

jaffer@zurich.ai.mit.edu (Aubrey Jaffer) (04/26/91)

In line 635 of eval.c change:
		args = EXTEND_ENV(CAR(CODE(proc)),cons(arg1,args),ENV(proc));
to:
		args = EXTEND_ENV(CAR(CODE(proc)),
				  (UNBNDP(arg1) ? EOL : cons(arg1,args)),
				   ENV(proc));
This fixes (apply list '())

In sys.c remove line 968:
	ASSERT(ilength(code)>1,code,ARG1,ISYMCHARS(I_LAMBDA));

This fixes (define (foo) ((lambda () bar)))