Separate lisp objects for functions with fixed and variable # arguments

This commit is contained in:
Juan Jose Garcia Ripoll 2008-06-16 23:09:21 +02:00
parent 0dbab7db8f
commit cb9939d6c0
17 changed files with 98 additions and 66 deletions

View file

@ -336,6 +336,7 @@ cl_class_of(cl_object x)
case t_bytecodes:
case t_bclosure:
case t_cfun:
case t_cfunfixed:
case t_cclosure:
index = ECL_BUILTIN_FUNCTION; break;
#ifdef ECL_THREADS