Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP

Comparing changes

Choose two branches to see what’s changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
...
  • 7 commits
  • 13 files changed
  • 0 commit comments
  • 1 contributor
View
460 gsc/_back.c
@@ -41,8 +41,12 @@
"c#target-dump-set!"
"c#target-end!"
"c#target-end!-set!"
+"c#target-file-extension"
+"c#target-file-extension-set!"
"c#target-frame-constraints"
"c#target-frame-constraints-set!"
+"c#target-generator"
+"c#target-generator-set!"
"c#target-jump-info"
"c#target-jump-info-set!"
"c#target-label-info"
@@ -61,6 +65,7 @@
"c#target-task-return-set!"
"c#target-unselect!"
"c#target.dump"
+"c#target.file-extension"
"c#target.frame-constraints"
"c#target.jump-info"
"c#target.label-info"
@@ -101,10 +106,10 @@
#define ___MH_PROC ___H__20___back
#define ___SCRIPT_LINE 0
#define ___SYM_COUNT 3
-#define ___GLO_COUNT 75
-#define ___SUP_COUNT 54
+#define ___GLO_COUNT 80
+#define ___SUP_COUNT 59
#define ___SUB_COUNT 3
-#define ___LBL_COUNT 114
+#define ___LBL_COUNT 122
#include "gambit.h"
___NEED_SYM(___S_arith)
@@ -155,8 +160,12 @@ ___NEED_GLO(___G_c_23_target_2d_dump)
___NEED_GLO(___G_c_23_target_2d_dump_2d_set_21_)
___NEED_GLO(___G_c_23_target_2d_end_21_)
___NEED_GLO(___G_c_23_target_2d_end_21__2d_set_21_)
+___NEED_GLO(___G_c_23_target_2d_file_2d_extension)
+___NEED_GLO(___G_c_23_target_2d_file_2d_extension_2d_set_21_)
___NEED_GLO(___G_c_23_target_2d_frame_2d_constraints)
___NEED_GLO(___G_c_23_target_2d_frame_2d_constraints_2d_set_21_)
+___NEED_GLO(___G_c_23_target_2d_generator)
+___NEED_GLO(___G_c_23_target_2d_generator_2d_set_21_)
___NEED_GLO(___G_c_23_target_2d_get)
___NEED_GLO(___G_c_23_target_2d_jump_2d_info)
___NEED_GLO(___G_c_23_target_2d_jump_2d_info_2d_set_21_)
@@ -176,6 +185,7 @@ ___NEED_GLO(___G_c_23_target_2d_task_2d_return)
___NEED_GLO(___G_c_23_target_2d_task_2d_return_2d_set_21_)
___NEED_GLO(___G_c_23_target_2d_unselect_21_)
___NEED_GLO(___G_c_23_target_2e_dump)
+___NEED_GLO(___G_c_23_target_2e_file_2d_extension)
___NEED_GLO(___G_c_23_target_2e_frame_2d_constraints)
___NEED_GLO(___G_c_23_target_2e_jump_2d_info)
___NEED_GLO(___G_c_23_target_2e_label_2d_info)
@@ -218,57 +228,62 @@ ___DEF_GLO(20,"c#target-dump")
___DEF_GLO(21,"c#target-dump-set!")
___DEF_GLO(22,"c#target-end!")
___DEF_GLO(23,"c#target-end!-set!")
-___DEF_GLO(24,"c#target-frame-constraints")
-___DEF_GLO(25,"c#target-frame-constraints-set!")
-___DEF_GLO(26,"c#target-get")
-___DEF_GLO(27,"c#target-jump-info")
-___DEF_GLO(28,"c#target-jump-info-set!")
-___DEF_GLO(29,"c#target-label-info")
-___DEF_GLO(30,"c#target-label-info-set!")
-___DEF_GLO(31,"c#target-name")
-___DEF_GLO(32,"c#target-nb-regs")
-___DEF_GLO(33,"c#target-nb-regs-set!")
-___DEF_GLO(34,"c#target-prim-info")
-___DEF_GLO(35,"c#target-prim-info-set!")
-___DEF_GLO(36,"c#target-proc-result")
-___DEF_GLO(37,"c#target-proc-result-set!")
-___DEF_GLO(38,"c#target-select!")
-___DEF_GLO(39,"c#target-switch-testable?")
-___DEF_GLO(40,"c#target-switch-testable?-set!")
-___DEF_GLO(41,"c#target-task-return")
-___DEF_GLO(42,"c#target-task-return-set!")
-___DEF_GLO(43,"c#target-unselect!")
-___DEF_GLO(44,"c#target.dump")
-___DEF_GLO(45,"c#target.frame-constraints")
-___DEF_GLO(46,"c#target.jump-info")
-___DEF_GLO(47,"c#target.label-info")
-___DEF_GLO(48,"c#target.nb-regs")
-___DEF_GLO(49,"c#target.prim-info")
-___DEF_GLO(50,"c#target.proc-result")
-___DEF_GLO(51,"c#target.switch-testable?")
-___DEF_GLO(52,"c#target.task-return")
-___DEF_GLO(53,"c#targets-loaded")
-___DEF_GLO(54,"c#**case-memv-sym")
-___DEF_GLO(55,"c#**eq?-sym")
-___DEF_GLO(56,"c#**not-sym")
-___DEF_GLO(57,"c#**quasi-append-sym")
-___DEF_GLO(58,"c#**quasi-cons-sym")
-___DEF_GLO(59,"c#**quasi-list->vector-sym")
-___DEF_GLO(60,"c#**quasi-list-sym")
-___DEF_GLO(61,"c#**quasi-vector-sym")
-___DEF_GLO(62,"c#compiler-error")
-___DEF_GLO(63,"c#compiler-internal-error")
-___DEF_GLO(64,"c#declaration-value")
-___DEF_GLO(65,"c#define-namable-decl")
-___DEF_GLO(66,"c#fixnum-sym")
-___DEF_GLO(67,"c#flonum-sym")
-___DEF_GLO(68,"c#generic-sym")
-___DEF_GLO(69,"c#mostly-fixnum-flonum-sym")
-___DEF_GLO(70,"c#mostly-fixnum-sym")
-___DEF_GLO(71,"c#mostly-flonum-fixnum-sym")
-___DEF_GLO(72,"c#mostly-flonum-sym")
-___DEF_GLO(73,"c#mostly-generic-sym")
-___DEF_GLO(74,"make-vector")
+___DEF_GLO(24,"c#target-file-extension")
+___DEF_GLO(25,"c#target-file-extension-set!")
+___DEF_GLO(26,"c#target-frame-constraints")
+___DEF_GLO(27,"c#target-frame-constraints-set!")
+___DEF_GLO(28,"c#target-generator")
+___DEF_GLO(29,"c#target-generator-set!")
+___DEF_GLO(30,"c#target-get")
+___DEF_GLO(31,"c#target-jump-info")
+___DEF_GLO(32,"c#target-jump-info-set!")
+___DEF_GLO(33,"c#target-label-info")
+___DEF_GLO(34,"c#target-label-info-set!")
+___DEF_GLO(35,"c#target-name")
+___DEF_GLO(36,"c#target-nb-regs")
+___DEF_GLO(37,"c#target-nb-regs-set!")
+___DEF_GLO(38,"c#target-prim-info")
+___DEF_GLO(39,"c#target-prim-info-set!")
+___DEF_GLO(40,"c#target-proc-result")
+___DEF_GLO(41,"c#target-proc-result-set!")
+___DEF_GLO(42,"c#target-select!")
+___DEF_GLO(43,"c#target-switch-testable?")
+___DEF_GLO(44,"c#target-switch-testable?-set!")
+___DEF_GLO(45,"c#target-task-return")
+___DEF_GLO(46,"c#target-task-return-set!")
+___DEF_GLO(47,"c#target-unselect!")
+___DEF_GLO(48,"c#target.dump")
+___DEF_GLO(49,"c#target.file-extension")
+___DEF_GLO(50,"c#target.frame-constraints")
+___DEF_GLO(51,"c#target.jump-info")
+___DEF_GLO(52,"c#target.label-info")
+___DEF_GLO(53,"c#target.nb-regs")
+___DEF_GLO(54,"c#target.prim-info")
+___DEF_GLO(55,"c#target.proc-result")
+___DEF_GLO(56,"c#target.switch-testable?")
+___DEF_GLO(57,"c#target.task-return")
+___DEF_GLO(58,"c#targets-loaded")
+___DEF_GLO(59,"c#**case-memv-sym")
+___DEF_GLO(60,"c#**eq?-sym")
+___DEF_GLO(61,"c#**not-sym")
+___DEF_GLO(62,"c#**quasi-append-sym")
+___DEF_GLO(63,"c#**quasi-cons-sym")
+___DEF_GLO(64,"c#**quasi-list->vector-sym")
+___DEF_GLO(65,"c#**quasi-list-sym")
+___DEF_GLO(66,"c#**quasi-vector-sym")
+___DEF_GLO(67,"c#compiler-error")
+___DEF_GLO(68,"c#compiler-internal-error")
+___DEF_GLO(69,"c#declaration-value")
+___DEF_GLO(70,"c#define-namable-decl")
+___DEF_GLO(71,"c#fixnum-sym")
+___DEF_GLO(72,"c#flonum-sym")
+___DEF_GLO(73,"c#generic-sym")
+___DEF_GLO(74,"c#mostly-fixnum-flonum-sym")
+___DEF_GLO(75,"c#mostly-fixnum-sym")
+___DEF_GLO(76,"c#mostly-flonum-fixnum-sym")
+___DEF_GLO(77,"c#mostly-flonum-sym")
+___DEF_GLO(78,"c#mostly-generic-sym")
+___DEF_GLO(79,"make-vector")
___END_GLO
___DEF_SUB_STR(___X0,52)
@@ -372,6 +387,14 @@ ___DEF_M_HLBL(___L0_c_23_target_2d_switch_2d_testable_3f_)
___DEF_M_HLBL_INTRO
___DEF_M_HLBL(___L0_c_23_target_2d_switch_2d_testable_3f__2d_set_21_)
___DEF_M_HLBL_INTRO
+___DEF_M_HLBL(___L0_c_23_target_2d_file_2d_extension)
+___DEF_M_HLBL_INTRO
+___DEF_M_HLBL(___L0_c_23_target_2d_file_2d_extension_2d_set_21_)
+___DEF_M_HLBL_INTRO
+___DEF_M_HLBL(___L0_c_23_target_2d_generator)
+___DEF_M_HLBL_INTRO
+___DEF_M_HLBL(___L0_c_23_target_2d_generator_2d_set_21_)
+___DEF_M_HLBL_INTRO
___DEF_M_HLBL(___L0_c_23_make_2d_frame_2d_constraints)
___DEF_M_HLBL(___L1_c_23_make_2d_frame_2d_constraints)
___DEF_M_HLBL_INTRO
@@ -454,17 +477,18 @@ ___DEF_SLBL(0,___L0__20___back)
___IF_NARGS_EQ(0,___NOTHING)
___WRONG_NARGS(0,0,0,0)
___DEF_GLBL(___L__20___back)
- ___SET_GLO(53,___G_c_23_targets_2d_loaded,___NUL)
+ ___SET_GLO(58,___G_c_23_targets_2d_loaded,___NUL)
___SET_GLO(16,___G_c_23_target,___FAL)
- ___SET_GLO(44,___G_c_23_target_2e_dump,___FAL)
- ___SET_GLO(48,___G_c_23_target_2e_nb_2d_regs,___FAL)
- ___SET_GLO(49,___G_c_23_target_2e_prim_2d_info,___FAL)
- ___SET_GLO(47,___G_c_23_target_2e_label_2d_info,___FAL)
- ___SET_GLO(46,___G_c_23_target_2e_jump_2d_info,___FAL)
- ___SET_GLO(45,___G_c_23_target_2e_frame_2d_constraints,___FAL)
- ___SET_GLO(50,___G_c_23_target_2e_proc_2d_result,___FAL)
- ___SET_GLO(52,___G_c_23_target_2e_task_2d_return,___FAL)
- ___SET_GLO(51,___G_c_23_target_2e_switch_2d_testable_3f_,___FAL)
+ ___SET_GLO(48,___G_c_23_target_2e_dump,___FAL)
+ ___SET_GLO(53,___G_c_23_target_2e_nb_2d_regs,___FAL)
+ ___SET_GLO(54,___G_c_23_target_2e_prim_2d_info,___FAL)
+ ___SET_GLO(52,___G_c_23_target_2e_label_2d_info,___FAL)
+ ___SET_GLO(51,___G_c_23_target_2e_jump_2d_info,___FAL)
+ ___SET_GLO(50,___G_c_23_target_2e_frame_2d_constraints,___FAL)
+ ___SET_GLO(55,___G_c_23_target_2e_proc_2d_result,___FAL)
+ ___SET_GLO(57,___G_c_23_target_2e_task_2d_return,___FAL)
+ ___SET_GLO(56,___G_c_23_target_2e_switch_2d_testable_3f_,___FAL)
+ ___SET_GLO(49,___G_c_23_target_2e_file_2d_extension,___FAL)
___SET_GLO(3,___G_c_23__2a__2a_not_2d_proc_2d_obj,___FAL)
___SET_GLO(2,___G_c_23__2a__2a_eq_3f__2d_proc_2d_obj,___FAL)
___SET_GLO(4,___G_c_23__2a__2a_quasi_2d_append_2d_proc_2d_obj,___FAL)
@@ -475,47 +499,47 @@ ___DEF_GLBL(___L__20___back)
___SET_GLO(1,___G_c_23__2a__2a_case_2d_memv_2d_proc_2d_obj,___FAL)
___SET_STK(1,___R0)
___SET_R2(___SYM(0,___S_arith))
- ___SET_R1(___GLO(68,___G_c_23_generic_2d_sym))
+ ___SET_R1(___GLO(73,___G_c_23_generic_2d_sym))
___SET_R0(___LBL(2))
___ADJFP(4)
___POLL(1)
___DEF_SLBL(1,___L1__20___back)
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(2,___L2__20___back)
___SET_R2(___SYM(0,___S_arith))
- ___SET_R1(___GLO(66,___G_c_23_fixnum_2d_sym))
+ ___SET_R1(___GLO(71,___G_c_23_fixnum_2d_sym))
___SET_R0(___LBL(3))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(3,___L3__20___back)
___SET_R2(___SYM(0,___S_arith))
- ___SET_R1(___GLO(67,___G_c_23_flonum_2d_sym))
+ ___SET_R1(___GLO(72,___G_c_23_flonum_2d_sym))
___SET_R0(___LBL(4))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(4,___L4__20___back)
___SET_R2(___SYM(1,___S_mostly_2d_arith))
- ___SET_R1(___GLO(73,___G_c_23_mostly_2d_generic_2d_sym))
+ ___SET_R1(___GLO(78,___G_c_23_mostly_2d_generic_2d_sym))
___SET_R0(___LBL(5))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(5,___L5__20___back)
___SET_R2(___SYM(1,___S_mostly_2d_arith))
- ___SET_R1(___GLO(70,___G_c_23_mostly_2d_fixnum_2d_sym))
+ ___SET_R1(___GLO(75,___G_c_23_mostly_2d_fixnum_2d_sym))
___SET_R0(___LBL(6))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(6,___L6__20___back)
___SET_R2(___SYM(1,___S_mostly_2d_arith))
- ___SET_R1(___GLO(72,___G_c_23_mostly_2d_flonum_2d_sym))
+ ___SET_R1(___GLO(77,___G_c_23_mostly_2d_flonum_2d_sym))
___SET_R0(___LBL(7))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(7,___L7__20___back)
___SET_R2(___SYM(1,___S_mostly_2d_arith))
- ___SET_R1(___GLO(69,___G_c_23_mostly_2d_fixnum_2d_flonum_2d_sym))
+ ___SET_R1(___GLO(74,___G_c_23_mostly_2d_fixnum_2d_flonum_2d_sym))
___SET_R0(___LBL(8))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(8,___L8__20___back)
___SET_R2(___SYM(1,___S_mostly_2d_arith))
- ___SET_R1(___GLO(71,___G_c_23_mostly_2d_flonum_2d_fixnum_2d_sym))
+ ___SET_R1(___GLO(76,___G_c_23_mostly_2d_flonum_2d_fixnum_2d_sym))
___SET_R0(___LBL(9))
- ___JUMPGLONOTSAFE(___SET_NARGS(2),65,___G_c_23_define_2d_namable_2d_decl)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),70,___G_c_23_define_2d_namable_2d_decl)
___DEF_SLBL(9,___L9__20___back)
___SET_R1(___VOID)
___POLL(10)
@@ -550,7 +574,7 @@ ___DEF_SLBL(0,___L0_c_23_make_2d_target)
___IF_NARGS_EQ(2,___NOTHING)
___WRONG_NARGS(0,2,0,0)
___DEF_GLBL(___L_c_23_make_2d_target)
- ___IF(___FIXEQ(___R1,___FIX(6L)))
+ ___IF(___FIXEQ(___R1,___FIX(7L)))
___GOTO(___L6_c_23_make_2d_target)
___END_IF
___GOTO(___L7_c_23_make_2d_target)
@@ -561,12 +585,12 @@ ___DEF_SLBL(1,___L1_c_23_make_2d_target)
___DEF_GLBL(___L6_c_23_make_2d_target)
___SET_STK(1,___R0)
___SET_STK(2,___R2)
- ___SET_R1(___FIX(13L))
+ ___SET_R1(___FIX(15L))
___SET_R0(___LBL(3))
___ADJFP(8)
___POLL(2)
___DEF_SLBL(2,___L2_c_23_make_2d_target)
- ___JUMPPRM(___SET_NARGS(1),___PRM(74,___G_make_2d_vector))
+ ___JUMPPRM(___SET_NARGS(1),___PRM(79,___G_make_2d_vector))
___DEF_SLBL(3,___L3_c_23_make_2d_target)
___VECTORSET(___R1,___FIX(0L),___SYM(2,___S_target))
___VECTORSET(___R1,___FIX(1L),___STK(-6))
@@ -582,7 +606,7 @@ ___DEF_GLBL(___L7_c_23_make_2d_target)
___ADJFP(8)
___POLL(5)
___DEF_SLBL(5,___L5_c_23_make_2d_target)
- ___JUMPGLONOTSAFE(___SET_NARGS(2),63,___G_c_23_compiler_2d_internal_2d_error)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),68,___G_c_23_compiler_2d_internal_2d_error)
___END_P_SW
___END_P_COD
@@ -1162,10 +1186,110 @@ ___END_P_SW
___END_P_COD
#undef ___PH_PROC
-#define ___PH_PROC ___H_c_23_make_2d_frame_2d_constraints
+#define ___PH_PROC ___H_c_23_target_2d_file_2d_extension
#undef ___PH_LBL0
#define ___PH_LBL0 66
#undef ___PD_ALL
+#define ___PD_ALL ___D_R0 ___D_R1
+#undef ___PR_ALL
+#define ___PR_ALL ___R_R0 ___R_R1
+#undef ___PW_ALL
+#define ___PW_ALL ___W_R1
+___BEGIN_P_COD
+___BEGIN_P_HLBL
+___DEF_P_HLBL_INTRO
+___DEF_P_HLBL(___L0_c_23_target_2d_file_2d_extension)
+___END_P_HLBL
+___BEGIN_P_SW
+___DEF_SLBL(0,___L0_c_23_target_2d_file_2d_extension)
+ ___IF_NARGS_EQ(1,___NOTHING)
+ ___WRONG_NARGS(0,1,0,0)
+___DEF_GLBL(___L_c_23_target_2d_file_2d_extension)
+ ___SET_R1(___VECTORREF(___R1,___FIX(13L)))
+ ___JUMPPRM(___NOTHING,___R0)
+___END_P_SW
+___END_P_COD
+
+#undef ___PH_PROC
+#define ___PH_PROC ___H_c_23_target_2d_file_2d_extension_2d_set_21_
+#undef ___PH_LBL0
+#define ___PH_LBL0 68
+#undef ___PD_ALL
+#define ___PD_ALL ___D_R0 ___D_R1 ___D_R2
+#undef ___PR_ALL
+#define ___PR_ALL ___R_R0 ___R_R1 ___R_R2
+#undef ___PW_ALL
+#define ___PW_ALL
+___BEGIN_P_COD
+___BEGIN_P_HLBL
+___DEF_P_HLBL_INTRO
+___DEF_P_HLBL(___L0_c_23_target_2d_file_2d_extension_2d_set_21_)
+___END_P_HLBL
+___BEGIN_P_SW
+___DEF_SLBL(0,___L0_c_23_target_2d_file_2d_extension_2d_set_21_)
+ ___IF_NARGS_EQ(2,___NOTHING)
+ ___WRONG_NARGS(0,2,0,0)
+___DEF_GLBL(___L_c_23_target_2d_file_2d_extension_2d_set_21_)
+ ___VECTORSET(___R1,___FIX(13L),___R2)
+ ___JUMPPRM(___NOTHING,___R0)
+___END_P_SW
+___END_P_COD
+
+#undef ___PH_PROC
+#define ___PH_PROC ___H_c_23_target_2d_generator
+#undef ___PH_LBL0
+#define ___PH_LBL0 70
+#undef ___PD_ALL
+#define ___PD_ALL ___D_R0 ___D_R1
+#undef ___PR_ALL
+#define ___PR_ALL ___R_R0 ___R_R1
+#undef ___PW_ALL
+#define ___PW_ALL ___W_R1
+___BEGIN_P_COD
+___BEGIN_P_HLBL
+___DEF_P_HLBL_INTRO
+___DEF_P_HLBL(___L0_c_23_target_2d_generator)
+___END_P_HLBL
+___BEGIN_P_SW
+___DEF_SLBL(0,___L0_c_23_target_2d_generator)
+ ___IF_NARGS_EQ(1,___NOTHING)
+ ___WRONG_NARGS(0,1,0,0)
+___DEF_GLBL(___L_c_23_target_2d_generator)
+ ___SET_R1(___VECTORREF(___R1,___FIX(14L)))
+ ___JUMPPRM(___NOTHING,___R0)
+___END_P_SW
+___END_P_COD
+
+#undef ___PH_PROC
+#define ___PH_PROC ___H_c_23_target_2d_generator_2d_set_21_
+#undef ___PH_LBL0
+#define ___PH_LBL0 72
+#undef ___PD_ALL
+#define ___PD_ALL ___D_R0 ___D_R1 ___D_R2
+#undef ___PR_ALL
+#define ___PR_ALL ___R_R0 ___R_R1 ___R_R2
+#undef ___PW_ALL
+#define ___PW_ALL
+___BEGIN_P_COD
+___BEGIN_P_HLBL
+___DEF_P_HLBL_INTRO
+___DEF_P_HLBL(___L0_c_23_target_2d_generator_2d_set_21_)
+___END_P_HLBL
+___BEGIN_P_SW
+___DEF_SLBL(0,___L0_c_23_target_2d_generator_2d_set_21_)
+ ___IF_NARGS_EQ(2,___NOTHING)
+ ___WRONG_NARGS(0,2,0,0)
+___DEF_GLBL(___L_c_23_target_2d_generator_2d_set_21_)
+ ___VECTORSET(___R1,___FIX(14L),___R2)
+ ___JUMPPRM(___NOTHING,___R0)
+___END_P_SW
+___END_P_COD
+
+#undef ___PH_PROC
+#define ___PH_PROC ___H_c_23_make_2d_frame_2d_constraints
+#undef ___PH_LBL0
+#define ___PH_LBL0 74
+#undef ___PD_ALL
#define ___PD_ALL ___D_HEAP ___D_R0 ___D_R1 ___D_R2
#undef ___PR_ALL
#define ___PR_ALL ___R_HEAP ___R_R0 ___R_R1 ___R_R2
@@ -1196,7 +1320,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_frame_2d_constraints_2d_reserve
#undef ___PH_LBL0
-#define ___PH_LBL0 69
+#define ___PH_LBL0 77
#undef ___PD_ALL
#define ___PD_ALL ___D_R0 ___D_R1
#undef ___PR_ALL
@@ -1221,7 +1345,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_frame_2d_constraints_2d_align
#undef ___PH_LBL0
-#define ___PH_LBL0 71
+#define ___PH_LBL0 79
#undef ___PD_ALL
#define ___PD_ALL ___D_R0 ___D_R1
#undef ___PR_ALL
@@ -1246,7 +1370,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_target_2d_get
#undef ___PH_LBL0
-#define ___PH_LBL0 73
+#define ___PH_LBL0 81
#undef ___PD_ALL
#define ___PD_ALL ___D_FP ___D_R0 ___D_R1 ___D_R2 ___D_R3 ___D_R4
#undef ___PR_ALL
@@ -1268,7 +1392,7 @@ ___DEF_SLBL(0,___L0_c_23_target_2d_get)
___IF_NARGS_EQ(1,___NOTHING)
___WRONG_NARGS(0,1,0,0)
___DEF_GLBL(___L_c_23_target_2d_get)
- ___SET_STK(1,___GLO(53,___G_c_23_targets_2d_loaded))
+ ___SET_STK(1,___GLO(58,___G_c_23_targets_2d_loaded))
___SET_STK(2,___R0)
___SET_STK(3,___R1)
___SET_R2(___STK(1))
@@ -1305,7 +1429,7 @@ ___DEF_SLBL(3,___L3_c_23_target_2d_get)
___POLL(4)
___DEF_SLBL(4,___L4_c_23_target_2d_get)
___ADJFP(-8)
- ___JUMPGLONOTSAFE(___SET_NARGS(2),62,___G_c_23_compiler_2d_error)
+ ___JUMPGLONOTSAFE(___SET_NARGS(2),67,___G_c_23_compiler_2d_error)
___DEF_GLBL(___L9_c_23_target_2d_get)
___SET_R1(___CDR(___R1))
___POLL(5)
@@ -1318,7 +1442,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_target_2d_add
#undef ___PH_LBL0
-#define ___PH_LBL0 80
+#define ___PH_LBL0 88
#undef ___PD_ALL
#define ___PD_ALL ___D_HEAP ___D_FP ___D_R0 ___D_R1 ___D_R2 ___D_R3 ___D_R4
#undef ___PR_ALL
@@ -1342,7 +1466,7 @@ ___DEF_SLBL(0,___L0_c_23_target_2d_add)
___DEF_GLBL(___L_c_23_target_2d_add)
___SET_STK(1,___R1)
___SET_R2(___VECTORREF(___STK(1),___FIX(1L)))
- ___SET_STK(1,___GLO(53,___G_c_23_targets_2d_loaded))
+ ___SET_STK(1,___GLO(58,___G_c_23_targets_2d_loaded))
___SET_STK(2,___R0)
___SET_STK(3,___R1)
___SET_STK(4,___R2)
@@ -1376,8 +1500,8 @@ ___DEF_SLBL(3,___L3_c_23_target_2d_add)
___GOTO(___L9_c_23_target_2d_add)
___END_IF
___SET_R1(___CONS(___STK(-4),___STK(-5)))
- ___SET_R1(___CONS(___R1,___GLO(53,___G_c_23_targets_2d_loaded)))
- ___SET_GLO(53,___G_c_23_targets_2d_loaded,___R1)
+ ___SET_R1(___CONS(___R1,___GLO(58,___G_c_23_targets_2d_loaded)))
+ ___SET_GLO(58,___G_c_23_targets_2d_loaded,___R1)
___CHECK_HEAP(4,4096)
___DEF_SLBL(4,___L4_c_23_target_2d_add)
___GOTO(___L10_c_23_target_2d_add)
@@ -1395,7 +1519,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_default_2d_target
#undef ___PH_LBL0
-#define ___PH_LBL0 87
+#define ___PH_LBL0 95
#undef ___PD_ALL
#define ___PD_ALL ___D_FP ___D_R0 ___D_R1 ___D_R4
#undef ___PR_ALL
@@ -1413,15 +1537,15 @@ ___DEF_SLBL(0,___L0_c_23_default_2d_target)
___IF_NARGS_EQ(0,___NOTHING)
___WRONG_NARGS(0,0,0,0)
___DEF_GLBL(___L_c_23_default_2d_target)
- ___IF(___NOT(___NULLP(___GLO(53,___G_c_23_targets_2d_loaded))))
+ ___IF(___NOT(___NULLP(___GLO(58,___G_c_23_targets_2d_loaded))))
___GOTO(___L2_c_23_default_2d_target)
___END_IF
___SET_R1(___SUB(2))
___POLL(1)
___DEF_SLBL(1,___L1_c_23_default_2d_target)
- ___JUMPGLONOTSAFE(___SET_NARGS(1),62,___G_c_23_compiler_2d_error)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),67,___G_c_23_compiler_2d_error)
___DEF_GLBL(___L2_c_23_default_2d_target)
- ___SET_R1(___CAR(___GLO(53,___G_c_23_targets_2d_loaded)))
+ ___SET_R1(___CAR(___GLO(58,___G_c_23_targets_2d_loaded)))
___SET_R1(___CAR(___R1))
___JUMPPRM(___NOTHING,___R0)
___END_P_SW
@@ -1430,7 +1554,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_target_2d_select_21_
#undef ___PH_LBL0
-#define ___PH_LBL0 90
+#define ___PH_LBL0 98
#undef ___PD_ALL
#define ___PD_ALL ___D_FP ___D_R0 ___D_R1 ___D_R2 ___D_R4
#undef ___PR_ALL
@@ -1465,7 +1589,7 @@ ___DEF_GLBL(___L_c_23_target_2d_select_21_)
___ADJFP(8)
___POLL(1)
___DEF_SLBL(1,___L1_c_23_target_2d_select_21_)
- ___JUMPINT(___SET_NARGS(1),___PRC(73),___L_c_23_target_2d_get)
+ ___JUMPINT(___SET_NARGS(1),___PRC(81),___L_c_23_target_2d_get)
___DEF_SLBL(2,___L2_c_23_target_2d_select_21_)
___SET_GLO(16,___G_c_23_target,___R1)
___SET_STK(-5,___GLO(16,___G_c_23_target))
@@ -1478,69 +1602,72 @@ ___DEF_SLBL(2,___L2_c_23_target_2d_select_21_)
___DEF_SLBL(3,___L3_c_23_target_2d_select_21_)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(4L)))
- ___SET_GLO(44,___G_c_23_target_2e_dump,___R1)
+ ___SET_GLO(48,___G_c_23_target_2e_dump,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(5L)))
- ___SET_GLO(48,___G_c_23_target_2e_nb_2d_regs,___R1)
+ ___SET_GLO(53,___G_c_23_target_2e_nb_2d_regs,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(6L)))
- ___SET_GLO(49,___G_c_23_target_2e_prim_2d_info,___R1)
+ ___SET_GLO(54,___G_c_23_target_2e_prim_2d_info,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(7L)))
- ___SET_GLO(47,___G_c_23_target_2e_label_2d_info,___R1)
+ ___SET_GLO(52,___G_c_23_target_2e_label_2d_info,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(8L)))
- ___SET_GLO(46,___G_c_23_target_2e_jump_2d_info,___R1)
+ ___SET_GLO(51,___G_c_23_target_2e_jump_2d_info,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(9L)))
- ___SET_GLO(45,___G_c_23_target_2e_frame_2d_constraints,___R1)
+ ___SET_GLO(50,___G_c_23_target_2e_frame_2d_constraints,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(10L)))
- ___SET_GLO(50,___G_c_23_target_2e_proc_2d_result,___R1)
+ ___SET_GLO(55,___G_c_23_target_2e_proc_2d_result,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(11L)))
- ___SET_GLO(52,___G_c_23_target_2e_task_2d_return,___R1)
+ ___SET_GLO(57,___G_c_23_target_2e_task_2d_return,___R1)
___SET_STK(-2,___GLO(16,___G_c_23_target))
___SET_R1(___VECTORREF(___STK(-2),___FIX(12L)))
- ___SET_GLO(51,___G_c_23_target_2e_switch_2d_testable_3f_,___R1)
- ___SET_R1(___GLO(56,___G_c_23__2a__2a_not_2d_sym))
+ ___SET_GLO(56,___G_c_23_target_2e_switch_2d_testable_3f_,___R1)
+ ___SET_STK(-2,___GLO(16,___G_c_23_target))
+ ___SET_R1(___VECTORREF(___STK(-2),___FIX(13L)))
+ ___SET_GLO(49,___G_c_23_target_2e_file_2d_extension,___R1)
+ ___SET_R1(___GLO(61,___G_c_23__2a__2a_not_2d_sym))
___SET_R0(___LBL(4))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(4,___L4_c_23_target_2d_select_21_)
___SET_GLO(3,___G_c_23__2a__2a_not_2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(55,___G_c_23__2a__2a_eq_3f__2d_sym))
+ ___SET_R1(___GLO(60,___G_c_23__2a__2a_eq_3f__2d_sym))
___SET_R0(___LBL(5))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(5,___L5_c_23_target_2d_select_21_)
___SET_GLO(2,___G_c_23__2a__2a_eq_3f__2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(57,___G_c_23__2a__2a_quasi_2d_append_2d_sym))
+ ___SET_R1(___GLO(62,___G_c_23__2a__2a_quasi_2d_append_2d_sym))
___SET_R0(___LBL(6))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(6,___L6_c_23_target_2d_select_21_)
___SET_GLO(4,___G_c_23__2a__2a_quasi_2d_append_2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(60,___G_c_23__2a__2a_quasi_2d_list_2d_sym))
+ ___SET_R1(___GLO(65,___G_c_23__2a__2a_quasi_2d_list_2d_sym))
___SET_R0(___LBL(7))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(7,___L7_c_23_target_2d_select_21_)
___SET_GLO(7,___G_c_23__2a__2a_quasi_2d_list_2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(58,___G_c_23__2a__2a_quasi_2d_cons_2d_sym))
+ ___SET_R1(___GLO(63,___G_c_23__2a__2a_quasi_2d_cons_2d_sym))
___SET_R0(___LBL(8))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(8,___L8_c_23_target_2d_select_21_)
___SET_GLO(5,___G_c_23__2a__2a_quasi_2d_cons_2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(59,___G_c_23__2a__2a_quasi_2d_list_2d__3e_vector_2d_sym))
+ ___SET_R1(___GLO(64,___G_c_23__2a__2a_quasi_2d_list_2d__3e_vector_2d_sym))
___SET_R0(___LBL(9))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(9,___L9_c_23_target_2d_select_21_)
___SET_GLO(6,___G_c_23__2a__2a_quasi_2d_list_2d__3e_vector_2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(61,___G_c_23__2a__2a_quasi_2d_vector_2d_sym))
+ ___SET_R1(___GLO(66,___G_c_23__2a__2a_quasi_2d_vector_2d_sym))
___SET_R0(___LBL(10))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(10,___L10_c_23_target_2d_select_21_)
___SET_GLO(8,___G_c_23__2a__2a_quasi_2d_vector_2d_proc_2d_obj,___R1)
- ___SET_R1(___GLO(54,___G_c_23__2a__2a_case_2d_memv_2d_sym))
+ ___SET_R1(___GLO(59,___G_c_23__2a__2a_case_2d_memv_2d_sym))
___SET_R0(___LBL(11))
- ___JUMPGLONOTSAFE(___SET_NARGS(1),49,___G_c_23_target_2e_prim_2d_info)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),54,___G_c_23_target_2e_prim_2d_info)
___DEF_SLBL(11,___L11_c_23_target_2d_select_21_)
___SET_GLO(1,___G_c_23__2a__2a_case_2d_memv_2d_proc_2d_obj,___R1)
___SET_R1(___FAL)
@@ -1554,7 +1681,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_target_2d_unselect_21_
#undef ___PH_LBL0
-#define ___PH_LBL0 104
+#define ___PH_LBL0 112
#undef ___PD_ALL
#define ___PD_ALL ___D_FP ___D_R0 ___D_R1 ___D_R4
#undef ___PR_ALL
@@ -1602,7 +1729,7 @@ ___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_arith_2d_implementation
#undef ___PH_LBL0
-#define ___PH_LBL0 109
+#define ___PH_LBL0 117
#undef ___PD_ALL
#define ___PD_ALL ___D_FP ___D_R2 ___D_R3 ___D_R4
#undef ___PR_ALL
@@ -1622,18 +1749,18 @@ ___DEF_SLBL(0,___L0_c_23_arith_2d_implementation)
___DEF_GLBL(___L_c_23_arith_2d_implementation)
___SET_STK(1,___SYM(0,___S_arith))
___SET_R3(___R2)
- ___SET_R2(___GLO(68,___G_c_23_generic_2d_sym))
+ ___SET_R2(___GLO(73,___G_c_23_generic_2d_sym))
___ADJFP(1)
___POLL(1)
___DEF_SLBL(1,___L1_c_23_arith_2d_implementation)
- ___JUMPGLONOTSAFE(___SET_NARGS(4),64,___G_c_23_declaration_2d_value)
+ ___JUMPGLONOTSAFE(___SET_NARGS(4),69,___G_c_23_declaration_2d_value)
___END_P_SW
___END_P_COD
#undef ___PH_PROC
#define ___PH_PROC ___H_c_23_mostly_2d_arith_2d_implementation
#undef ___PH_LBL0
-#define ___PH_LBL0 112
+#define ___PH_LBL0 120
#undef ___PD_ALL
#define ___PD_ALL ___D_FP ___D_R2 ___D_R3 ___D_R4
#undef ___PR_ALL
@@ -1653,11 +1780,11 @@ ___DEF_SLBL(0,___L0_c_23_mostly_2d_arith_2d_implementation)
___DEF_GLBL(___L_c_23_mostly_2d_arith_2d_implementation)
___SET_STK(1,___SYM(1,___S_mostly_2d_arith))
___SET_R3(___R2)
- ___SET_R2(___GLO(69,___G_c_23_mostly_2d_fixnum_2d_flonum_2d_sym))
+ ___SET_R2(___GLO(74,___G_c_23_mostly_2d_fixnum_2d_flonum_2d_sym))
___ADJFP(1)
___POLL(1)
___DEF_SLBL(1,___L1_c_23_mostly_2d_arith_2d_implementation)
- ___JUMPGLONOTSAFE(___SET_NARGS(4),64,___G_c_23_declaration_2d_value)
+ ___JUMPGLONOTSAFE(___SET_NARGS(4),69,___G_c_23_declaration_2d_value)
___END_P_SW
___END_P_COD
@@ -1739,6 +1866,17 @@ ___REF_FAL,1,0)
,___DEF_LBL_INTRO(___H_c_23_target_2d_switch_2d_testable_3f__2d_set_21_,"c#target-switch-testable?-set!",
___REF_FAL,1,0)
,___DEF_LBL_PROC(___H_c_23_target_2d_switch_2d_testable_3f__2d_set_21_,2,0)
+,___DEF_LBL_INTRO(___H_c_23_target_2d_file_2d_extension,"c#target-file-extension",___REF_FAL,1,0)
+
+,___DEF_LBL_PROC(___H_c_23_target_2d_file_2d_extension,1,0)
+,___DEF_LBL_INTRO(___H_c_23_target_2d_file_2d_extension_2d_set_21_,"c#target-file-extension-set!",___REF_FAL,
+1,0)
+,___DEF_LBL_PROC(___H_c_23_target_2d_file_2d_extension_2d_set_21_,2,0)
+,___DEF_LBL_INTRO(___H_c_23_target_2d_generator,"c#target-generator",___REF_FAL,1,0)
+,___DEF_LBL_PROC(___H_c_23_target_2d_generator,1,0)
+,___DEF_LBL_INTRO(___H_c_23_target_2d_generator_2d_set_21_,"c#target-generator-set!",___REF_FAL,1,0)
+
+,___DEF_LBL_PROC(___H_c_23_target_2d_generator_2d_set_21_,2,0)
,___DEF_LBL_INTRO(___H_c_23_make_2d_frame_2d_constraints,"c#make-frame-constraints",___REF_FAL,2,0)
,___DEF_LBL_PROC(___H_c_23_make_2d_frame_2d_constraints,2,0)
@@ -1797,39 +1935,43 @@ ___END_LBL
___BEGIN_MOD1
___DEF_PRM(0,___G__20___back,1)
___DEF_PRM(14,___G_c_23_make_2d_target,13)
-___DEF_PRM(31,___G_c_23_target_2d_name,20)
+___DEF_PRM(35,___G_c_23_target_2d_name,20)
___DEF_PRM(18,___G_c_23_target_2d_begin_21_,22)
___DEF_PRM(19,___G_c_23_target_2d_begin_21__2d_set_21_,24)
___DEF_PRM(22,___G_c_23_target_2d_end_21_,26)
___DEF_PRM(23,___G_c_23_target_2d_end_21__2d_set_21_,28)
___DEF_PRM(20,___G_c_23_target_2d_dump,30)
___DEF_PRM(21,___G_c_23_target_2d_dump_2d_set_21_,32)
-___DEF_PRM(32,___G_c_23_target_2d_nb_2d_regs,34)
-___DEF_PRM(33,___G_c_23_target_2d_nb_2d_regs_2d_set_21_,36)
-___DEF_PRM(34,___G_c_23_target_2d_prim_2d_info,38)
-___DEF_PRM(35,___G_c_23_target_2d_prim_2d_info_2d_set_21_,40)
-___DEF_PRM(29,___G_c_23_target_2d_label_2d_info,42)
-___DEF_PRM(30,___G_c_23_target_2d_label_2d_info_2d_set_21_,44)
-___DEF_PRM(27,___G_c_23_target_2d_jump_2d_info,46)
-___DEF_PRM(28,___G_c_23_target_2d_jump_2d_info_2d_set_21_,48)
-___DEF_PRM(24,___G_c_23_target_2d_frame_2d_constraints,50)
-___DEF_PRM(25,___G_c_23_target_2d_frame_2d_constraints_2d_set_21_,52)
-___DEF_PRM(36,___G_c_23_target_2d_proc_2d_result,54)
-___DEF_PRM(37,___G_c_23_target_2d_proc_2d_result_2d_set_21_,56)
-___DEF_PRM(41,___G_c_23_target_2d_task_2d_return,58)
-___DEF_PRM(42,___G_c_23_target_2d_task_2d_return_2d_set_21_,60)
-___DEF_PRM(39,___G_c_23_target_2d_switch_2d_testable_3f_,62)
-___DEF_PRM(40,___G_c_23_target_2d_switch_2d_testable_3f__2d_set_21_,64)
-___DEF_PRM(13,___G_c_23_make_2d_frame_2d_constraints,66)
-___DEF_PRM(12,___G_c_23_frame_2d_constraints_2d_reserve,69)
-___DEF_PRM(11,___G_c_23_frame_2d_constraints_2d_align,71)
-___DEF_PRM(26,___G_c_23_target_2d_get,73)
-___DEF_PRM(17,___G_c_23_target_2d_add,80)
-___DEF_PRM(10,___G_c_23_default_2d_target,87)
-___DEF_PRM(38,___G_c_23_target_2d_select_21_,90)
-___DEF_PRM(43,___G_c_23_target_2d_unselect_21_,104)
-___DEF_PRM(9,___G_c_23_arith_2d_implementation,109)
-___DEF_PRM(15,___G_c_23_mostly_2d_arith_2d_implementation,112)
+___DEF_PRM(36,___G_c_23_target_2d_nb_2d_regs,34)
+___DEF_PRM(37,___G_c_23_target_2d_nb_2d_regs_2d_set_21_,36)
+___DEF_PRM(38,___G_c_23_target_2d_prim_2d_info,38)
+___DEF_PRM(39,___G_c_23_target_2d_prim_2d_info_2d_set_21_,40)
+___DEF_PRM(33,___G_c_23_target_2d_label_2d_info,42)
+___DEF_PRM(34,___G_c_23_target_2d_label_2d_info_2d_set_21_,44)
+___DEF_PRM(31,___G_c_23_target_2d_jump_2d_info,46)
+___DEF_PRM(32,___G_c_23_target_2d_jump_2d_info_2d_set_21_,48)
+___DEF_PRM(26,___G_c_23_target_2d_frame_2d_constraints,50)
+___DEF_PRM(27,___G_c_23_target_2d_frame_2d_constraints_2d_set_21_,52)
+___DEF_PRM(40,___G_c_23_target_2d_proc_2d_result,54)
+___DEF_PRM(41,___G_c_23_target_2d_proc_2d_result_2d_set_21_,56)
+___DEF_PRM(45,___G_c_23_target_2d_task_2d_return,58)
+___DEF_PRM(46,___G_c_23_target_2d_task_2d_return_2d_set_21_,60)
+___DEF_PRM(43,___G_c_23_target_2d_switch_2d_testable_3f_,62)
+___DEF_PRM(44,___G_c_23_target_2d_switch_2d_testable_3f__2d_set_21_,64)
+___DEF_PRM(24,___G_c_23_target_2d_file_2d_extension,66)
+___DEF_PRM(25,___G_c_23_target_2d_file_2d_extension_2d_set_21_,68)
+___DEF_PRM(28,___G_c_23_target_2d_generator,70)
+___DEF_PRM(29,___G_c_23_target_2d_generator_2d_set_21_,72)
+___DEF_PRM(13,___G_c_23_make_2d_frame_2d_constraints,74)
+___DEF_PRM(12,___G_c_23_frame_2d_constraints_2d_reserve,77)
+___DEF_PRM(11,___G_c_23_frame_2d_constraints_2d_align,79)
+___DEF_PRM(30,___G_c_23_target_2d_get,81)
+___DEF_PRM(17,___G_c_23_target_2d_add,88)
+___DEF_PRM(10,___G_c_23_default_2d_target,95)
+___DEF_PRM(42,___G_c_23_target_2d_select_21_,98)
+___DEF_PRM(47,___G_c_23_target_2d_unselect_21_,112)
+___DEF_PRM(9,___G_c_23_arith_2d_implementation,117)
+___DEF_PRM(15,___G_c_23_mostly_2d_arith_2d_implementation,120)
___END_MOD1
___BEGIN_MOD2
View
9 gsc/_back.scm
@@ -106,6 +106,11 @@
;; in a GVM "switch" instruction.
;;
;; file-extension The file extension for generated files.
+;;
+;; generator Procedure (lambda (msg . args) ...).
+;; This procedure takes a message and some arguments and
+;; returns the proper instruction in the target language.
+;; See target_js.scm for the list of recognized messages.
;;; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
@@ -119,7 +124,7 @@
(compiler-internal-error
"make-target, version of target module is not current" name))
- (let ((x (make-vector 14)))
+ (let ((x (make-vector 15)))
(vector-set! x 0 'target)
(vector-set! x 1 name)
x))
@@ -151,6 +156,8 @@
(define (target-switch-testable?-set! x y) (vector-set! x 12 y))
(define (target-file-extension x) (vector-ref x 13))
(define (target-file-extension-set! x y) (vector-set! x 13 y))
+(define (target-generator x) (vector-ref x 14))
+(define (target-generator-set! x y) (vector-set! x 14 y))
;;;; Frame constraints structure
View
2,899 gsc/_front.c
1,444 additions, 1,455 deletions not shown
View
9,540 gsc/_gambcgsc.c
4,889 additions, 4,651 deletions not shown
View
10 gsc/_gsc.c
@@ -181,7 +181,7 @@
"c#targ-c-file-extensions"
"c#targ-generated-c-file?"
"compile-file"
-"compile-file-to-c"
+"compile-file-to-target"
"link-flat"
"link-incremental"
)
@@ -372,7 +372,7 @@ ___NEED_GLO(___G_c_23_targ_2d_c_2d_file_2d_extensions)
___NEED_GLO(___G_c_23_targ_2d_generated_2d_c_2d_file_3f_)
___NEED_GLO(___G_c_23_wrap_2d_program)
___NEED_GLO(___G_compile_2d_file)
-___NEED_GLO(___G_compile_2d_file_2d_to_2d_c)
+___NEED_GLO(___G_compile_2d_file_2d_to_2d_target)
___NEED_GLO(___G_link_2d_flat)
___NEED_GLO(___G_link_2d_incremental)
___NEED_GLO(___G_main)
@@ -559,7 +559,7 @@ ___DEF_GLO(54,"##write-string")
___DEF_GLO(55,"c#targ-c-file-extensions")
___DEF_GLO(56,"c#targ-generated-c-file?")
___DEF_GLO(57,"compile-file")
-___DEF_GLO(58,"compile-file-to-c")
+___DEF_GLO(58,"compile-file-to-target")
___DEF_GLO(59,"link-flat")
___DEF_GLO(60,"link-incremental")
___END_GLO
@@ -3122,7 +3122,7 @@ ___DEF_SLBL(170,___L170__23__23_main_2d_gsi_2f_gsc)
___SET_R2(___KEY(5,___K_output))
___SET_R0(___LBL(171))
___ADJFP(-2)
- ___JUMPGLONOTSAFE(___SET_NARGS(5),58,___G_compile_2d_file_2d_to_2d_c)
+ ___JUMPGLONOTSAFE(___SET_NARGS(5),58,___G_compile_2d_file_2d_to_2d_target)
___DEF_SLBL(171,___L171__23__23_main_2d_gsi_2f_gsc)
___IF(___FALSEP(___R1))
___GOTO(___L384__23__23_main_2d_gsi_2f_gsc)
@@ -3150,7 +3150,7 @@ ___DEF_GLBL(___L386__23__23_main_2d_gsi_2f_gsc)
___SET_R2(___KEY(4,___K_options))
___SET_R0(___LBL(172))
___ADJFP(-4)
- ___JUMPGLONOTSAFE(___SET_NARGS(3),58,___G_compile_2d_file_2d_to_2d_c)
+ ___JUMPGLONOTSAFE(___SET_NARGS(3),58,___G_compile_2d_file_2d_to_2d_target)
___DEF_SLBL(175,___L175__23__23_main_2d_gsi_2f_gsc)
___SET_STK(-3,___R1)
___SET_R2(___R1)
View
107 gsc/_gsc_.c
@@ -3,7 +3,7 @@
(
406005
" _gsc_"
-(" _kernel" " _system" " _num" " _std" " _eval" " _io" " _nonstd" " _thread" " _repl" " _host" " _utils" " _source" " _parms" " _env" " _ptree1" " _ptree2" " _gvm" " _back" " _front" " _prims" " _assert" " _asm" " _x86" " _codegen" " _t-c-1" " _t-c-2" " _t-c-3" " _gsclib" " _gsc")
+(" _kernel" " _system" " _num" " _std" " _eval" " _io" " _nonstd" " _thread" " _repl" " _host" " _utils" " _source" " _parms" " _env" " _ptree1" " _ptree2" " _gvm" " _back" " _front" " _prims" " _assert" " _asm" " _x86" " _codegen" " _t-univ" " _t-c-1" " _t-c-2" " _t-c-3" " _gsclib" " _gsc")
(
""
"##and"
@@ -43,6 +43,7 @@
"##list"
"##make-uninterned-symbol"
"##namespace"
+"##not"
"##or"
"##pair?"
"##parameterize"
@@ -227,6 +228,7 @@
"address"
"address-info"
"addresses"
+"adjust-sp"
"ah"
"al"
"alias"
@@ -565,6 +567,7 @@
"gcmap"
"gid"
"glbl"
+"glo"
"gnu"
"goto"
"group"
@@ -649,6 +652,7 @@
"jazz"
"join-execution-paths-aux"
"join-timeout-exception"
+"js"
"jump"
"k"
"keep-alive"
@@ -814,6 +818,7 @@
"peer"
"permanent-close"
"permissions"
+"php"
"pinpoint-continuation"
"pipe-port"
"point"
@@ -850,6 +855,7 @@
"psr"
"pt-syntax-error"
"pw-"
+"python"
"q"
"qt"
"quasiquote"
@@ -931,6 +937,7 @@
"reason"
"receive"
"ref-tag"
+"reg"
"regular"
"repl-channel"
"repl-channel-ports"
@@ -1138,6 +1145,7 @@
"stdin-redir"
"stdout"
"stdout-redir"
+"stk"
"str"
"string"
"string->canonical-symbol"
@@ -1166,6 +1174,7 @@
"table"
"tail"
"tail-call"
+"targ"
"target"
"task"
"task-entry"
@@ -1242,6 +1251,7 @@
"uncaught-exception"
"unfulfilled-cond-expand"
"uninitialized-thread-exception"
+"univ-switch-testable?"
"unknown"
"unknown-keyword-argument-exception"
"unknown-location"
@@ -1539,6 +1549,7 @@
" _t-c-1"
" _t-c-2"
" _t-c-3"
+" _t-univ"
" _thread"
" _utils"
" _x86"
@@ -1727,7 +1738,7 @@
"##comp-vals"
"##compilation-scope"
"##compile-file"
-"##compile-file-to-c"
+"##compile-file-to-target"
"##compile-inner"
"##compile-module"
"##compile-options-normalize"
@@ -3858,6 +3869,7 @@
"c#cp"
"c#cst-tag"
"c#cst?"
+"c#ctx-ns"
"c#current-context"
"c#current-frame"
"c#dead-reg/stk?"
@@ -3903,6 +3915,7 @@
"c#enter-opnd"
"c#entry-bb"
"c#entry-context"
+"c#entry-point"
"c#entry-poll"
"c#env-declare"
"c#env-define-var"
@@ -4044,6 +4057,7 @@
"c#intrs-enabled?"
"c#join-execution-paths"
"c#join-execution-paths-aux2"
+"c#js-generator"
"c#jump-lbl?"
"c#jump-nb-args"
"c#jump-opnd"
@@ -4253,6 +4267,7 @@
"c#prc-req-and-opt-parms-only?"
"c#prc-tag"
"c#prc?"
+"c#prim-applic"
"c#prim-procs"
"c#proc-body-live-varset"
"c#proc-info->jump-state"
@@ -4377,6 +4392,7 @@
"c#reverse-append!"
"c#run-time-binding?"
"c#run-time-bindings-sym"
+"c#runtime-system"
"c#s16vect->list"
"c#s16vect-length"
"c#s16vect-ref"
@@ -4441,6 +4457,7 @@
"c#source->parms"
"c#source-code"
"c#source-locat"
+"c#sp-adjust"
"c#specialize-app"
"c#specialize-proc"
"c#standard-binding?"
@@ -4819,10 +4836,14 @@
"c#target-begin!-set!"
"c#target-dump-set!"
"c#target-end!-set!"
+"c#target-file-extension-set!"
"c#target-frame-constraints-set!"
+"c#target-generator"
+"c#target-generator-set!"
"c#target-get"
"c#target-jump-info-set!"
"c#target-label-info-set!"
+"c#target-name"
"c#target-nb-regs-set!"
"c#target-prim-info-set!"
"c#target-proc-result-set!"
@@ -4831,6 +4852,7 @@
"c#target-task-return-set!"
"c#target-unselect!"
"c#target.dump"
+"c#target.file-extension"
"c#target.frame-constraints"
"c#target.jump-info"
"c#target.label-info"
@@ -4850,6 +4872,9 @@
"c#transform-declaration"
"c#transform-to-case?"
"c#transitive-closure"
+"c#translate-gvm-instr"
+"c#translate-gvm-opnd"
+"c#translate-lbl"
"c#trivial?"
"c#tst-alt"
"c#tst-con"
@@ -4885,6 +4910,14 @@
"c#unbox-object"
"c#unicode->character"
"c#union-sym"
+"c#univ-dump"
+"c#univ-dump-procs"
+"c#univ-jump-info"
+"c#univ-label-info"
+"c#univ-prim-proc-add!"
+"c#univ-prim-proc-table"
+"c#univ-setup"
+"c#univ-switch-testable?"
"c#unquote-expr?"
"c#unquote-splicing-expr?"
"c#unquote-splicing-sym"
@@ -5014,7 +5047,7 @@
"close-output-port"
"close-port"
"compile-file"
-"compile-file-to-c"
+"compile-file-to-target"
"complex?"
"cons"
"continuation-capture"
@@ -5218,6 +5251,7 @@
"number->string"
"number?"
"numerator"
+"object->string"
"odd?"
"open-directory"
"open-event-queue"
@@ -5264,6 +5298,8 @@
"port-settings-set!"
"positive?"
"pp"
+"pretty-print"
+"print"
"procedure?"
"process-status"
"protocol-info"
@@ -6118,6 +6154,9 @@
"c#context-slots"
"c#cst-val"
"c#cst-val-set!"
+"c#ctx-ns-set!"
+"c#ctx-target"
+"c#ctx-target-set!"
"c#def-var-set!"
"c#env-decl-ref"
"c#env-macros-ref"
@@ -6126,15 +6165,18 @@
"c#env-vars-set!"
"c#false-obj"
"c#flush-regs"
+"c#gen"
"c#gnode-depvars"
"c#gnode-var"
"c#include-expr->sourcezzzzz"
"c#join-execution-paths-aux"
"c#join2"
+"c#js-runtime"
"c#jump-state-in-reg"
"c#jump-state-in-stk"
"c#label-lbl-num-set!"
"c#lambda-expr?"
+"c#lbl->id"
"c#live-slot-var?"
"c#locat-filename"
"c#lowest"
@@ -6144,6 +6186,7 @@
"c#make-code"
"c#make-conj"
"c#make-cst"
+"c#make-ctx"
"c#make-def"
"c#make-disj"
"c#make-fut"
@@ -6281,16 +6324,21 @@
"c#target-begin!"
"c#target-dump"
"c#target-end!"
+"c#target-file-extension"
"c#target-frame-constraints"
"c#target-jump-info"
"c#target-label-info"
-"c#target-name"
"c#target-nb-regs"
"c#target-prim-info"
"c#target-proc-result"
"c#target-switch-testable?"
"c#target-task-return"
"c#type-pot-fut?"
+"c#univ-frame-alignment"
+"c#univ-frame-reserve"
+"c#univ-nb-arg-regs"
+"c#univ-nb-gvm-regs"
+"c#univ-prim-info"
"c#use-actual-primitives-in-expression?"
"c#use-dotted-rest-parameter-when-possible?"
"c#valid-c-or-c++-function-id?"
@@ -6514,7 +6562,6 @@
"number-of-arguments-limit-exception-procedure"
"number-of-arguments-limit-exception?"
"object->serial-number"
-"object->string"
"object->u8vector"
"open-dummy"
"open-tcp-client"
@@ -6534,9 +6581,7 @@
"path-strip-volume"
"path-volume"
"port?"
-"pretty-print"
"primordial-exception-handler"
-"print"
"println"
"process-pid"
"process-times"
@@ -7047,6 +7092,7 @@ ___DEF_OLD_SYM_GLO(___S__20___system,___G__20___system)
___DEF_OLD_SYM_GLO(___S__20___t_2d_c_2d_1,___G__20___t_2d_c_2d_1)
___DEF_OLD_SYM_GLO(___S__20___t_2d_c_2d_2,___G__20___t_2d_c_2d_2)
___DEF_OLD_SYM_GLO(___S__20___t_2d_c_2d_3,___G__20___t_2d_c_2d_3)
+___DEF_OLD_SYM_GLO(___S__20___t_2d_univ,___G__20___t_2d_univ)
___DEF_OLD_SYM_GLO(___S__20___thread,___G__20___thread)
___DEF_OLD_SYM_GLO(___S__20___utils,___G__20___utils)
___DEF_OLD_SYM_GLO(___S__20___x86,___G__20___x86)
@@ -7350,7 +7396,7 @@ ___DEF_OLD_SYM_GLO(___S__23__23_comp_2d_vals,___G__23__23_comp_2d_vals)
___DEF_OLD_SYM_GLO(___S__23__23_compilation_2d_options,___G__23__23_compilation_2d_options)
___DEF_OLD_SYM_GLO(___S__23__23_compilation_2d_scope,___G__23__23_compilation_2d_scope)
___DEF_OLD_SYM_GLO(___S__23__23_compile_2d_file,___G__23__23_compile_2d_file)
-___DEF_OLD_SYM_GLO(___S__23__23_compile_2d_file_2d_to_2d_c,___G__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_OLD_SYM_GLO(___S__23__23_compile_2d_file_2d_to_2d_target,___G__23__23_compile_2d_file_2d_to_2d_target)
___DEF_OLD_SYM_GLO(___S__23__23_compile_2d_inner,___G__23__23_compile_2d_inner)
___DEF_OLD_SYM_GLO(___S__23__23_compile_2d_module,___G__23__23_compile_2d_module)
___DEF_OLD_SYM_GLO(___S__23__23_compile_2d_options_2d_normalize,___G__23__23_compile_2d_options_2d_normalize)
@@ -9768,6 +9814,7 @@ ___DEF_OLD_SYM_GLO(___S_address_2d_info_2d_socket_2d_type,___G_address_2d_info_2
___DEF_OLD_SYM_GLO(___S_address_2d_info_3f_,___G_address_2d_info_3f_)
___DEF_OLD_SYM_GLO(___S_address_2d_infos,___G_address_2d_infos)
___DEF_OLD_SYM_GLO(___S_addresses,___G_addresses)
+___DEF_OLD_SYM_GLO(___S_adjust_2d_sp,___G_adjust_2d_sp)
___DEF_OLD_SYM_GLO(___S_ah,___G_ah)
___DEF_OLD_SYM_GLO(___S_al,___G_al)
___DEF_OLD_SYM_GLO(___S_alias,___G_alias)
@@ -10316,6 +10363,10 @@ ___DEF_OLD_SYM_GLO(___S_c_23_cst_2d_tag,___G_c_23_cst_2d_tag)
___DEF_OLD_SYM_GLO(___S_c_23_cst_2d_val,___G_c_23_cst_2d_val)
___DEF_OLD_SYM_GLO(___S_c_23_cst_2d_val_2d_set_21_,___G_c_23_cst_2d_val_2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_cst_3f_,___G_c_23_cst_3f_)
+___DEF_OLD_SYM_GLO(___S_c_23_ctx_2d_ns,___G_c_23_ctx_2d_ns)
+___DEF_OLD_SYM_GLO(___S_c_23_ctx_2d_ns_2d_set_21_,___G_c_23_ctx_2d_ns_2d_set_21_)
+___DEF_OLD_SYM_GLO(___S_c_23_ctx_2d_target,___G_c_23_ctx_2d_target)
+___DEF_OLD_SYM_GLO(___S_c_23_ctx_2d_target_2d_set_21_,___G_c_23_ctx_2d_target_2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_current_2d_context,___G_c_23_current_2d_context)
___DEF_OLD_SYM_GLO(___S_c_23_current_2d_frame,___G_c_23_current_2d_frame)
___DEF_OLD_SYM_GLO(___S_c_23_dead_2d_reg_2f_stk_3f_,___G_c_23_dead_2d_reg_2f_stk_3f_)
@@ -10362,6 +10413,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_end_2d_of_2d_file_2d_object_3f_,___G_c_23_end_2d_of
___DEF_OLD_SYM_GLO(___S_c_23_enter_2d_opnd,___G_c_23_enter_2d_opnd)
___DEF_OLD_SYM_GLO(___S_c_23_entry_2d_bb,___G_c_23_entry_2d_bb)
___DEF_OLD_SYM_GLO(___S_c_23_entry_2d_context,___G_c_23_entry_2d_context)
+___DEF_OLD_SYM_GLO(___S_c_23_entry_2d_point,___G_c_23_entry_2d_point)
___DEF_OLD_SYM_GLO(___S_c_23_entry_2d_poll,___G_c_23_entry_2d_poll)
___DEF_OLD_SYM_GLO(___S_c_23_env_2d_decl_2d_ref,___G_c_23_env_2d_decl_2d_ref)
___DEF_OLD_SYM_GLO(___S_c_23_env_2d_declare,___G_c_23_env_2d_declare)
@@ -10446,6 +10498,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_fut_2d_val,___G_c_23_fut_2d_val)
___DEF_OLD_SYM_GLO(___S_c_23_fut_3f_,___G_c_23_fut_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_future_2d_sym,___G_c_23_future_2d_sym)
___DEF_OLD_SYM_GLO(___S_c_23_gambit_2d_scheme_2d_sym,___G_c_23_gambit_2d_scheme_2d_sym)
+___DEF_OLD_SYM_GLO(___S_c_23_gen,___G_c_23_gen)
___DEF_OLD_SYM_GLO(___S_c_23_gen_2d_call,___G_c_23_gen_2d_call)
___DEF_OLD_SYM_GLO(___S_c_23_gen_2d_call_2d_prim,___G_c_23_gen_2d_call_2d_prim)
___DEF_OLD_SYM_GLO(___S_c_23_gen_2d_call_2d_prim_2d_vars,___G_c_23_gen_2d_call_2d_prim_2d_vars)
@@ -10515,6 +10568,8 @@ ___DEF_OLD_SYM_GLO(___S_c_23_join_2d_execution_2d_paths,___G_c_23_join_2d_execut
___DEF_OLD_SYM_GLO(___S_c_23_join_2d_execution_2d_paths_2d_aux,___G_c_23_join_2d_execution_2d_paths_2d_aux)
___DEF_OLD_SYM_GLO(___S_c_23_join_2d_execution_2d_paths_2d_aux2,___G_c_23_join_2d_execution_2d_paths_2d_aux2)
___DEF_OLD_SYM_GLO(___S_c_23_join2,___G_c_23_join2)
+___DEF_OLD_SYM_GLO(___S_c_23_js_2d_generator,___G_c_23_js_2d_generator)
+___DEF_OLD_SYM_GLO(___S_c_23_js_2d_runtime,___G_c_23_js_2d_runtime)
___DEF_OLD_SYM_GLO(___S_c_23_jump_2d_lbl_3f_,___G_c_23_jump_2d_lbl_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_jump_2d_nb_2d_args,___G_c_23_jump_2d_nb_2d_args)
___DEF_OLD_SYM_GLO(___S_c_23_jump_2d_opnd,___G_c_23_jump_2d_opnd)
@@ -10542,6 +10597,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_lambda_2d_lift_2d_sym,___G_c_23_lambda_2d_lift_2d_s
___DEF_OLD_SYM_GLO(___S_c_23_lambda_2d_lift_3f_,___G_c_23_lambda_2d_lift_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_lambda_2d_sym,___G_c_23_lambda_2d_sym)
___DEF_OLD_SYM_GLO(___S_c_23_last_2d_pair,___G_c_23_last_2d_pair)
+___DEF_OLD_SYM_GLO(___S_c_23_lbl_2d__3e_id,___G_c_23_lbl_2d__3e_id)
___DEF_OLD_SYM_GLO(___S_c_23_lbl_2d_num,___G_c_23_lbl_2d_num)
___DEF_OLD_SYM_GLO(___S_c_23_lbl_2d_num_2d__3e_bb,___G_c_23_lbl_2d_num_2d__3e_bb)
___DEF_OLD_SYM_GLO(___S_c_23_lbl_3f_,___G_c_23_lbl_3f_)
@@ -10593,6 +10649,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_make_2d_context,___G_c_23_make_2d_context)
___DEF_OLD_SYM_GLO(___S_c_23_make_2d_copy,___G_c_23_make_2d_copy)
___DEF_OLD_SYM_GLO(___S_c_23_make_2d_counter,___G_c_23_make_2d_counter)
___DEF_OLD_SYM_GLO(___S_c_23_make_2d_cst,___G_c_23_make_2d_cst)
+___DEF_OLD_SYM_GLO(___S_c_23_make_2d_ctx,___G_c_23_make_2d_ctx)
___DEF_OLD_SYM_GLO(___S_c_23_make_2d_def,___G_c_23_make_2d_def)
___DEF_OLD_SYM_GLO(___S_c_23_make_2d_disj,___G_c_23_make_2d_disj)
___DEF_OLD_SYM_GLO(___S_c_23_make_2d_f32vect,___G_c_23_make_2d_f32vect)
@@ -10786,6 +10843,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_prc_2d_rest_3f_,___G_c_23_prc_2d_rest_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_prc_2d_rest_3f__2d_set_21_,___G_c_23_prc_2d_rest_3f__2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_prc_2d_tag,___G_c_23_prc_2d_tag)
___DEF_OLD_SYM_GLO(___S_c_23_prc_3f_,___G_c_23_prc_3f_)
+___DEF_OLD_SYM_GLO(___S_c_23_prim_2d_applic,___G_c_23_prim_2d_applic)
___DEF_OLD_SYM_GLO(___S_c_23_prim_2d_procs,___G_c_23_prim_2d_procs)
___DEF_OLD_SYM_GLO(___S_c_23_proc_2d_body_2d_live_2d_varset,___G_c_23_proc_2d_body_2d_live_2d_varset)
___DEF_OLD_SYM_GLO(___S_c_23_proc_2d_info_2d__3e_jump_2d_state,___G_c_23_proc_2d_info_2d__3e_jump_2d_state)
@@ -10927,6 +10985,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_return_2d_poll,___G_c_23_return_2d_poll)
___DEF_OLD_SYM_GLO(___S_c_23_reverse_2d_append_21_,___G_c_23_reverse_2d_append_21_)
___DEF_OLD_SYM_GLO(___S_c_23_run_2d_time_2d_binding_3f_,___G_c_23_run_2d_time_2d_binding_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_run_2d_time_2d_bindings_2d_sym,___G_c_23_run_2d_time_2d_bindings_2d_sym)
+___DEF_OLD_SYM_GLO(___S_c_23_runtime_2d_system,___G_c_23_runtime_2d_system)
___DEF_OLD_SYM_GLO(___S_c_23_s16vect_2d__3e_list,___G_c_23_s16vect_2d__3e_list)
___DEF_OLD_SYM_GLO(___S_c_23_s16vect_2d_length,___G_c_23_s16vect_2d_length)
___DEF_OLD_SYM_GLO(___S_c_23_s16vect_2d_ref,___G_c_23_s16vect_2d_ref)
@@ -11000,6 +11059,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_source_2d__3e_expression,___G_c_23_source_2d__3e_ex
___DEF_OLD_SYM_GLO(___S_c_23_source_2d__3e_parms,___G_c_23_source_2d__3e_parms)
___DEF_OLD_SYM_GLO(___S_c_23_source_2d_code,___G_c_23_source_2d_code)
___DEF_OLD_SYM_GLO(___S_c_23_source_2d_locat,___G_c_23_source_2d_locat)
+___DEF_OLD_SYM_GLO(___S_c_23_sp_2d_adjust,___G_c_23_sp_2d_adjust)
___DEF_OLD_SYM_GLO(___S_c_23_specialize_2d_app,___G_c_23_specialize_2d_app)
___DEF_OLD_SYM_GLO(___S_c_23_specialize_2d_proc,___G_c_23_specialize_2d_proc)
___DEF_OLD_SYM_GLO(___S_c_23_standard_2d_binding_3f_,___G_c_23_standard_2d_binding_3f_)
@@ -11440,8 +11500,12 @@ ___DEF_OLD_SYM_GLO(___S_c_23_target_2d_dump,___G_c_23_target_2d_dump)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_dump_2d_set_21_,___G_c_23_target_2d_dump_2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_end_21_,___G_c_23_target_2d_end_21_)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_end_21__2d_set_21_,___G_c_23_target_2d_end_21__2d_set_21_)
+___DEF_OLD_SYM_GLO(___S_c_23_target_2d_file_2d_extension,___G_c_23_target_2d_file_2d_extension)
+___DEF_OLD_SYM_GLO(___S_c_23_target_2d_file_2d_extension_2d_set_21_,___G_c_23_target_2d_file_2d_extension_2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_frame_2d_constraints,___G_c_23_target_2d_frame_2d_constraints)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_frame_2d_constraints_2d_set_21_,___G_c_23_target_2d_frame_2d_constraints_2d_set_21_)
+___DEF_OLD_SYM_GLO(___S_c_23_target_2d_generator,___G_c_23_target_2d_generator)
+___DEF_OLD_SYM_GLO(___S_c_23_target_2d_generator_2d_set_21_,___G_c_23_target_2d_generator_2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_get,___G_c_23_target_2d_get)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_jump_2d_info,___G_c_23_target_2d_jump_2d_info)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_jump_2d_info_2d_set_21_,___G_c_23_target_2d_jump_2d_info_2d_set_21_)
@@ -11461,6 +11525,7 @@ ___DEF_OLD_SYM_GLO(___S_c_23_target_2d_task_2d_return,___G_c_23_target_2d_task_2
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_task_2d_return_2d_set_21_,___G_c_23_target_2d_task_2d_return_2d_set_21_)
___DEF_OLD_SYM_GLO(___S_c_23_target_2d_unselect_21_,___G_c_23_target_2d_unselect_21_)
___DEF_OLD_SYM_GLO(___S_c_23_target_2e_dump,___G_c_23_target_2e_dump)
+___DEF_OLD_SYM_GLO(___S_c_23_target_2e_file_2d_extension,___G_c_23_target_2e_file_2d_extension)
___DEF_OLD_SYM_GLO(___S_c_23_target_2e_frame_2d_constraints,___G_c_23_target_2e_frame_2d_constraints)
___DEF_OLD_SYM_GLO(___S_c_23_target_2e_jump_2d_info,___G_c_23_target_2e_jump_2d_info)
___DEF_OLD_SYM_GLO(___S_c_23_target_2e_label_2d_info,___G_c_23_target_2e_label_2d_info)
@@ -11480,6 +11545,9 @@ ___DEF_OLD_SYM_GLO(___S_c_23_trace_2d_unindent,___G_c_23_trace_2d_unindent)
___DEF_OLD_SYM_GLO(___S_c_23_transform_2d_declaration,___G_c_23_transform_2d_declaration)
___DEF_OLD_SYM_GLO(___S_c_23_transform_2d_to_2d_case_3f_,___G_c_23_transform_2d_to_2d_case_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_transitive_2d_closure,___G_c_23_transitive_2d_closure)
+___DEF_OLD_SYM_GLO(___S_c_23_translate_2d_gvm_2d_instr,___G_c_23_translate_2d_gvm_2d_instr)
+___DEF_OLD_SYM_GLO(___S_c_23_translate_2d_gvm_2d_opnd,___G_c_23_translate_2d_gvm_2d_opnd)
+___DEF_OLD_SYM_GLO(___S_c_23_translate_2d_lbl,___G_c_23_translate_2d_lbl)
___DEF_OLD_SYM_GLO(___S_c_23_trivial_3f_,___G_c_23_trivial_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_tst_2d_alt,___G_c_23_tst_2d_alt)
___DEF_OLD_SYM_GLO(___S_c_23_tst_2d_con,___G_c_23_tst_2d_con)
@@ -11516,6 +11584,19 @@ ___DEF_OLD_SYM_GLO(___S_c_23_unbound2_2d_object_3f_,___G_c_23_unbound2_2d_object
___DEF_OLD_SYM_GLO(___S_c_23_unbox_2d_object,___G_c_23_unbox_2d_object)
___DEF_OLD_SYM_GLO(___S_c_23_unicode_2d__3e_character,___G_c_23_unicode_2d__3e_character)
___DEF_OLD_SYM_GLO(___S_c_23_union_2d_sym,___G_c_23_union_2d_sym)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_dump,___G_c_23_univ_2d_dump)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_dump_2d_procs,___G_c_23_univ_2d_dump_2d_procs)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_frame_2d_alignment,___G_c_23_univ_2d_frame_2d_alignment)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_frame_2d_reserve,___G_c_23_univ_2d_frame_2d_reserve)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_jump_2d_info,___G_c_23_univ_2d_jump_2d_info)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_label_2d_info,___G_c_23_univ_2d_label_2d_info)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_nb_2d_arg_2d_regs,___G_c_23_univ_2d_nb_2d_arg_2d_regs)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_nb_2d_gvm_2d_regs,___G_c_23_univ_2d_nb_2d_gvm_2d_regs)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_prim_2d_info,___G_c_23_univ_2d_prim_2d_info)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_prim_2d_proc_2d_add_21_,___G_c_23_univ_2d_prim_2d_proc_2d_add_21_)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_prim_2d_proc_2d_table,___G_c_23_univ_2d_prim_2d_proc_2d_table)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_setup,___G_c_23_univ_2d_setup)
+___DEF_OLD_SYM_GLO(___S_c_23_univ_2d_switch_2d_testable_3f_,___G_c_23_univ_2d_switch_2d_testable_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_unquote_2d_expr_3f_,___G_c_23_unquote_2d_expr_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_unquote_2d_splicing_2d_expr_3f_,___G_c_23_unquote_2d_splicing_2d_expr_3f_)
___DEF_OLD_SYM_GLO(___S_c_23_unquote_2d_splicing_2d_sym,___G_c_23_unquote_2d_splicing_2d_sym)
@@ -11745,7 +11826,7 @@ ___DEF_OLD_SYM_GLO(___S_command_2d_line,___G_command_2d_line)
___DEF_OLD_SYM_GLO(___S_comment,___G_comment)
___DEF_OLD_SYM_GLO(___S_compilation_2d_strategy,___G_compilation_2d_strategy)
___DEF_OLD_SYM_GLO(___S_compile_2d_file,___G_compile_2d_file)
-___DEF_OLD_SYM_GLO(___S_compile_2d_file_2d_to_2d_c,___G_compile_2d_file_2d_to_2d_c)
+___DEF_OLD_SYM_GLO(___S_compile_2d_file_2d_to_2d_target,___G_compile_2d_file_2d_to_2d_target)
___DEF_OLD_SYM_GLO(___S_complex_3f_,___G_complex_3f_)
___DEF_OLD_SYM_GLO(___S_cond,___G_cond)
___DEF_OLD_SYM_GLO(___S_cond_2d_expand,___G_cond_2d_expand)
@@ -12166,6 +12247,7 @@ ___DEF_OLD_SYM_GLO(___S_get_2d_output_2d_vector,___G_get_2d_output_2d_vector)
___DEF_OLD_SYM_GLO(___S_getenv,___G_getenv)
___DEF_OLD_SYM_GLO(___S_gid,___G_gid)
___DEF_OLD_SYM_GLO(___S_glbl,___G_glbl)
+___DEF_OLD_SYM_GLO(___S_glo,___G_glo)
___DEF_OLD_SYM_GLO(___S_gnu,___G_gnu)
___DEF_OLD_SYM_GLO(___S_goto,___G_goto)
___DEF_OLD_SYM_GLO(___S_group,___G_group)
@@ -12297,6 +12379,7 @@ ___DEF_OLD_SYM_GLO(___S_join_2d_timeout_2d_exception,___G_join_2d_timeout_2d_exc
___DEF_OLD_SYM_GLO(___S_join_2d_timeout_2d_exception_2d_arguments,___G_join_2d_timeout_2d_exception_2d_arguments)
___DEF_OLD_SYM_GLO(___S_join_2d_timeout_2d_exception_2d_procedure,___G_join_2d_timeout_2d_exception_2d_procedure)
___DEF_OLD_SYM_GLO(___S_join_2d_timeout_2d_exception_3f_,___G_join_2d_timeout_2d_exception_3f_)
+___DEF_OLD_SYM_GLO(___S_js,___G_js)
___DEF_OLD_SYM_GLO(___S_jump,___G_jump)
___DEF_OLD_SYM_GLO(___S_k,___G_k)
___DEF_OLD_SYM_GLO(___S_keep_2d_alive,___G_keep_2d_alive)
@@ -12613,6 +12696,7 @@ ___DEF_OLD_SYM_GLO(___S_peek_2d_eof_3f_,___G_peek_2d_eof_3f_)
___DEF_OLD_SYM_GLO(___S_peer,___G_peer)
___DEF_OLD_SYM_GLO(___S_permanent_2d_close,___G_permanent_2d_close)
___DEF_OLD_SYM_GLO(___S_permissions,___G_permissions)
+___DEF_OLD_SYM_GLO(___S_php,___G_php)
___DEF_OLD_SYM_GLO(___S_pinpoint_2d_continuation,___G_pinpoint_2d_continuation)
___DEF_OLD_SYM_GLO(___S_pipe_2d_port,___G_pipe_2d_port)
___DEF_OLD_SYM_GLO(___S_point,___G_point)
@@ -12663,6 +12747,7 @@ ___DEF_OLD_SYM_GLO(___S_pseudo_2d_term,___G_pseudo_2d_term)
___DEF_OLD_SYM_GLO(___S_psr,___G_psr)
___DEF_OLD_SYM_GLO(___S_pt_2d_syntax_2d_error,___G_pt_2d_syntax_2d_error)
___DEF_OLD_SYM_GLO(___S_pw_2d_,___G_pw_2d_)
+___DEF_OLD_SYM_GLO(___S_python,___G_python)
___DEF_OLD_SYM_GLO(___S_q,___G_q)
___DEF_OLD_SYM_GLO(___S_qt,___G_qt)
___DEF_OLD_SYM_GLO(___S_quasiquote,___G_quasiquote)
@@ -12796,6 +12881,7 @@ ___DEF_OLD_SYM_GLO(___S_really_2d_exit_3f_,___G_really_2d_exit_3f_)
___DEF_OLD_SYM_GLO(___S_reason,___G_reason)
___DEF_OLD_SYM_GLO(___S_receive,___G_receive)
___DEF_OLD_SYM_GLO(___S_ref_2d_tag,___G_ref_2d_tag)
+___DEF_OLD_SYM_GLO(___S_reg,___G_reg)
___DEF_OLD_SYM_GLO(___S_regular,___G_regular)
___DEF_OLD_SYM_GLO(___S_remainder,___G_remainder)
___DEF_OLD_SYM_GLO(___S_rename_2d_file,___G_rename_2d_file)
@@ -13083,6 +13169,7 @@ ___DEF_OLD_SYM_GLO(___S_stdout,___G_stdout)
___DEF_OLD_SYM_GLO(___S_stdout_2d_redir,___G_stdout_2d_redir)
___DEF_OLD_SYM_GLO(___S_step,___G_step)
___DEF_OLD_SYM_GLO(___S_step_2d_level_2d_set_21_,___G_step_2d_level_2d_set_21_)
+___DEF_OLD_SYM_GLO(___S_stk,___G_stk)
___DEF_OLD_SYM_GLO(___S_str,___G_str)
___DEF_OLD_SYM_GLO(___S_string,___G_string)
___DEF_OLD_SYM_GLO(___S_string_2d__3e_canonical_2d_symbol,___G_string_2d__3e_canonical_2d_symbol)
@@ -13188,6 +13275,7 @@ ___DEF_OLD_SYM_GLO(___S_table_3f_,___G_table_3f_)
___DEF_OLD_SYM_GLO(___S_tail,___G_tail)
___DEF_OLD_SYM_GLO(___S_tail_2d_call,___G_tail_2d_call)
___DEF_OLD_SYM_GLO(___S_tan,___G_tan)
+___DEF_OLD_SYM_GLO(___S_targ,___G_targ)
___DEF_OLD_SYM_GLO(___S_target,___G_target)
___DEF_OLD_SYM_GLO(___S_task,___G_task)
___DEF_OLD_SYM_GLO(___S_task_2d_entry,___G_task_2d_entry)
@@ -13400,6 +13488,7 @@ ___DEF_OLD_SYM_GLO(___S_uninitialized_2d_thread_2d_exception_2d_procedure,___G_u
___DEF_OLD_SYM_GLO(___S_uninitialized_2d_thread_2d_exception_3f_,___G_uninitialized_2d_thread_2d_exception_3f_)
___DEF_OLD_SYM_GLO(___S_uninterned_2d_keyword_3f_,___G_uninterned_2d_keyword_3f_)
___DEF_OLD_SYM_GLO(___S_uninterned_2d_symbol_3f_,___G_uninterned_2d_symbol_3f_)
+___DEF_OLD_SYM_GLO(___S_univ_2d_switch_2d_testable_3f_,___G_univ_2d_switch_2d_testable_3f_)
___DEF_OLD_SYM_GLO(___S_unknown,___G_unknown)
___DEF_OLD_SYM_GLO(___S_unknown_2d_keyword_2d_argument_2d_exception,___G_unknown_2d_keyword_2d_argument_2d_exception)
___DEF_OLD_SYM_GLO(___S_unknown_2d_keyword_2d_argument_2d_exception_2d_arguments,___G_unknown_2d_keyword_2d_argument_2d_exception_2d_arguments)
View
681 gsc/_gsclib.c
@@ -31,7 +31,7 @@
(
" _gsclib"
"##compile-file"
-"##compile-file-to-c"
+"##compile-file-to-target"
"##compile-options-normalize"
"##gambc-cc"
"##link-flat"
@@ -42,7 +42,7 @@
"##c-code"
"c#make-global-environment"
"compile-file"
-"compile-file-to-c"
+"compile-file-to-target"
"link-flat"
"link-incremental"
)
@@ -91,6 +91,7 @@
"c#targ-c-file-extensions"
"c#targ-linker"
"c#targ-preferred-c-file-extension"
+"c#target.file-extension"
"error"
"open-process"
)
@@ -104,11 +105,11 @@
#define ___SCRIPT_LINE 0
#define ___SYM_COUNT 5
#define ___KEY_COUNT 15
-#define ___GLO_COUNT 60
+#define ___GLO_COUNT 61
#define ___SUP_COUNT 14
#define ___SUB_COUNT 46
-#define ___LBL_COUNT 223
-#define ___OFD_COUNT 13
+#define ___LBL_COUNT 225
+#define ___OFD_COUNT 14
#include "gambit.h"
___NEED_SYM(___S_dyn)
@@ -142,7 +143,7 @@ ___NEED_GLO(___G__23__23_build_2d_executable)
___NEED_GLO(___G__23__23_c_2d_code)
___NEED_GLO(___G__23__23_close_2d_port)
___NEED_GLO(___G__23__23_compile_2d_file)
-___NEED_GLO(___G__23__23_compile_2d_file_2d_to_2d_c)
+___NEED_GLO(___G__23__23_compile_2d_file_2d_to_2d_target)
___NEED_GLO(___G__23__23_compile_2d_options_2d_normalize)
___NEED_GLO(___G__23__23_cte_2d_macro_2d_descr)
___NEED_GLO(___G__23__23_cte_2d_macro_2d_name)
@@ -187,8 +188,9 @@ ___NEED_GLO(___G_c_23_make_2d_global_2d_environment)
___NEED_GLO(___G_c_23_targ_2d_c_2d_file_2d_extensions)
___NEED_GLO(___G_c_23_targ_2d_linker)
___NEED_GLO(___G_c_23_targ_2d_preferred_2d_c_2d_file_2d_extension)
+___NEED_GLO(___G_c_23_target_2e_file_2d_extension)
___NEED_GLO(___G_compile_2d_file)
-___NEED_GLO(___G_compile_2d_file_2d_to_2d_c)
+___NEED_GLO(___G_compile_2d_file_2d_to_2d_target)
___NEED_GLO(___G_error)
___NEED_GLO(___G_link_2d_flat)
___NEED_GLO(___G_link_2d_incremental)
@@ -225,14 +227,14 @@ ___DEF_GLO(0," _gsclib")
___DEF_GLO(1,"##build-executable")
___DEF_GLO(2,"##c-code")
___DEF_GLO(3,"##compile-file")
-___DEF_GLO(4,"##compile-file-to-c")
+___DEF_GLO(4,"##compile-file-to-target")
___DEF_GLO(5,"##compile-options-normalize")
___DEF_GLO(6,"##gambc-cc")
___DEF_GLO(7,"##link-flat")
___DEF_GLO(8,"##link-incremental")
___DEF_GLO(9,"c#make-global-environment")
___DEF_GLO(10,"compile-file")
-___DEF_GLO(11,"compile-file-to-c")
+___DEF_GLO(11,"compile-file-to-target")
___DEF_GLO(12,"link-flat")
___DEF_GLO(13,"link-incremental")
___DEF_GLO(14,"##append")
@@ -281,8 +283,9 @@ ___DEF_GLO(55,"c#targ-c-file-extensions")
___DEF_GLO(56,"c#targ-linker")
___DEF_GLO(57,"c#targ-preferred-c-file-extension")
-___DEF_GLO(58,"error")
-___DEF_GLO(59,"open-process")
+___DEF_GLO(58,"c#target.file-extension")
+___DEF_GLO(59,"error")
+___DEF_GLO(60,"open-process")
___END_GLO
___DEF_SUB_VEC(___X0,6)
@@ -565,32 +568,32 @@ ___DEF_M_HLBL(___L1__23__23_compile_2d_options_2d_normalize)
___DEF_M_HLBL(___L2__23__23_compile_2d_options_2d_normalize)
___DEF_M_HLBL(___L3__23__23_compile_2d_options_2d_normalize)
___DEF_M_HLBL_INTRO
-___DEF_M_HLBL(___L0_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L1_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L2_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L3_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L4_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L5_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L6_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L7_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L8_compile_2d_file_2d_to_2d_c)
+___DEF_M_HLBL(___L0_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L1_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L2_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L3_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L4_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L5_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L6_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L7_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L8_compile_2d_file_2d_to_2d_target)
___DEF_M_HLBL_INTRO
-___DEF_M_HLBL(___L0__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L1__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L2__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L3__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L4__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L5__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L6__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L7__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L8__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L9__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L10__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L11__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L12__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L13__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L14__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_M_HLBL(___L15__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_M_HLBL(___L0__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L1__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L2__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L3__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L4__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L5__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L6__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L7__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L8__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L9__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L10__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L11__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L12__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L13__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L14__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_M_HLBL(___L15__23__23_compile_2d_file_2d_to_2d_target)
___DEF_M_HLBL_INTRO
___DEF_M_HLBL(___L0_compile_2d_file)
___DEF_M_HLBL(___L1_compile_2d_file)
@@ -641,6 +644,8 @@ ___DEF_M_HLBL(___L33__23__23_compile_2d_file)
___DEF_M_HLBL(___L34__23__23_compile_2d_file)
___DEF_M_HLBL(___L35__23__23_compile_2d_file)
___DEF_M_HLBL(___L36__23__23_compile_2d_file)
+___DEF_M_HLBL(___L37__23__23_compile_2d_file)
+___DEF_M_HLBL(___L38__23__23_compile_2d_file)
___DEF_M_HLBL_INTRO
___DEF_M_HLBL(___L0__23__23_build_2d_executable)
___DEF_M_HLBL(___L1__23__23_build_2d_executable)
@@ -933,7 +938,7 @@ ___END_P_SW
___END_P_COD
#undef ___PH_PROC
-#define ___PH_PROC ___H_compile_2d_file_2d_to_2d_c
+#define ___PH_PROC ___H_compile_2d_file_2d_to_2d_target
#undef ___PH_LBL0
#define ___PH_LBL0 22
#undef ___PD_ALL
@@ -945,39 +950,39 @@ ___END_P_COD
___BEGIN_P_COD
___BEGIN_P_HLBL
___DEF_P_HLBL_INTRO
-___DEF_P_HLBL(___L0_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L1_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L2_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L3_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L4_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L5_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L6_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L7_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L8_compile_2d_file_2d_to_2d_c)
+___DEF_P_HLBL(___L0_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L1_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L2_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L3_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L4_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L5_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L6_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L7_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L8_compile_2d_file_2d_to_2d_target)
___END_P_HLBL
___BEGIN_P_SW
-___DEF_SLBL(0,___L0_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(0,___L0_compile_2d_file_2d_to_2d_target)
___IF_NARGS_EQ(1,___PUSH(___R1) ___PUSH(___ABSENT) ___SET_R1(___ABSENT) ___SET_R2(___ABSENT) ___SET_R3(
___NUL))
___GET_REST_KEY(0,1,0,3,___SUB(0))
-___DEF_GLBL(___L_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L_compile_2d_file_2d_to_2d_target)
___IF(___NOT(___STRINGP(___STK(-1))))
- ___GOTO(___L20_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L20_compile_2d_file_2d_to_2d_target)
___END_IF
___IF(___NOT(___EQP(___STK(0),___ABSENT)))
- ___GOTO(___L9_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L9_compile_2d_file_2d_to_2d_target)
___END_IF
___SET_R3(___NUL)
___IF(___EQP(___R1,___ABSENT))
- ___GOTO(___L10_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L10_compile_2d_file_2d_to_2d_target)
___END_IF
- ___GOTO(___L11_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L9_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L11_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L9_compile_2d_file_2d_to_2d_target)
___SET_R3(___STK(0))
___IF(___NOT(___EQP(___R1,___ABSENT)))
- ___GOTO(___L11_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L11_compile_2d_file_2d_to_2d_target)
___END_IF
-___DEF_GLBL(___L10_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L10_compile_2d_file_2d_to_2d_target)
___SET_STK(0,___R0)
___SET_STK(1,___R2)
___SET_STK(2,___R3)
@@ -985,73 +990,73 @@ ___DEF_GLBL(___L10_compile_2d_file_2d_to_2d_c)
___SET_R0(___LBL(2))
___ADJFP(6)
___POLL(1)
-___DEF_SLBL(1,___L1_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(1,___L1_compile_2d_file_2d_to_2d_target)
___JUMPGLONOTSAFE(___SET_NARGS(1),42,___G__23__23_path_2d_normalize)
-___DEF_SLBL(2,___L2_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(2,___L2_compile_2d_file_2d_to_2d_target)
___SET_R0(___LBL(3))
___JUMPGLONOTSAFE(___SET_NARGS(1),39,___G__23__23_path_2d_directory)
-___DEF_SLBL(3,___L3_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(3,___L3_compile_2d_file_2d_to_2d_target)
___SET_R3(___STK(-4))
___SET_R2(___STK(-5))
___SET_R0(___STK(-6))
___ADJFP(-6)
___IF(___EQP(___R2,___ABSENT))
- ___GOTO(___L12_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L12_compile_2d_file_2d_to_2d_target)
___END_IF
- ___GOTO(___L16_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L11_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L16_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L11_compile_2d_file_2d_to_2d_target)
___IF(___NOT(___EQP(___R2,___ABSENT)))
- ___GOTO(___L16_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L16_compile_2d_file_2d_to_2d_target)
___END_IF
-___DEF_GLBL(___L12_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L12_compile_2d_file_2d_to_2d_target)
___SET_R2(___FAL)
___IF(___NOT(___NULLP(___R3)))
- ___GOTO(___L17_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L17_compile_2d_file_2d_to_2d_target)
___END_IF
-___DEF_GLBL(___L13_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L13_compile_2d_file_2d_to_2d_target)
___IF(___NOT(___STRINGP(___R1)))
- ___GOTO(___L19_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L19_compile_2d_file_2d_to_2d_target)
___END_IF
___IF(___NOT(___FALSEP(___R2)))
- ___GOTO(___L15_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L15_compile_2d_file_2d_to_2d_target)
___END_IF
-___DEF_GLBL(___L14_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L14_compile_2d_file_2d_to_2d_target)
___SET_STK(0,___R3)
___SET_R3(___R2)
___SET_R2(___R1)
___SET_R1(___STK(0))
___POLL(4)
-___DEF_SLBL(4,___L4_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(4,___L4_compile_2d_file_2d_to_2d_target)
___ADJFP(-1)
- ___JUMPINT(___SET_NARGS(4),___PRC(32),___L__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L15_compile_2d_file_2d_to_2d_c)
+ ___JUMPINT(___SET_NARGS(4),___PRC(32),___L__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L15_compile_2d_file_2d_to_2d_target)
___IF(___STRINGP(___R2))
- ___GOTO(___L14_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L14_compile_2d_file_2d_to_2d_target)
___END_IF
___SET_R1(___SUB(1))
___POLL(5)
-___DEF_SLBL(5,___L5_compile_2d_file_2d_to_2d_c)
- ___GOTO(___L18_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L16_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(5,___L5_compile_2d_file_2d_to_2d_target)
+ ___GOTO(___L18_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L16_compile_2d_file_2d_to_2d_target)
___IF(___NULLP(___R3))
- ___GOTO(___L13_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L13_compile_2d_file_2d_to_2d_target)
___END_IF
-___DEF_GLBL(___L17_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L17_compile_2d_file_2d_to_2d_target)
___IF(___PAIRP(___R3))
- ___GOTO(___L13_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L13_compile_2d_file_2d_to_2d_target)
___END_IF
___SET_R1(___SUB(2))
___POLL(6)
-___DEF_SLBL(6,___L6_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L18_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(6,___L6_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L18_compile_2d_file_2d_to_2d_target)
___ADJFP(-2)
- ___JUMPGLONOTSAFE(___SET_NARGS(1),58,___G_error)
-___DEF_GLBL(___L19_compile_2d_file_2d_to_2d_c)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),59,___G_error)
+___DEF_GLBL(___L19_compile_2d_file_2d_to_2d_target)
___SET_R1(___SUB(3))
___POLL(7)
-___DEF_SLBL(7,___L7_compile_2d_file_2d_to_2d_c)
- ___GOTO(___L18_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L20_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(7,___L7_compile_2d_file_2d_to_2d_target)
+ ___GOTO(___L18_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L20_compile_2d_file_2d_to_2d_target)
___SET_STK(0,___STK(-1))
___SET_STK(-1,___FIX(1L))
___SET_STK(1,___STK(0))
@@ -1060,133 +1065,142 @@ ___DEF_GLBL(___L20_compile_2d_file_2d_to_2d_c)
___SET_R1(___LBL(0))
___ADJFP(1)
___POLL(8)
-___DEF_SLBL(8,___L8_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(8,___L8_compile_2d_file_2d_to_2d_target)
___ADJFP(-1)
___JUMPGLONOTSAFE(___SET_NARGS(5),28,___G__23__23_fail_2d_check_2d_string)
___END_P_SW
___END_P_COD
#undef ___PH_PROC
-#define ___PH_PROC ___H__23__23_compile_2d_file_2d_to_2d_c
+#define ___PH_PROC ___H__23__23_compile_2d_file_2d_to_2d_target
#undef ___PH_LBL0
#define ___PH_LBL0 32
#undef ___PD_ALL
-#define ___PD_ALL ___D_FP ___D_R0 ___D_R1 ___D_R2 ___D_R3 ___D_R4
+#define ___PD_ALL ___D_HEAP ___D_FP ___D_R0 ___D_R1 ___D_R2 ___D_R3 ___D_R4
#undef ___PR_ALL
-#define ___PR_ALL ___R_FP ___R_R0 ___R_R1 ___R_R2 ___R_R3 ___R_R4
+#define ___PR_ALL ___R_HEAP ___R_FP ___R_R0 ___R_R1 ___R_R2 ___R_R3 ___R_R4
#undef ___PW_ALL
-#define ___PW_ALL ___W_FP ___W_R0 ___W_R1 ___W_R2 ___W_R3 ___W_R4
+#define ___PW_ALL ___W_HEAP ___W_FP ___W_R0 ___W_R1 ___W_R2 ___W_R3 ___W_R4
___BEGIN_P_COD
___BEGIN_P_HLBL
___DEF_P_HLBL_INTRO
-___DEF_P_HLBL(___L0__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L1__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L2__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L3__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L4__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L5__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L6__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L7__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L8__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L9__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L10__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L11__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L12__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L13__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L14__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_P_HLBL(___L15__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_P_HLBL(___L0__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L1__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L2__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L3__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L4__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L5__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L6__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L7__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L8__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L9__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L10__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L11__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L12__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L13__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L14__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_P_HLBL(___L15__23__23_compile_2d_file_2d_to_2d_target)
___END_P_HLBL
___BEGIN_P_SW
-___DEF_SLBL(0,___L0__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(0,___L0__23__23_compile_2d_file_2d_to_2d_target)
___IF_NARGS_EQ(4,___NOTHING)
___WRONG_NARGS(0,4,0,0)
-___DEF_GLBL(___L__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_GLBL(___L__23__23_compile_2d_file_2d_to_2d_target)
___SET_STK(1,___R0)
___SET_STK(2,___R2)
___SET_STK(3,___R3)
___SET_R0(___LBL(2))
___ADJFP(7)
___POLL(1)
-___DEF_SLBL(1,___L1__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(1,___L1__23__23_compile_2d_file_2d_to_2d_target)
___JUMPINT(___SET_NARGS(1),___PRC(17),___L__23__23_compile_2d_options_2d_normalize)
-___DEF_SLBL(2,___L2__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(2,___L2__23__23_compile_2d_file_2d_to_2d_target)
___SET_STK(-3,___R1)
___SET_R1(___STK(-5))
___SET_R0(___LBL(3))
___JUMPGLONOTSAFE(___SET_NARGS(1),42,___G__23__23_path_2d_normalize)
-___DEF_SLBL(3,___L3__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(3,___L3__23__23_compile_2d_file_2d_to_2d_target)
___SET_STK(-5,___R1)
___SET_R0(___LBL(4))
___JUMPGLONOTSAFE(___SET_NARGS(1),45,___G__23__23_path_2d_strip_2d_trailing_2d_directory_2d_separator)
-___DEF_SLBL(4,___L4__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(4,___L4__23__23_compile_2d_file_2d_to_2d_target)
___SET_R2(___R1)
___SET_R1(___STK(-5))
___SET_R0(___LBL(5))
___JUMPPRM(___SET_NARGS(2),___PRM(27,___G__23__23_equal_3f_))
-___DEF_SLBL(5,___L5__23__23_compile_2d_file_2d_to_2d_c)
- ___IF(___FALSEP(___R1))
- ___GOTO(___L20__23__23_compile_2d_file_2d_to_2d_c)
- ___END_IF
- ___SET_R1(___STK(-5))
- ___GOTO(___L16__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_SLBL(6,___L6__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L16__23__23_compile_2d_file_2d_to_2d_c)
- ___SET_STK(-5,___R1)
- ___SET_STK(1,___STK(-7))
+___DEF_SLBL(5,___L5__23__23_compile_2d_file_2d_to_2d_target)
+ ___SET_R1(___BOOLEAN(___FALSEP(___R1)))
+ ___SET_STK(-2,___ALLOC_CLO(3))
+ ___BEGIN_SETUP_CLO(3,___STK(-2),10)
+ ___ADD_CLO_ELEM(0,___STK(-5))
+ ___ADD_CLO_ELEM(1,___STK(-7))
+ ___ADD_CLO_ELEM(2,___R1)
+ ___END_SETUP_CLO(3)
+ ___SET_STK(-1,___R1)
___SET_R1(___STK(-4))
- ___ADJFP(1)
+ ___ADJFP(-1)
+ ___CHECK_HEAP(6,4096)
+___DEF_SLBL(6,___L6__23__23_compile_2d_file_2d_to_2d_target)
___IF(___NOT(___FALSEP(___R1)))
- ___GOTO(___L17__23__23_compile_2d_file_2d_to_2d_c)
+ ___GOTO(___L18__23__23_compile_2d_file_2d_to_2d_target)
+ ___END_IF
+ ___IF(___NOT(___FALSEP(___STK(0))))
+ ___GOTO(___L16__23__23_compile_2d_file_2d_to_2d_target)
___END_IF
+ ___SET_R1(___STK(-4))
+ ___GOTO(___L17__23__23_compile_2d_file_2d_to_2d_target)
+___DEF_GLBL(___L16__23__23_compile_2d_file_2d_to_2d_target)
___SET_R1(___STK(-6))
+___DEF_GLBL(___L17__23__23_compile_2d_file_2d_to_2d_target)
___SET_R0(___LBL(7))
- ___ADJFP(3)
+ ___ADJFP(5)
___JUMPGLONOTSAFE(___SET_NARGS(1),44,___G__23__23_path_2d_strip_2d_extension)
-___DEF_SLBL(7,___L7__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(7,___L7__23__23_compile_2d_file_2d_to_2d_target)
___SET_R0(___LBL(8))
___JUMPGLONOTSAFE(___SET_NARGS(1),43,___G__23__23_path_2d_strip_2d_directory)
-___DEF_SLBL(8,___L8__23__23_compile_2d_file_2d_to_2d_c)
- ___ADJFP(-3)
-___DEF_GLBL(___L17__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(8,___L8__23__23_compile_2d_file_2d_to_2d_target)
+ ___ADJFP(-5)
+___DEF_GLBL(___L18__23__23_compile_2d_file_2d_to_2d_target)
___SET_R3(___R1)
- ___SET_R2(___STK(-6))
- ___SET_R1(___STK(-4))
- ___SET_R0(___LBL(9))
+ ___SET_R2(___STK(-1))
+ ___SET_R1(___STK(-2))
+ ___SET_R0(___STK(-5))
+ ___POLL(9)
+___DEF_SLBL(9,___L9__23__23_compile_2d_file_2d_to_2d_target)
+ ___ADJFP(-6)
___JUMPGLONOTSAFE(___SET_NARGS(4),52,___G_c_23_cf)
-___DEF_SLBL(9,___L9__23__23_compile_2d_file_2d_to_2d_c)
- ___IF(___NOT(___FALSEP(___R1)))
- ___GOTO(___L18__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(10,___L10__23__23_compile_2d_file_2d_to_2d_target)
+ ___IF_NARGS_EQ(0,___NOTHING)
+ ___WRONG_NARGS(10,0,0,0)
+ ___IF(___FALSEP(___CLO(___R4,3)))
+ ___GOTO(___L19__23__23_compile_2d_file_2d_to_2d_target)
___END_IF
- ___POLL(10)
-___DEF_SLBL(10,___L10__23__23_compile_2d_file_2d_to_2d_c)
- ___GOTO(___L19__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L18__23__23_compile_2d_file_2d_to_2d_c)
- ___SET_R1(___STK(-5))
- ___POLL(11)
-___DEF_SLBL(11,___L11__23__23_compile_2d_file_2d_to_2d_c)
-___DEF_GLBL(___L19__23__23_compile_2d_file_2d_to_2d_c)
- ___ADJFP(-8)
- ___JUMPPRM(___NOTHING,___STK(2))
-___DEF_GLBL(___L20__23__23_compile_2d_file_2d_to_2d_c)
- ___SET_R1(___STK(-7))
+ ___SET_STK(1,___R0)
+ ___SET_STK(2,___R4)
+ ___SET_R1(___CLO(___R4,2))
___SET_R0(___LBL(12))
+ ___ADJFP(8)
+ ___POLL(11)
+___DEF_SLBL(11,___L11__23__23_compile_2d_file_2d_to_2d_target)
___JUMPGLONOTSAFE(___SET_NARGS(1),44,___G__23__23_path_2d_strip_2d_extension)
-___DEF_SLBL(12,___L12__23__23_compile_2d_file_2d_to_2d_c)
+___DEF_SLBL(12,___L12__23__23_compile_2d_file_2d_to_2d_target)
___SET_R0(___LBL(13))
___JUMPGLONOTSAFE(___SET_NARGS(1),43,___G__23__23_path_2d_strip_2d_directory)
-___DEF_SLBL(13,___L13__23__23_compile_2d_file_2d_to_2d_c)
- ___SET_R2(___STK(-5))
+___DEF_SLBL(13,___L13__23__23_compile_2d_file_2d_to_2d_target)
+ ___SET_R2(___CLO(___STK(-6),1))
___SET_R0(___LBL(14))
+ ___ADJFP(-4)
___JUMPGLONOTSAFE(___SET_NARGS(2),40,___G__23__23_path_2d_expand)
-___DEF_SLBL(14,___L14__23__23_compile_2d_file_2d_to_2d_c)
- ___SET_STK(-5,___R1)
- ___SET_R0(___LBL(15))
- ___JUMPGLONOTSAFE(___SET_NARGS(0),57,___G_c_23_targ_2d_preferred_2d_c_2d_file_2d_extension)
-___DEF_SLBL(15,___L15__23__23_compile_2d_file_2d_to_2d_c)
- ___SET_R2(___R1)
- ___SET_R0(___LBL(6))
- ___SET_R1(___STK(-5))
+___DEF_SLBL(14,___L14__23__23_compile_2d_file_2d_to_2d_target)
+ ___SET_R2(___GLO(58,___G_c_23_target_2e_file_2d_extension))
+ ___SET_R0(___STK(-3))
+ ___POLL(15)
+___DEF_SLBL(15,___L15__23__23_compile_2d_file_2d_to_2d_target)
+ ___ADJFP(-4)
___JUMPGLONOTSAFE(___SET_NARGS(2),49,___G__23__23_string_2d_append)
+___DEF_GLBL(___L19__23__23_compile_2d_file_2d_to_2d_target)
+ ___SET_R1(___CLO(___R4,1))
+ ___JUMPPRM(___NOTHING,___R0)
___END_P_SW
___END_P_COD
@@ -1316,7 +1330,7 @@ ___DEF_GLBL(___L19_compile_2d_file)
___DEF_SLBL(6,___L6_compile_2d_file)
___DEF_GLBL(___L20_compile_2d_file)
___ADJFP(-4)
- ___JUMPGLONOTSAFE(___SET_NARGS(1),58,___G_error)
+ ___JUMPGLONOTSAFE(___SET_NARGS(1),59,___G_error)
___DEF_GLBL(___L21_compile_2d_file)
___SET_R1(___SUB(10))
___POLL(7)
@@ -1415,6 +1429,8 @@ ___DEF_P_HLBL(___L33__23__23_compile_2d_file)
___DEF_P_HLBL(___L34__23__23_compile_2d_file)
___DEF_P_HLBL(___L35__23__23_compile_2d_file)
___DEF_P_HLBL(___L36__23__23_compile_2d_file)
+___DEF_P_HLBL(___L37__23__23_compile_2d_file)
+___DEF_P_HLBL(___L38__23__23_compile_2d_file)
___END_P_HLBL
___BEGIN_P_SW
___DEF_SLBL(0,___L0__23__23_compile_2d_file)
@@ -1439,16 +1455,16 @@ ___DEF_SLBL(2,___L2__23__23_compile_2d_file)
___JUMPGLONOTSAFE(___SET_NARGS(2),17,___G__23__23_assq)
___DEF_SLBL(3,___L3__23__23_compile_2d_file)
___IF(___FALSEP(___R1))
- ___GOTO(___L56__23__23_compile_2d_file)
+ ___GOTO(___L58__23__23_compile_2d_file)
___END_IF
___SET_R1(___SYM(3,___S_obj))
- ___GOTO(___L37__23__23_compile_2d_file)
+ ___GOTO(___L39__23__23_compile_2d_file)
___DEF_SLBL(4,___L4__23__23_compile_2d_file)
___IF(___FALSEP(___R1))
- ___GOTO(___L55__23__23_compile_2d_file)