Forked from
cmucl / cmucl
Source project has a limited visibility.
-
ram authored
stack to keep the MV-BIND in the UNWIND-PROTECT translation happy. Unlike in compiled code, we don't use these values to keep track of the exit being done, but we still execute the MV-BIND. Also, fixed SET-LEAF-VALUE to check for the var being indirect even when the reference is in the home env. Reordered the TYPECASE in INTERNAL-APPLY-LOOP according to my intuition of the relatively frequency of node types.
ram authoredstack to keep the MV-BIND in the UNWIND-PROTECT translation happy. Unlike in compiled code, we don't use these values to keep track of the exit being done, but we still execute the MV-BIND. Also, fixed SET-LEAF-VALUE to check for the var being indirect even when the reference is in the home env. Reordered the TYPECASE in INTERNAL-APPLY-LOOP according to my intuition of the relatively frequency of node types.