diff --git a/src/loopsops.c b/src/loopsops.c index 26f14d9..95ad8eb 100755 --- a/src/loopsops.c +++ b/src/loopsops.c @@ -414,7 +414,7 @@ LispPTR lcfuncall(register unsigned int atom_index, register int argnum, registe { LispPTR test; test= *((LispPTR*)CurrentStackPTR); - // DOSTACKOVERFLOW(argnum,bytenum-1); XXX until we figure out what should be happening + /* DOSTACKOVERFLOW(argnum,bytenum-1); XXX until we figure out what should be happening */ S_CHECK(test==*((LispPTR*)CurrentStackPTR), "overflow in ccfuncall"); } FuncObj = tmp_fn;