@@ -510,7 +510,7 @@ module_type_specifier:
510510 stack_expr ($$).set (ID_identifier,
511511 smv_module_symbol (stack_expr ($1 ).id_string ()));
512512 }
513- | module_name ' (' formula_list ' )'
513+ | module_name ' (' parameter_list ' )'
514514 {
515515 init ($$, " submodule" );
516516 stack_expr ($$).set (ID_identifier,
@@ -519,6 +519,11 @@ module_type_specifier:
519519 }
520520 ;
521521
522+ parameter_list:
523+ formula { init ($$); mto ($$, $1 ); }
524+ | parameter_list ' ,' formula { $$=$1 ; mto ($$, $3 ); }
525+ ;
526+
522527enum_list : enum_element
523528 {
524529 init ($$, ID_enumeration);
@@ -673,7 +678,7 @@ formula : term
673678term : variable_identifier
674679 | next_Token ' (' term ' )' { init ($$, ID_smv_next); mto ($$, $3 ); }
675680 | ' (' formula ' )' { $$=$2 ; }
676- | ' {' formula_list ' }' { $$=$2 ; stack_expr ($$).id (ID_smv_set); }
681+ | ' {' set_body_expr ' }' { $$=$2 ; stack_expr ($$).id (ID_smv_set); }
677682 | INC_Token ' (' term ' )' { init ($$, " inc" ); mto ($$, $3 ); }
678683 | DEC_Token ' (' term ' )' { init ($$, " dec" ); mto ($$, $3 ); }
679684 | ADD_Token ' (' term ' ,' term ' )' { j_binary ($$, $3 , ID_plus, $5 ); }
@@ -777,9 +782,9 @@ range : NUMBER_Token DOTDOT_Token NUMBER_Token
777782 { init ($$); mto ($$, $1 ); mto ($$, $3 ); }
778783 ;
779784
780- formula_list :
785+ set_body_expr :
781786 formula { init ($$); mto ($$, $1 ); }
782- | formula_list ' ,' formula { $$=$1 ; mto ($$, $3 ); }
787+ | set_body_expr ' ,' formula { $$=$1 ; mto ($$, $3 ); }
783788 ;
784789
785790identifier : IDENTIFIER_Token
0 commit comments