summaryrefslogtreecommitdiff
path: root/gcc/melt/generated/warmelt-macro+01.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/melt/generated/warmelt-macro+01.c')
-rw-r--r--gcc/melt/generated/warmelt-macro+01.c85
1 files changed, 85 insertions, 0 deletions
diff --git a/gcc/melt/generated/warmelt-macro+01.c b/gcc/melt/generated/warmelt-macro+01.c
index e952cda3163..e372d1b3115 100644
--- a/gcc/melt/generated/warmelt-macro+01.c
+++ b/gcc/melt/generated/warmelt-macro+01.c
@@ -2788,6 +2788,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V20*/ meltfptr[19]), (3),
( /*_.REPR__V3*/ meltfptr[2]), "SRCGEN_REPR");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V20*/ meltfptr[19]);
+ ;
/*_.GENDEV__V19*/ meltfptr[18] = /*_.INST__V20*/ meltfptr[19];;
{
@@ -3496,6 +3499,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V23*/ meltfptr[22]), (2),
( /*_.XARGTUP__V19*/ meltfptr[18]), "SARGOP_ARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V23*/ meltfptr[22]);
+ ;
/*_.INST___V22*/ meltfptr[20] = /*_.INST__V23*/ meltfptr[22];;
/*^compute */
/*_.LET___V14*/ meltfptr[12] = /*_.INST___V22*/ meltfptr[20];;
@@ -4327,6 +4333,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V35*/ meltfptr[34]), (2),
( /*_.ARGTUP__V31*/ meltfptr[30]), "SARGOP_ARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V35*/ meltfptr[34]);
+ ;
/*_.RES__V34*/ meltfptr[32] = /*_.INST__V35*/ meltfptr[34];;
#if MELT_HAVE_DEBUG
@@ -5540,6 +5549,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V44*/ meltfptr[43]), (3),
( /*_.FLD__V2*/ meltfptr[1]), "SUGET_FIELD");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V44*/ meltfptr[43]);
+ ;
/*_.RES__V43*/ meltfptr[39] = /*_.INST__V44*/ meltfptr[43];;
#if MELT_HAVE_DEBUG
@@ -6926,6 +6938,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V66*/ meltfptr[65]), (5),
( /*_.BODYTUP__V28*/ meltfptr[27]), "SCITER_BODY");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V66*/ meltfptr[65]);
+ ;
/*_.SCITER__V65*/ meltfptr[35] = /*_.INST__V66*/ meltfptr[65];;
#if MELT_HAVE_DEBUG
@@ -8307,6 +8322,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V46*/ meltfptr[32]), (2),
( /*_.XARGTUP__V28*/ meltfptr[27]), "SARGOP_ARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V46*/ meltfptr[32]);
+ ;
/*_.RES__V45*/ meltfptr[31] = /*_.INST__V46*/ meltfptr[32];;
#if MELT_HAVE_DEBUG
@@ -9539,6 +9557,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V45*/ meltfptr[44]), (2),
( /*_.XARGTUP__V29*/ meltfptr[28]), "SARGOP_ARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V45*/ meltfptr[44]);
+ ;
/*_.RES__V44*/ meltfptr[40] = /*_.INST__V45*/ meltfptr[44];;
#if MELT_HAVE_DEBUG
@@ -16578,6 +16599,10 @@ lab_endgetargs:;
melt_putfield_object
(( /*_.INST__V173*/ meltfptr[151]), (3), ( /*_.SOPER__V19*/ meltfptr[18]), "SLAZYMACRO_OPER");
;
+ /*^touch */
+ meltgc_touch
+ ( /*_.INST__V173*/ meltfptr[151]);
+ ;
/*_.LAZYMAC__V172*/
meltfptr
[121]
@@ -18822,6 +18847,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V24*/ meltfptr[23]), (2),
( /*_.XARGTUP__V22*/ meltfptr[21]), "SARGOP_ARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V24*/ meltfptr[23]);
+ ;
/*_.INST___V23*/ meltfptr[22] = /*_.INST__V24*/ meltfptr[23];;
/*^compute */
/*_.LET___V17*/ meltfptr[15] = /*_.INST___V23*/ meltfptr[22];;
@@ -19927,6 +19955,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V19*/ meltfptr[18]), (0),
( /*_.PAIRS__V2*/ meltfptr[1]), "REFERENCED_VALUE");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V19*/ meltfptr[18]);
+ ;
/*_.PAIRCONT__V18*/ meltfptr[17] = /*_.INST__V19*/ meltfptr[18];;
MELT_LOCATION ("warmelt-macro.melt:1470:/ quasiblock");
@@ -23500,6 +23531,9 @@ lab_endgetargs:;
( /*_.PATS__V60*/ meltfptr[59]),
"SPAC_OUTARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V74*/ meltfptr[73]);
+ ;
/*_.PCOMP__V73*/ meltfptr[72] =
/*_.INST__V74*/ meltfptr[73];;
@@ -24680,6 +24714,9 @@ lab_endgetargs:;
meltfptr[38]),
"SPAC_OUTARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V115*/ meltfptr[114]);
+ ;
/*_.PCOMP__V114*/ meltfptr[113] =
/*_.INST__V115*/ meltfptr[114];;
@@ -25524,6 +25561,10 @@ lab_endgetargs:;
( /*_.INST__V146*/ meltfptr[74])) == MELTOBMAG_OBJECT);
melt_putfield_object (( /*_.INST__V146*/ meltfptr[74]), (8), ( /*_.PATS__V132*/ meltfptr[38]), "SPAC_OUTARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V146*/
+ meltfptr[74]);
+ ;
/*_.PCOMP__V145*/ meltfptr[75] =
/*_.INST__V146*/ meltfptr[74];;
MELT_LOCATION
@@ -26764,6 +26805,10 @@ lab_endgetargs:;
melt_magic_discr ((melt_ptr_t) ( /*_.INST__V184*/ meltfptr[71])) == MELTOBMAG_OBJECT);
melt_putfield_object (( /*_.INST__V184*/ meltfptr[71]), (8), ( /*_.PATS__V170*/ meltfptr[116]), "SPAC_OUTARGS");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V184*/
+ meltfptr[71]);
+ ;
/*_.PCOMP__V183*/ meltfptr[72] =
/*_.INST__V184*/
meltfptr[71];;
@@ -27916,6 +27961,9 @@ lab_endgetargs:;
( /*_.EXP__V28*/ meltfptr[27]),
"SPAT_CONSTX");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V30*/ meltfptr[29]);
+ ;
/*_.PAT__V29*/ meltfptr[28] = /*_.INST__V30*/ meltfptr[29];;
#if MELT_HAVE_DEBUG
@@ -28213,6 +28261,9 @@ lab_endgetargs:;
( /*_.MAKE_INTEGERBOX__V43*/
meltfptr[42]), "SPATVAR_NBOCC");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V45*/ meltfptr[44]);
+ ;
/*_.JOKP__V44*/ meltfptr[43] =
/*_.INST__V45*/ meltfptr[44];;
@@ -28705,6 +28756,10 @@ lab_endgetargs:;
meltfptr[64]), (4),
( /*_.MAKE_INTEGERBOX__V63*/ meltfptr[56]), "SPATVAR_NBOCC");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V65*/
+ meltfptr[64]);
+ ;
/*_.NEWPAVR__V64*/ meltfptr[57] =
/*_.INST__V65*/ meltfptr[64];;
@@ -29460,6 +29515,9 @@ lab_endgetargs:;
( /*_.SEXPR__V2*/ meltfptr[1]),
"SPAT_CONSTX");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V87*/ meltfptr[43]);
+ ;
/*_.PAT__V86*/ meltfptr[65] = /*_.INST__V87*/ meltfptr[43];;
#if MELT_HAVE_DEBUG
@@ -32159,6 +32217,9 @@ lab_endgetargs:;
( /*_.ARGTYPE__V11*/
meltfptr[5]), "FBIND_TYPE");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V52*/ meltfptr[38]);
+ ;
/*_.CURBIND__V51*/ meltfptr[42] =
/*_.INST__V52*/ meltfptr[38];;
MELT_LOCATION
@@ -33439,6 +33500,9 @@ lab_endgetargs:;
( /*_.EXPANDER__V3*/ meltfptr[2]),
"MBIND_EXPANSER");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V14*/ meltfptr[13]);
+ ;
/*_.MBIND__V13*/ meltfptr[12] = /*_.INST__V14*/ meltfptr[13];;
MELT_LOCATION ("warmelt-macro.melt:1964:/ checksignal");
MELT_CHECK_SIGNAL ();
@@ -34074,6 +34138,9 @@ lab_endgetargs:;
( /*_.PATEXPANDER__V3*/ meltfptr[2]),
"PATBIND_EXPANSER");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V17*/ meltfptr[16]);
+ ;
/*_.MBIND__V16*/ meltfptr[15] = /*_.INST__V17*/ meltfptr[16];;
MELT_LOCATION ("warmelt-macro.melt:1980:/ checksignal");
MELT_CHECK_SIGNAL ();
@@ -38755,6 +38822,9 @@ lab_endgetargs:;
melt_putfield_object (( /*_.INST__V76*/ meltfptr[75]), (7),
( /*_.EXPLOC__V72*/ meltfptr[64]), "SPRIM_EXPLOC");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V76*/ meltfptr[75]);
+ ;
/*_.SDEFPRI__V75*/ meltfptr[67] = /*_.INST__V76*/ meltfptr[75];;
MELT_LOCATION ("warmelt-macro.melt:2183:/ checksignal");
MELT_CHECK_SIGNAL ();
@@ -38820,6 +38890,9 @@ lab_endgetargs:;
( /*_.ETUPLE__V73*/ meltfptr[65]),
"PRIM_EXPANSION");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V79*/ meltfptr[78]);
+ ;
/*_.PRIMIT__V78*/ meltfptr[77] = /*_.INST__V79*/ meltfptr[78];;
MELT_LOCATION ("warmelt-macro.melt:2189:/ checksignal");
MELT_CHECK_SIGNAL ();
@@ -38868,6 +38941,9 @@ lab_endgetargs:;
( /*_.PRIMIT__V78*/ meltfptr[77]),
"PBIND_PRIMITIVE");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V81*/ meltfptr[80]);
+ ;
/*_.PBIND__V80*/ meltfptr[79] = /*_.INST__V81*/ meltfptr[80];;
/*citerblock FOREACH_IN_MULTIPLE */
{
@@ -40898,6 +40974,9 @@ lab_endgetargs:;
( /*_.EXPAFT__V25*/ meltfptr[24]),
"CITER_EXPAFTER");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V101*/ meltfptr[85]);
+ ;
/*_.CITER__V100*/ meltfptr[73] = /*_.INST__V101*/ meltfptr[85];;
MELT_LOCATION ("warmelt-macro.melt:2321:/ checksignal");
MELT_CHECK_SIGNAL ();
@@ -40936,6 +41015,9 @@ lab_endgetargs:;
( /*_.CITER__V100*/ meltfptr[73]),
"CBIND_CITERATOR");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V103*/ meltfptr[87]);
+ ;
/*_.CITBIND__V102*/ meltfptr[86] = /*_.INST__V103*/ meltfptr[87];;
MELT_LOCATION ("warmelt-macro.melt:2326:/ checksignal");
MELT_CHECK_SIGNAL ();
@@ -41022,6 +41104,9 @@ lab_endgetargs:;
( /*_.AFTLOC__V27*/ meltfptr[26]),
"SCITERDEF_AFTERLOC");
;
+ /*^touch */
+ meltgc_touch ( /*_.INST__V105*/ meltfptr[104]);
+ ;
/*_.SRCIT__V104*/ meltfptr[96] = /*_.INST__V105*/ meltfptr[104];;
/*^compute */
/*_#MULTIPLE_LENGTH__L13*/ meltfnum[12] =