Changes related to initialisation

Author: AnFunctionArray

faster.regex

@@ -11,8 +11,8 @@
 (?<fasterdecls>(?(?=(?{push2 \@matches, {}})(?<declbod>((?(<tagend>)(*F))(\s*+(?&typeorqualifortypdf)\s*+
     |\s*+\b(?<tagtype>struct|union|enum)\b\s*+(?<identtag>((?&identifierpure))(?{eval {$matches[-1]{strc}=$^N}}))?+\s*+((?&brackets)(?{register_taggable()}))?+\s*+((?<tagend>;)(?{dispatch_file_scope_stm(pos(),$minlen)}))?+))*+
     (?(<tagend>)|(?&identoutter)
-    (\s*+(?&parens)\s*+)*+((,(?&identoutter)(\s*+(?&parens)\s*+)*+)*+
-    ((?![{])((?&parens)|(?&brackets)|(?&strunus)|[^\[\]\(\)\{\}'";])*+;(?{dispatch_file_scope_stm(pos(),$minlen)}))
+    (\s*+(?&parens)\s*+)*+(?&init_q)?+((,(?&identoutter)(\s*+(?&parens)\s*+)*+(?<init_q>=((?&parens)|(?&brackets)|(?&strunus)|[^\[\]\(\)\{\}'";,])*+)?+)*+
+    (;(?{dispatch_file_scope_stm(pos(),$minlen)}))
     |\s*+(?&brackets)(?{dispatch_file_scope_stm(pos(),$minlen)})))))
     \g{declbod}(?<=[};])
     (?{pop2 \@matches})|(*F)(?{pop2 \@matches})))

primexpr.regex

@@ -10,14 +10,16 @@
 	(?{pop2 \@flags})|(?{pop2 \@flags})(*F)))
 
 (?<castexpr>(?(?=((?&typenamerev)))\g{-1}|(?<unaryexpr>(?(?=((?&inner)))\g{-1}
-						|(?<inparenths>\s*+[(](?&primexprnew)[)]
-						\s*+))(((\[(?&primexprnew)\](?{call 'subscript'})|[(](?{call 'startfunctioncall'})(?&primexprcall)?+[)]
+						|(?<inparenths>\s*+\((?&primexprnew)\)
+						\s*+))(((\[(?&primexprnew)\](?{call 'subscript'})
+						|\((?{call 'startfunctioncall'})(?&primexprcall)?+\)
 						(?{call 'endfunctioncall'}))\s*+
-						|(?<arrowordot>(?<arrowordotraw>[.]|->))(?&identifierminemember)
-						|(?<postfixarith>(?<postfixarithraw>[+][+]|--)\s*+)
-						(?{call 'unaryincdec'})))*+
+						|(?&arrowordot)|(?&postfixarith)))*+
 						|(?&unary))))
 
+(?<postfixarith>\s*+(?<postfixarithraw>[+][+]|--)\s*+(?{call 'unaryincdec'}))
+(?<arrowordot>\s*+(?<arrowordotraw>[.]|->)\s*+(?&identifierminemember))
+
 (?<identifierminemember>\s*+(?<ident>(?&identifierraw_qualified))
 	(?{call 'memberaccess'})\s*+)
 

typename.regex

@@ -112,7 +112,9 @@
 (?<abstdeclorallqualifsdestr>
 	(?{push2 \@declqualifs, \@{$savedcallouts[-1]}; pop2 \@savedcallouts})
 
-	(?(?=(?<declinner>(?&Tasbtdecloutter)(?{call 'enddeclaration'})(?{replayrecord \@declqualifs})(?{call 'endqualifs'})(?&Tabstinitorbitfl)?+))\g{declinner}
+	(?(?=(?<declinner>(?&Tasbtdecloutter)(?{call 'enddeclaration'})(?{replayrecord \@declqualifs})(?{call 'endqualifs'})
+	(?&Tabstinitorbitfl)?+(?{call 'announce_decl'})))
+	\g{declinner}
 	(?(?{eval {existsflag "outterparams", {"outter" => undef, "optoutter"}} or 0})|(,(?&declinner))*+)|(?(?{print3("dump\n");eval {exists $matches[-1]{strc}} or 0})
 	(?{print "is rec $recording \n"; call 'check_stray_struc' if (not eval {exists $matches[-1]{enum}})})
 	|
@@ -166,8 +168,14 @@
 
 (?<abstrbitfield>\s*+:\s*+(?{call 'beginconstantexpr'})(?&assignorsomething)(?{call 'endconstantexpr'}))
 (?<designator>\s*+(\[(?&primexprnew)\]|\.\s*+(?<dsig_ident>(?&identifierpure)))(?{call 'go_to_level'})\s*+)
-(?<initializer>(?&assignorsomething)(?{call 'init_commit'})|\s*+[{](?{call 'init_go_down_level'})((?&designator)++=)?+(?&initializer)?(,(?&initializer))*+,?+\s*+[}](?{call 'init_go_up_level'})\s*+)
-(?<abstrinitialization>=(?{call 'begin_initializer'})(?&initializer)(?{call 'init_end'}))
+(?<initializer>(?&assignorsomething)(?{call 'init_commit'})
+	|\s*+[{](?{call 'init_go_down_level'})((?&designator)++=)?+(?&initializer)?
+	(,(?&initializer))*+,?+\s*+[}](?{call 'init_go_up_level'})\s*+)
+(?<abstrinitialization>=(?{call 'begin_initializer'})
+	(?# Below allow string literal not to be converted)
+	(?(?=((?&stringlit)))\g{-1}|(?&initializer))
+	(?{call 'init_end'})
+)
 
 (?<add_ident_to_enum_def>\s*+(?<identlasttag>(?&identifierraw_qualified))(?{call 'add_ident_to_enum_def'})\s*+)