promotional, or sales literature without prior written consent from
MIT in each case. */
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/interp.c,v 9.33 1987/10/09 16:11:55 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/interp.c,v 9.34 1987/11/04 20:02:10 cph Rel $
*
* This file contains the heart of the Scheme Scode
* interpreter
define_compiler_restart (RC_COMP_LOOKUP_TRAP_RESTART,
comp_lookup_trap_restart)
- define_compiler_restart (RC_COMP_CACHE_ASSIGNMENT_RESTART,
+ define_compiler_restart (RC_COMP_CACHE_ASSIGN_RESTART,
comp_cache_assignment_restart)
define_compiler_restart (RC_COMP_ASSIGNMENT_TRAP_RESTART,
promotional, or sales literature without prior written consent from
MIT in each case. */
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/lookup.c,v 9.36 1987/10/05 21:48:32 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/lookup.c,v 9.37 1987/11/04 20:01:34 cph Rel $
*
* This file contains symbol lookup and modification routines. See
* Hal Abelson for a paper describing and justifying the algorithm.
TRAP_REFERENCES_OPERATOR);
}
\f
-extern long compiler_operator_reference_trap();
+extern long complr_operator_reference_trap();
extern Pointer compiler_var_error();
long
-compiler_operator_reference_trap(frame_slot, extension)
+complr_operator_reference_trap(frame_slot, extension)
Pointer *frame_slot, extension;
{
long temp;
promotional, or sales literature without prior written consent from
MIT in each case. */
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/returns.h,v 9.28 1987/10/09 16:13:30 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/returns.h,v 9.29 1987/11/04 20:02:48 cph Rel $
*
* Return codes. These are placed in Return when an
* interpreter operation needs to operate in several
*/
\f
/* These names are also in storage.c.
- * Please maintain consistency.
+ * Please maintain consistency.
+ * Names should not exceed 31 characters.
*/
-#define RC_END_OF_COMPUTATION 0x00
-/* formerly RC_RESTORE_CONTROL_POINT 0x01 */
-#define RC_JOIN_STACKLETS 0x01
-#define RC_RESTORE_CONTINUATION 0x02 /* Used for 68000 */
-#define RC_INTERNAL_APPLY 0x03
-#define RC_BAD_INTERRUPT_CONTINUE 0x04 /* Used for 68000 */
-#define RC_RESTORE_HISTORY 0x05
-#define RC_INVOKE_STACK_THREAD 0x06
-#define RC_RESTART_EXECUTION 0x07 /* Used for 68000 */
-#define RC_EXECUTE_ASSIGNMENT_FINISH 0x08
-#define RC_EXECUTE_DEFINITION_FINISH 0x09
-#define RC_EXECUTE_ACCESS_FINISH 0x0A
-#define RC_EXECUTE_IN_PACKAGE_CONTINUE 0x0B
-#define RC_SEQ_2_DO_2 0x0C
-#define RC_SEQ_3_DO_2 0x0D
-#define RC_SEQ_3_DO_3 0x0E
-#define RC_CONDITIONAL_DECIDE 0x0F
-#define RC_DISJUNCTION_DECIDE 0x10
-#define RC_COMB_1_PROCEDURE 0x11
-#define RC_COMB_APPLY_FUNCTION 0x12
-#define RC_COMB_2_FIRST_OPERAND 0x13
-#define RC_COMB_2_PROCEDURE 0x14
-#define RC_COMB_SAVE_VALUE 0x15
-#define RC_PCOMB1_APPLY 0x16
-#define RC_PCOMB2_DO_1 0x17
-#define RC_PCOMB2_APPLY 0x18
-#define RC_PCOMB3_DO_2 0x19
-#define RC_PCOMB3_DO_1 0x1A
-#define RC_PCOMB3_APPLY 0x1B
+#define RC_END_OF_COMPUTATION 0x00
+/* formerly RC_RESTORE_CONTROL_POINT 0x01 */
+#define RC_JOIN_STACKLETS 0x01
+#define RC_RESTORE_CONTINUATION 0x02 /* Used for 68000 */
+#define RC_INTERNAL_APPLY 0x03
+#define RC_BAD_INTERRUPT_CONTINUE 0x04 /* Used for 68000 */
+#define RC_RESTORE_HISTORY 0x05
+#define RC_INVOKE_STACK_THREAD 0x06
+#define RC_RESTART_EXECUTION 0x07 /* Used for 68000 */
+#define RC_EXECUTE_ASSIGNMENT_FINISH 0x08
+#define RC_EXECUTE_DEFINITION_FINISH 0x09
+#define RC_EXECUTE_ACCESS_FINISH 0x0A
+#define RC_EXECUTE_IN_PACKAGE_CONTINUE 0x0B
+#define RC_SEQ_2_DO_2 0x0C
+#define RC_SEQ_3_DO_2 0x0D
+#define RC_SEQ_3_DO_3 0x0E
+#define RC_CONDITIONAL_DECIDE 0x0F
+#define RC_DISJUNCTION_DECIDE 0x10
+#define RC_COMB_1_PROCEDURE 0x11
+#define RC_COMB_APPLY_FUNCTION 0x12
+#define RC_COMB_2_FIRST_OPERAND 0x13
+#define RC_COMB_2_PROCEDURE 0x14
+#define RC_COMB_SAVE_VALUE 0x15
+#define RC_PCOMB1_APPLY 0x16
+#define RC_PCOMB2_DO_1 0x17
+#define RC_PCOMB2_APPLY 0x18
+#define RC_PCOMB3_DO_2 0x19
+#define RC_PCOMB3_DO_1 0x1A
+#define RC_PCOMB3_APPLY 0x1B
\f
-#define RC_SNAP_NEED_THUNK 0x1C
-#define RC_REENTER_COMPILED_CODE 0x1D
-/* formerly RC_GET_CHAR_REPEAT 0x1E */
-#define RC_COMP_REFERENCE_RESTART 0x1F
-#define RC_NORMAL_GC_DONE 0x20
-#define RC_COMPLETE_GC_DONE 0x21 /* Used for 68000 */
-#define RC_PURIFY_GC_1 0x22
-#define RC_PURIFY_GC_2 0x23
-#define RC_AFTER_MEMORY_UPDATE 0x24 /* Used for 68000 */
-#define RC_RESTARTABLE_EXIT 0x25 /* Used for 68000 */
-/* formerly RC_GET_CHAR 0x26 */
-/* formerly RC_GET_CHAR_IMMEDIATE 0x27 */
-#define RC_COMP_ASSIGNMENT_RESTART 0x28
-#define RC_POP_FROM_COMPILED_CODE 0x29
-#define RC_RETURN_TRAP_POINT 0x2A
-#define RC_RESTORE_STEPPER 0x2B /* Used for 68000 */
-#define RC_RESTORE_TO_STATE_POINT 0x2C
-#define RC_MOVE_TO_ADJACENT_POINT 0x2D
-#define RC_RESTORE_VALUE 0x2E
-#define RC_RESTORE_DONT_COPY_HISTORY 0x2F
+#define RC_SNAP_NEED_THUNK 0x1C
+#define RC_REENTER_COMPILED_CODE 0x1D
+/* formerly RC_GET_CHAR_REPEAT 0x1E */
+#define RC_COMP_REFERENCE_RESTART 0x1F
+#define RC_NORMAL_GC_DONE 0x20
+#define RC_COMPLETE_GC_DONE 0x21 /* Used for 68000 */
+#define RC_PURIFY_GC_1 0x22
+#define RC_PURIFY_GC_2 0x23
+#define RC_AFTER_MEMORY_UPDATE 0x24 /* Used for 68000 */
+#define RC_RESTARTABLE_EXIT 0x25 /* Used for 68000 */
+/* formerly RC_GET_CHAR 0x26 */
+/* formerly RC_GET_CHAR_IMMEDIATE 0x27 */
+#define RC_COMP_ASSIGNMENT_RESTART 0x28
+#define RC_POP_FROM_COMPILED_CODE 0x29
+#define RC_RETURN_TRAP_POINT 0x2A
+#define RC_RESTORE_STEPPER 0x2B /* Used for 68000 */
+#define RC_RESTORE_TO_STATE_POINT 0x2C
+#define RC_MOVE_TO_ADJACENT_POINT 0x2D
+#define RC_RESTORE_VALUE 0x2E
+#define RC_RESTORE_DONT_COPY_HISTORY 0x2F
/* The following are not used in the 68000 implementation */
-#define RC_POP_RETURN_ERROR 0x40
-#define RC_EVAL_ERROR 0x41
-#define RC_REPEAT_PRIMITIVE 0x42
-#define RC_COMP_INTERRUPT_RESTART 0x43
-/* formerly RC_COMP_RECURSION_GC 0x44 */
-#define RC_RESTORE_INT_MASK 0x45
-#define RC_HALT 0x46
-#define RC_FINISH_GLOBAL_INT 0x47 /* Multiprocessor */
-#define RC_REPEAT_DISPATCH 0x48
-#define RC_GC_CHECK 0x49
-#define RC_RESTORE_FLUIDS 0x4A
-#define RC_COMP_LOOKUP_APPLY_RESTART 0x4B
-#define RC_COMP_ACCESS_RESTART 0x4C
-#define RC_COMP_UNASSIGNED_P_RESTART 0x4D
-#define RC_COMP_UNBOUND_P_RESTART 0x4E
-#define RC_COMP_DEFINITION_RESTART 0x4F
-#define RC_COMP_LEXPR_INTERRUPT_RESTART 0x50
-#define RC_COMP_SAFE_REFERENCE_RESTART 0x51
-#define RC_COMP_CACHE_LOOKUP_RESTART 0x52
-#define RC_COMP_LOOKUP_TRAP_RESTART 0x53
-#define RC_COMP_ASSIGNMENT_TRAP_RESTART 0x54
-#define RC_COMP_CACHE_OPERATOR_RESTART 0x55
-#define RC_COMP_OP_REF_TRAP_RESTART 0x56
-#define RC_COMP_CACHE_REF_APPLY_RESTART 0x57
-#define RC_COMP_SAFE_REF_TRAP_RESTART 0x58
-#define RC_COMP_UNASSIGNED_TRAP_RESTART 0x59
-#define RC_COMP_CACHE_ASSIGNMENT_RESTART 0x5A
+#define RC_POP_RETURN_ERROR 0x40
+#define RC_EVAL_ERROR 0x41
+#define RC_REPEAT_PRIMITIVE 0x42
+#define RC_COMP_INTERRUPT_RESTART 0x43
+/* formerly RC_COMP_RECURSION_GC 0x44 */
+#define RC_RESTORE_INT_MASK 0x45
+#define RC_HALT 0x46
+#define RC_FINISH_GLOBAL_INT 0x47 /* Multiprocessor */
+#define RC_REPEAT_DISPATCH 0x48
+#define RC_GC_CHECK 0x49
+#define RC_RESTORE_FLUIDS 0x4A
+#define RC_COMP_LOOKUP_APPLY_RESTART 0x4B
+#define RC_COMP_ACCESS_RESTART 0x4C
+#define RC_COMP_UNASSIGNED_P_RESTART 0x4D
+#define RC_COMP_UNBOUND_P_RESTART 0x4E
+#define RC_COMP_DEFINITION_RESTART 0x4F
+#define RC_COMP_LEXPR_INTERRUPT_RESTART 0x50
+#define RC_COMP_SAFE_REFERENCE_RESTART 0x51
+#define RC_COMP_CACHE_LOOKUP_RESTART 0x52
+#define RC_COMP_LOOKUP_TRAP_RESTART 0x53
+#define RC_COMP_ASSIGNMENT_TRAP_RESTART 0x54
+#define RC_COMP_CACHE_OPERATOR_RESTART 0x55
+#define RC_COMP_OP_REF_TRAP_RESTART 0x56
+#define RC_COMP_CACHE_REF_APPLY_RESTART 0x57
+#define RC_COMP_SAFE_REF_TRAP_RESTART 0x58
+#define RC_COMP_UNASSIGNED_TRAP_RESTART 0x59
+#define RC_COMP_CACHE_ASSIGN_RESTART 0x5A
-#define MAX_RETURN_CODE 0x5A
+#define MAX_RETURN_CODE 0x5A
/* When adding return codes, don't forget to update storage.c too. */
promotional, or sales literature without prior written consent from
MIT in each case. */
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/interp.c,v 9.33 1987/10/09 16:11:55 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/interp.c,v 9.34 1987/11/04 20:02:10 cph Rel $
*
* This file contains the heart of the Scheme Scode
* interpreter
define_compiler_restart (RC_COMP_LOOKUP_TRAP_RESTART,
comp_lookup_trap_restart)
- define_compiler_restart (RC_COMP_CACHE_ASSIGNMENT_RESTART,
+ define_compiler_restart (RC_COMP_CACHE_ASSIGN_RESTART,
comp_cache_assignment_restart)
define_compiler_restart (RC_COMP_ASSIGNMENT_TRAP_RESTART,
promotional, or sales literature without prior written consent from
MIT in each case. */
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/lookup.c,v 9.36 1987/10/05 21:48:32 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/lookup.c,v 9.37 1987/11/04 20:01:34 cph Rel $
*
* This file contains symbol lookup and modification routines. See
* Hal Abelson for a paper describing and justifying the algorithm.
TRAP_REFERENCES_OPERATOR);
}
\f
-extern long compiler_operator_reference_trap();
+extern long complr_operator_reference_trap();
extern Pointer compiler_var_error();
long
-compiler_operator_reference_trap(frame_slot, extension)
+complr_operator_reference_trap(frame_slot, extension)
Pointer *frame_slot, extension;
{
long temp;
promotional, or sales literature without prior written consent from
MIT in each case. */
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/returns.h,v 9.28 1987/10/09 16:13:30 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/returns.h,v 9.29 1987/11/04 20:02:48 cph Rel $
*
* Return codes. These are placed in Return when an
* interpreter operation needs to operate in several
*/
\f
/* These names are also in storage.c.
- * Please maintain consistency.
+ * Please maintain consistency.
+ * Names should not exceed 31 characters.
*/
-#define RC_END_OF_COMPUTATION 0x00
-/* formerly RC_RESTORE_CONTROL_POINT 0x01 */
-#define RC_JOIN_STACKLETS 0x01
-#define RC_RESTORE_CONTINUATION 0x02 /* Used for 68000 */
-#define RC_INTERNAL_APPLY 0x03
-#define RC_BAD_INTERRUPT_CONTINUE 0x04 /* Used for 68000 */
-#define RC_RESTORE_HISTORY 0x05
-#define RC_INVOKE_STACK_THREAD 0x06
-#define RC_RESTART_EXECUTION 0x07 /* Used for 68000 */
-#define RC_EXECUTE_ASSIGNMENT_FINISH 0x08
-#define RC_EXECUTE_DEFINITION_FINISH 0x09
-#define RC_EXECUTE_ACCESS_FINISH 0x0A
-#define RC_EXECUTE_IN_PACKAGE_CONTINUE 0x0B
-#define RC_SEQ_2_DO_2 0x0C
-#define RC_SEQ_3_DO_2 0x0D
-#define RC_SEQ_3_DO_3 0x0E
-#define RC_CONDITIONAL_DECIDE 0x0F
-#define RC_DISJUNCTION_DECIDE 0x10
-#define RC_COMB_1_PROCEDURE 0x11
-#define RC_COMB_APPLY_FUNCTION 0x12
-#define RC_COMB_2_FIRST_OPERAND 0x13
-#define RC_COMB_2_PROCEDURE 0x14
-#define RC_COMB_SAVE_VALUE 0x15
-#define RC_PCOMB1_APPLY 0x16
-#define RC_PCOMB2_DO_1 0x17
-#define RC_PCOMB2_APPLY 0x18
-#define RC_PCOMB3_DO_2 0x19
-#define RC_PCOMB3_DO_1 0x1A
-#define RC_PCOMB3_APPLY 0x1B
+#define RC_END_OF_COMPUTATION 0x00
+/* formerly RC_RESTORE_CONTROL_POINT 0x01 */
+#define RC_JOIN_STACKLETS 0x01
+#define RC_RESTORE_CONTINUATION 0x02 /* Used for 68000 */
+#define RC_INTERNAL_APPLY 0x03
+#define RC_BAD_INTERRUPT_CONTINUE 0x04 /* Used for 68000 */
+#define RC_RESTORE_HISTORY 0x05
+#define RC_INVOKE_STACK_THREAD 0x06
+#define RC_RESTART_EXECUTION 0x07 /* Used for 68000 */
+#define RC_EXECUTE_ASSIGNMENT_FINISH 0x08
+#define RC_EXECUTE_DEFINITION_FINISH 0x09
+#define RC_EXECUTE_ACCESS_FINISH 0x0A
+#define RC_EXECUTE_IN_PACKAGE_CONTINUE 0x0B
+#define RC_SEQ_2_DO_2 0x0C
+#define RC_SEQ_3_DO_2 0x0D
+#define RC_SEQ_3_DO_3 0x0E
+#define RC_CONDITIONAL_DECIDE 0x0F
+#define RC_DISJUNCTION_DECIDE 0x10
+#define RC_COMB_1_PROCEDURE 0x11
+#define RC_COMB_APPLY_FUNCTION 0x12
+#define RC_COMB_2_FIRST_OPERAND 0x13
+#define RC_COMB_2_PROCEDURE 0x14
+#define RC_COMB_SAVE_VALUE 0x15
+#define RC_PCOMB1_APPLY 0x16
+#define RC_PCOMB2_DO_1 0x17
+#define RC_PCOMB2_APPLY 0x18
+#define RC_PCOMB3_DO_2 0x19
+#define RC_PCOMB3_DO_1 0x1A
+#define RC_PCOMB3_APPLY 0x1B
\f
-#define RC_SNAP_NEED_THUNK 0x1C
-#define RC_REENTER_COMPILED_CODE 0x1D
-/* formerly RC_GET_CHAR_REPEAT 0x1E */
-#define RC_COMP_REFERENCE_RESTART 0x1F
-#define RC_NORMAL_GC_DONE 0x20
-#define RC_COMPLETE_GC_DONE 0x21 /* Used for 68000 */
-#define RC_PURIFY_GC_1 0x22
-#define RC_PURIFY_GC_2 0x23
-#define RC_AFTER_MEMORY_UPDATE 0x24 /* Used for 68000 */
-#define RC_RESTARTABLE_EXIT 0x25 /* Used for 68000 */
-/* formerly RC_GET_CHAR 0x26 */
-/* formerly RC_GET_CHAR_IMMEDIATE 0x27 */
-#define RC_COMP_ASSIGNMENT_RESTART 0x28
-#define RC_POP_FROM_COMPILED_CODE 0x29
-#define RC_RETURN_TRAP_POINT 0x2A
-#define RC_RESTORE_STEPPER 0x2B /* Used for 68000 */
-#define RC_RESTORE_TO_STATE_POINT 0x2C
-#define RC_MOVE_TO_ADJACENT_POINT 0x2D
-#define RC_RESTORE_VALUE 0x2E
-#define RC_RESTORE_DONT_COPY_HISTORY 0x2F
+#define RC_SNAP_NEED_THUNK 0x1C
+#define RC_REENTER_COMPILED_CODE 0x1D
+/* formerly RC_GET_CHAR_REPEAT 0x1E */
+#define RC_COMP_REFERENCE_RESTART 0x1F
+#define RC_NORMAL_GC_DONE 0x20
+#define RC_COMPLETE_GC_DONE 0x21 /* Used for 68000 */
+#define RC_PURIFY_GC_1 0x22
+#define RC_PURIFY_GC_2 0x23
+#define RC_AFTER_MEMORY_UPDATE 0x24 /* Used for 68000 */
+#define RC_RESTARTABLE_EXIT 0x25 /* Used for 68000 */
+/* formerly RC_GET_CHAR 0x26 */
+/* formerly RC_GET_CHAR_IMMEDIATE 0x27 */
+#define RC_COMP_ASSIGNMENT_RESTART 0x28
+#define RC_POP_FROM_COMPILED_CODE 0x29
+#define RC_RETURN_TRAP_POINT 0x2A
+#define RC_RESTORE_STEPPER 0x2B /* Used for 68000 */
+#define RC_RESTORE_TO_STATE_POINT 0x2C
+#define RC_MOVE_TO_ADJACENT_POINT 0x2D
+#define RC_RESTORE_VALUE 0x2E
+#define RC_RESTORE_DONT_COPY_HISTORY 0x2F
/* The following are not used in the 68000 implementation */
-#define RC_POP_RETURN_ERROR 0x40
-#define RC_EVAL_ERROR 0x41
-#define RC_REPEAT_PRIMITIVE 0x42
-#define RC_COMP_INTERRUPT_RESTART 0x43
-/* formerly RC_COMP_RECURSION_GC 0x44 */
-#define RC_RESTORE_INT_MASK 0x45
-#define RC_HALT 0x46
-#define RC_FINISH_GLOBAL_INT 0x47 /* Multiprocessor */
-#define RC_REPEAT_DISPATCH 0x48
-#define RC_GC_CHECK 0x49
-#define RC_RESTORE_FLUIDS 0x4A
-#define RC_COMP_LOOKUP_APPLY_RESTART 0x4B
-#define RC_COMP_ACCESS_RESTART 0x4C
-#define RC_COMP_UNASSIGNED_P_RESTART 0x4D
-#define RC_COMP_UNBOUND_P_RESTART 0x4E
-#define RC_COMP_DEFINITION_RESTART 0x4F
-#define RC_COMP_LEXPR_INTERRUPT_RESTART 0x50
-#define RC_COMP_SAFE_REFERENCE_RESTART 0x51
-#define RC_COMP_CACHE_LOOKUP_RESTART 0x52
-#define RC_COMP_LOOKUP_TRAP_RESTART 0x53
-#define RC_COMP_ASSIGNMENT_TRAP_RESTART 0x54
-#define RC_COMP_CACHE_OPERATOR_RESTART 0x55
-#define RC_COMP_OP_REF_TRAP_RESTART 0x56
-#define RC_COMP_CACHE_REF_APPLY_RESTART 0x57
-#define RC_COMP_SAFE_REF_TRAP_RESTART 0x58
-#define RC_COMP_UNASSIGNED_TRAP_RESTART 0x59
-#define RC_COMP_CACHE_ASSIGNMENT_RESTART 0x5A
+#define RC_POP_RETURN_ERROR 0x40
+#define RC_EVAL_ERROR 0x41
+#define RC_REPEAT_PRIMITIVE 0x42
+#define RC_COMP_INTERRUPT_RESTART 0x43
+/* formerly RC_COMP_RECURSION_GC 0x44 */
+#define RC_RESTORE_INT_MASK 0x45
+#define RC_HALT 0x46
+#define RC_FINISH_GLOBAL_INT 0x47 /* Multiprocessor */
+#define RC_REPEAT_DISPATCH 0x48
+#define RC_GC_CHECK 0x49
+#define RC_RESTORE_FLUIDS 0x4A
+#define RC_COMP_LOOKUP_APPLY_RESTART 0x4B
+#define RC_COMP_ACCESS_RESTART 0x4C
+#define RC_COMP_UNASSIGNED_P_RESTART 0x4D
+#define RC_COMP_UNBOUND_P_RESTART 0x4E
+#define RC_COMP_DEFINITION_RESTART 0x4F
+#define RC_COMP_LEXPR_INTERRUPT_RESTART 0x50
+#define RC_COMP_SAFE_REFERENCE_RESTART 0x51
+#define RC_COMP_CACHE_LOOKUP_RESTART 0x52
+#define RC_COMP_LOOKUP_TRAP_RESTART 0x53
+#define RC_COMP_ASSIGNMENT_TRAP_RESTART 0x54
+#define RC_COMP_CACHE_OPERATOR_RESTART 0x55
+#define RC_COMP_OP_REF_TRAP_RESTART 0x56
+#define RC_COMP_CACHE_REF_APPLY_RESTART 0x57
+#define RC_COMP_SAFE_REF_TRAP_RESTART 0x58
+#define RC_COMP_UNASSIGNED_TRAP_RESTART 0x59
+#define RC_COMP_CACHE_ASSIGN_RESTART 0x5A
-#define MAX_RETURN_CODE 0x5A
+#define MAX_RETURN_CODE 0x5A
/* When adding return codes, don't forget to update storage.c too. */
projects / mit-scheme.git / commitdiff