set flags.repeat for repeat element, not repeated element - easier to use in exppp

mpictor · mpictor · commit f1651b0885ee · 2013-09-08T17:45:28.000-04:00
diff --git a/src/express/expparse.y b/src/express/expparse.y
@@ -437,7 +437,7 @@ aggregate_init_body(A) ::= aggregate_init_element(B) TOK_COLON expression(C).
 
     LISTadd_last(A, (Generic)C);
 
-    B->type->u.type->body->flags.repeat = 1;
+    C->type->u.type->body->flags.repeat = 1;
 }
 aggregate_init_body(A) ::= aggregate_init_body(B) TOK_COMMA
 			    aggregate_init_element(C).
@@ -455,7 +455,7 @@ aggregate_init_body(A) ::= aggregate_init_body(B) TOK_COMMA
     LISTadd_last(A, (Generic)C);
     LISTadd_last(A, (Generic)D);
 
-    C->type->u.type->body->flags.repeat = 1;
+    D->type->u.type->body->flags.repeat = 1;
 }
 
 aggregate_type(A) ::= TOK_AGGREGATE TOK_OF parameter_type(B).
diff --git a/src/express/generated/expparse.c b/src/express/generated/expparse.c
@@ -2378,7 +2378,7 @@ static void yy_reduce(
 
     LISTadd_last(yygotominor.yy371, (Generic)yymsp[0].minor.yy401);
 
-    yymsp[-2].minor.yy401->type->u.type->body->flags.repeat = 1;
+    yymsp[0].minor.yy401->type->u.type->body->flags.repeat = 1;
 }
 #line 2384 "expparse.c"
         break;
@@ -2400,7 +2400,7 @@ static void yy_reduce(
     LISTadd_last(yygotominor.yy371, (Generic)yymsp[-2].minor.yy401);
     LISTadd_last(yygotominor.yy371, (Generic)yymsp[0].minor.yy401);
 
-    yymsp[-2].minor.yy401->type->u.type->body->flags.repeat = 1;
+    yymsp[0].minor.yy401->type->u.type->body->flags.repeat = 1;
 }
 #line 2406 "expparse.c"
         break;
diff --git a/src/express/generated/verification_info.cmake b/src/express/generated/verification_info.cmake
@@ -5,8 +5,8 @@ set(baseline_perplex_version "1.0.0")
 set(baseline_lempar_c_md5 60741b9dd886b77a5732a2e85d6d56b0)
 set(baseline_perplex_template_c_md5 7db377251a8c99c835f06df129d95bed)
 set(baseline_expscan_l_md5 617531ffdf3ee747cd5980f3c3a9a4bd)
-set(baseline_expparse_y_md5 244659c4cad22469de35148500ad8020)
+set(baseline_expparse_y_md5 5443ad0e6683ac00766dfc6e2cd72cbf)
 set(baseline_expscan_c_md5 980080ce3ee1366a28f2ecfabbe65a3f)
 set(baseline_expscan_h_md5 3052c058a37045b43f96e4c04039bce3)
-set(baseline_expparse_c_md5 9ced1c34faca204d487929f14712a888)
+set(baseline_expparse_c_md5 37b5ed548cd394342c18e240d312f55e)
 set(baseline_expparse_h_md5 e4a5599839b2a9f7a6915a0dcc7747b0)

Original file line number	Diff line number	Diff line change
`@@ -437,7 +437,7 @@ aggregate_init_body(A) ::= aggregate_init_element(B) TOK_COLON expression(C).`
`437`	`437`
`438`	`438`	`LISTadd_last(A, (Generic)C);`
`439`	`439`
`440`		`- B->type->u.type->body->flags.repeat = 1;`
	`440`	`+ C->type->u.type->body->flags.repeat = 1;`
`441`	`441`	`}`
`442`	`442`	`aggregate_init_body(A) ::= aggregate_init_body(B) TOK_COMMA`
`443`	`443`	`aggregate_init_element(C).`
`@@ -455,7 +455,7 @@ aggregate_init_body(A) ::= aggregate_init_body(B) TOK_COMMA`
`455`	`455`	`LISTadd_last(A, (Generic)C);`
`456`	`456`	`LISTadd_last(A, (Generic)D);`
`457`	`457`
`458`		`- C->type->u.type->body->flags.repeat = 1;`
	`458`	`+ D->type->u.type->body->flags.repeat = 1;`
`459`	`459`	`}`
`460`	`460`
`461`	`461`	`aggregate_type(A) ::= TOK_AGGREGATE TOK_OF parameter_type(B).`
Original file line number	Diff line number	Diff line change
`@@ -2378,7 +2378,7 @@ static void yy_reduce(`
`2378`	`2378`
`2379`	`2379`	`LISTadd_last(yygotominor.yy371, (Generic)yymsp[0].minor.yy401);`
`2380`	`2380`
`2381`		`- yymsp[-2].minor.yy401->type->u.type->body->flags.repeat = 1;`
	`2381`	`+ yymsp[0].minor.yy401->type->u.type->body->flags.repeat = 1;`
`2382`	`2382`	`}`
`2383`	`2383`	`#line 2384 "expparse.c"`
`2384`	`2384`	`break;`
`@@ -2400,7 +2400,7 @@ static void yy_reduce(`
`2400`	`2400`	`LISTadd_last(yygotominor.yy371, (Generic)yymsp[-2].minor.yy401);`
`2401`	`2401`	`LISTadd_last(yygotominor.yy371, (Generic)yymsp[0].minor.yy401);`
`2402`	`2402`
`2403`		`- yymsp[-2].minor.yy401->type->u.type->body->flags.repeat = 1;`
	`2403`	`+ yymsp[0].minor.yy401->type->u.type->body->flags.repeat = 1;`
`2404`	`2404`	`}`
`2405`	`2405`	`#line 2406 "expparse.c"`
`2406`	`2406`	`break;`