
DEFUNO("SET",object,fLset,LISP
   ,2,2,0 ,OO,OO,OO,OO,Lset,"")
DEFUNO("FSET",object,fSfset,SI
   ,2,2,0 ,OO,OO,OO,OO,siLfset,"")
DEFUNO("MAKUNBOUND",object,fLmakunbound,LISP
   ,1,1,0 ,OO,OO,OO,OO,Lmakunbound,"")
DEFUNO("FMAKUNBOUND",object,fLfmakunbound,LISP
   ,1,1,0 ,OO,OO,OO,OO,Lfmakunbound,"")
DEF_ORDINARY("CLEAR-COMPILER-PROPERTIES",sSclear_compiler_properties,SI,"")
DEFUNO("CLEAR-COMPILER-PROPERTIES",object,fSclear_compiler_properties,SI
   ,2,2,0 ,OO,OO,OO,OO,siLclear_compiler_properties,"")
DEF_ORDINARY("AREF",sLaref,LISP,"")
DEF_ORDINARY("CAR",sLcar,LISP,"")
DEF_ORDINARY("CDR",sLcdr,LISP,"")
DEF_ORDINARY("CHAR",sLchar,LISP,"")
DEF_ORDINARY("DECF",sLdecf,LISP,"")
DEF_ORDINARY("ELT",sLelt,LISP,"")
DEF_ORDINARY("FILL-POINTER",sLfill_pointer,LISP,"")
DEF_ORDINARY("GET",sLget,LISP,"")
DEF_ORDINARY("GETHASH",sLgethash,LISP,"")
DEF_ORDINARY("INCF",sLincf,LISP,"")
DEF_ORDINARY("POP",sLpop,LISP,"")
DEF_ORDINARY("PUSH",sLpush,LISP,"")
DEF_ORDINARY("SCHAR",sLschar,LISP,"")
DEF_ORDINARY("SETF",sLsetf,LISP,"")
DEF_ORDINARY("SETF-LAMBDA",sSsetf_lambda,SI,"")
DEF_ORDINARY("STRUCTURE-ACCESS",sSstructure_access,SI,"")
DEF_ORDINARY("SVREF",sLsvref,LISP,"")
DEF_ORDINARY("TRACED",sStraced,SI,"")
DEF_ORDINARY("VECTOR",sLvector,LISP,"")