type token =
| Tvolatile of (
-# 57 "parser_cocci_menhir.mly"
+# 81 "parser_cocci_menhir.mly"
(Data.clt)
# 8 "parser_cocci_menhir.ml"
)
| Tvoid of (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 13 "parser_cocci_menhir.ml"
)
| Tunsigned of (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 18 "parser_cocci_menhir.ml"
)
| Tunion of (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 23 "parser_cocci_menhir.ml"
)
| Ttypedef of (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 28 "parser_cocci_menhir.ml"
)
| Tstruct of (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 33 "parser_cocci_menhir.ml"
)
| Tstatic of (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 38 "parser_cocci_menhir.ml"
)
| Tssize_t of (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 43 "parser_cocci_menhir.ml"
)
| Tsize_t of (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 48 "parser_cocci_menhir.ml"
)
| Tsigned of (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 53 "parser_cocci_menhir.ml"
)
| Tshort of (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 58 "parser_cocci_menhir.ml"
)
| Tregister of (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 63 "parser_cocci_menhir.ml"
)
| Tptrdiff_t of (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 68 "parser_cocci_menhir.ml"
)
| Tlong of (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 73 "parser_cocci_menhir.ml"
)
| Tlist
| Tint of (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 79 "parser_cocci_menhir.ml"
)
| Tinline of (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 84 "parser_cocci_menhir.ml"
)
| Tfloat of (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 89 "parser_cocci_menhir.ml"
)
| Textern of (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 94 "parser_cocci_menhir.ml"
)
| Tenum of (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 99 "parser_cocci_menhir.ml"
)
| Tdouble of (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 104 "parser_cocci_menhir.ml"
)
| Tconst of (
-# 57 "parser_cocci_menhir.mly"
+# 81 "parser_cocci_menhir.mly"
(Data.clt)
# 109 "parser_cocci_menhir.ml"
)
| Tchar of (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 114 "parser_cocci_menhir.ml"
)
| Tauto of (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 119 "parser_cocci_menhir.ml"
)
| Tattr of (
-# 58 "parser_cocci_menhir.mly"
+# 82 "parser_cocci_menhir.mly"
(string * Data.clt)
# 124 "parser_cocci_menhir.ml"
)
| TXor of (
-# 96 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 129 "parser_cocci_menhir.ml"
)
| TWords
| TWhy0
| TWhy of (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 136 "parser_cocci_menhir.ml"
)
| TWhile of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 141 "parser_cocci_menhir.ml"
)
| TWhenTrue of (
-# 78 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Data.clt)
# 146 "parser_cocci_menhir.ml"
)
| TWhenFalse of (
-# 78 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Data.clt)
# 151 "parser_cocci_menhir.ml"
)
| TWhen of (
-# 78 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Data.clt)
# 156 "parser_cocci_menhir.ml"
)
| TUnderscore
| TTypedef
| TTypeId of (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 165 "parser_cocci_menhir.ml"
)
| TType
| TTildeExclEq of (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 171 "parser_cocci_menhir.ml"
)
| TTildeEq of (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 176 "parser_cocci_menhir.ml"
)
| TTilde of (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 181 "parser_cocci_menhir.ml"
)
| TSwitch of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 186 "parser_cocci_menhir.ml"
)
| TSub of (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 191 "parser_cocci_menhir.ml"
)
| TString of (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 196 "parser_cocci_menhir.ml"
)
| TStrict of (
-# 78 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Data.clt)
# 201 "parser_cocci_menhir.ml"
)
| TStatement
| TSizeof of (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 207 "parser_cocci_menhir.ml"
)
| TShROp of (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 212 "parser_cocci_menhir.ml"
)
| TShLOp of (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 217 "parser_cocci_menhir.ml"
)
| TScriptData of (
-# 75 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(string)
# 222 "parser_cocci_menhir.ml"
)
| TScript
| TRuleName of (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 228 "parser_cocci_menhir.ml"
)
| TRightIso
| TReturn of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 234 "parser_cocci_menhir.ml"
)
| TPure
| TPtrOp of (
-# 108 "parser_cocci_menhir.mly"
+# 132 "parser_cocci_menhir.mly"
(Data.clt)
# 240 "parser_cocci_menhir.ml"
)
| TPtVirg of (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 245 "parser_cocci_menhir.ml"
)
| TPragma of (
-# 63 "parser_cocci_menhir.mly"
+# 87 "parser_cocci_menhir.mly"
(Ast_cocci.added_string * Data.clt)
# 250 "parser_cocci_menhir.ml"
)
| TPosition
| TPosAny
| TPlusFile of (
-# 87 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(string * Data.clt)
# 257 "parser_cocci_menhir.ml"
)
| TPlus0
| TPlus of (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 263 "parser_cocci_menhir.ml"
)
| TPathIsoFile of (
-# 83 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(string)
# 268 "parser_cocci_menhir.ml"
)
| TParameter
| TPOEllipsis of (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 274 "parser_cocci_menhir.ml"
)
| TPCEllipsis of (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 279 "parser_cocci_menhir.ml"
)
| TPArob
| TOrLog of (
-# 93 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 285 "parser_cocci_menhir.ml"
)
| TOr of (
-# 95 "parser_cocci_menhir.mly"
+# 119 "parser_cocci_menhir.mly"
(Data.clt)
# 290 "parser_cocci_menhir.ml"
)
| TOn
| TOPar0 of (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 296 "parser_cocci_menhir.ml"
)
| TOPar of (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 301 "parser_cocci_menhir.ml"
)
| TOInit of (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 306 "parser_cocci_menhir.ml"
)
| TOEllipsis of (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 311 "parser_cocci_menhir.ml"
)
| TOCro of (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 316 "parser_cocci_menhir.ml"
)
| TOBrace of (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 321 "parser_cocci_menhir.ml"
)
| TNothing
| TNotEq of (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 327 "parser_cocci_menhir.ml"
)
| TNever
| TName
| TMul of (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 334 "parser_cocci_menhir.ml"
)
| TMinusFile of (
-# 87 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(string * Data.clt)
# 339 "parser_cocci_menhir.ml"
)
| TMinus of (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 344 "parser_cocci_menhir.ml"
)
| TMid0 of (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 349 "parser_cocci_menhir.ml"
)
| TMetaType of (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 354 "parser_cocci_menhir.ml"
)
| TMetaStmList of (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 359 "parser_cocci_menhir.ml"
)
| TMetaStm of (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 364 "parser_cocci_menhir.ml"
)
| TMetaPos of (
-# 72 "parser_cocci_menhir.mly"
+# 96 "parser_cocci_menhir.mly"
(Parse_aux.pos_info)
# 369 "parser_cocci_menhir.ml"
)
| TMetaParamList of (
-# 70 "parser_cocci_menhir.mly"
+# 94 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 374 "parser_cocci_menhir.ml"
)
| TMetaParam of (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 379 "parser_cocci_menhir.ml"
)
| TMetaLocalIdExp of (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 384 "parser_cocci_menhir.ml"
)
| TMetaLocalFunc of (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 389 "parser_cocci_menhir.ml"
)
| TMetaIterator of (
-# 66 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 394 "parser_cocci_menhir.ml"
)
| TMetaInit of (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 399 "parser_cocci_menhir.ml"
)
| TMetaIdExp of (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 404 "parser_cocci_menhir.ml"
)
| TMetaId of (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 409 "parser_cocci_menhir.ml"
)
| TMetaFunc of (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 414 "parser_cocci_menhir.ml"
)
| TMetaField of (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 419 "parser_cocci_menhir.ml"
)
| TMetaExpList of (
-# 70 "parser_cocci_menhir.mly"
+# 94 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 424 "parser_cocci_menhir.ml"
)
| TMetaExp of (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 429 "parser_cocci_menhir.ml"
)
| TMetaErr of (
-# 67 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 434 "parser_cocci_menhir.ml"
)
| TMetaDeclarer of (
-# 66 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 439 "parser_cocci_menhir.ml"
)
| TMetaDecl of (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 444 "parser_cocci_menhir.ml"
)
| TMetaConst of (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 449 "parser_cocci_menhir.ml"
)
| TMPtVirg
| TLogOp of (
-# 99 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 455 "parser_cocci_menhir.ml"
)
| TLocal
| TLineEnd of (
-# 78 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Data.clt)
# 461 "parser_cocci_menhir.ml"
)
| TIteratorId of (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 466 "parser_cocci_menhir.ml"
)
| TIso
| TInvalid
| TInt of (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 482 "parser_cocci_menhir.ml"
)
| TInitialize
| TInitialiser
| TIncludeNL of (
-# 84 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(string * Data.clt)
# 489 "parser_cocci_menhir.ml"
)
| TIncludeL of (
-# 84 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(string * Data.clt)
# 494 "parser_cocci_menhir.ml"
)
| TInc of (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 499 "parser_cocci_menhir.ml"
)
| TIf of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 504 "parser_cocci_menhir.ml"
)
| TIdentifier
| TIdent of (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 510 "parser_cocci_menhir.ml"
)
| TIdExpression
| TGoto of (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 516 "parser_cocci_menhir.ml"
)
| TGenerated
| TFunction
| TFunDecl of (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 523 "parser_cocci_menhir.ml"
)
| TFresh
| TForall
| TFor of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 530 "parser_cocci_menhir.ml"
)
| TFloat of (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 535 "parser_cocci_menhir.ml"
)
| TEver
| TError
| TEqEq of (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 547 "parser_cocci_menhir.ml"
)
| TEq of (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 552 "parser_cocci_menhir.ml"
)
| TElse of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 557 "parser_cocci_menhir.ml"
)
| TEllipsis of (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 562 "parser_cocci_menhir.ml"
)
| TDotDot of (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 567 "parser_cocci_menhir.ml"
)
| TDot of (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 572 "parser_cocci_menhir.ml"
)
| TDo of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 577 "parser_cocci_menhir.ml"
)
| TDmOp of (
-# 101 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 582 "parser_cocci_menhir.ml"
)
| TDisable
| TDepends
| TDefineParam of (
-# 86 "parser_cocci_menhir.mly"
+# 110 "parser_cocci_menhir.mly"
(Data.clt * token * int * int)
# 589 "parser_cocci_menhir.ml"
)
| TDefine of (
-# 85 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Data.clt * token)
# 594 "parser_cocci_menhir.ml"
)
| TDefault of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 599 "parser_cocci_menhir.ml"
)
| TDeclarerId of (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 604 "parser_cocci_menhir.ml"
)
| TDeclarer
| TDeclaration
| TDec of (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 611 "parser_cocci_menhir.ml"
)
| TCppConcatOp
| TContinue of (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 617 "parser_cocci_menhir.ml"
)
| TContext
| TConstant
| TComma of (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 624 "parser_cocci_menhir.ml"
)
| TChar of (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 629 "parser_cocci_menhir.ml"
)
| TCase of (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 634 "parser_cocci_menhir.ml"
)
| TCPar0 of (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 639 "parser_cocci_menhir.ml"
)
| TCPar of (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 644 "parser_cocci_menhir.ml"
)
| TCEllipsis of (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 649 "parser_cocci_menhir.ml"
)
| TCCro of (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 654 "parser_cocci_menhir.ml"
)
| TCBrace of (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 659 "parser_cocci_menhir.ml"
)
| TBreak of (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 664 "parser_cocci_menhir.ml"
)
| TBang0
| TBang of (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 670 "parser_cocci_menhir.ml"
)
| TAssign of (
-# 112 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 675 "parser_cocci_menhir.ml"
)
| TArobArob
| TArob
| TAny of (
-# 78 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Data.clt)
# 682 "parser_cocci_menhir.ml"
)
| TAndLog of (
-# 94 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 687 "parser_cocci_menhir.ml"
)
| TAnd of (
-# 97 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 692 "parser_cocci_menhir.ml"
)
and _menhir_jeton = token
-# 25 "parser_cocci_menhir.mly"
+# 49 "parser_cocci_menhir.mly"
(* Not clear how to allow function declarations to specify a return type
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_aexpr =
-# 1987 "parser_cocci_menhir.mly"
+# 2011 "parser_cocci_menhir.mly"
( Ast0.set_arg_exp _1 )
# 1641 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 70 "parser_cocci_menhir.mly"
+# 94 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 1662 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_aexpr =
-# 1989 "parser_cocci_menhir.mly"
+# 2013 "parser_cocci_menhir.mly"
( let (nm,lenname,pure,clt) = _1 in
let nm = P.clt2mcode nm clt in
let lenname =
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_aexpr =
-# 1998 "parser_cocci_menhir.mly"
+# 2022 "parser_cocci_menhir.mly"
( Ast0.set_arg_exp(Ast0.wrap(Ast0.TypeExp(_1))) )
# 1700 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2034 "parser_cocci_menhir.mly"
+# 2058 "parser_cocci_menhir.mly"
( Ast.WhenAny )
# 1722 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2035 "parser_cocci_menhir.mly"
+# 2059 "parser_cocci_menhir.mly"
( Ast.WhenStrict )
# 1744 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2036 "parser_cocci_menhir.mly"
+# 2060 "parser_cocci_menhir.mly"
( Ast.WhenForall )
# 1766 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2037 "parser_cocci_menhir.mly"
+# 2061 "parser_cocci_menhir.mly"
( Ast.WhenExists )
# 1788 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1328 "parser_cocci_menhir.mly"
+# 1352 "parser_cocci_menhir.mly"
( _1 )
# 1812 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 1844 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1330 "parser_cocci_menhir.mly"
+# 1354 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 1852 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 101 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 1884 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1332 "parser_cocci_menhir.mly"
+# 1356 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 1892 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 1924 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1334 "parser_cocci_menhir.mly"
+# 1358 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 1932 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 1964 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1336 "parser_cocci_menhir.mly"
+# 1360 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 1972 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2004 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1338 "parser_cocci_menhir.mly"
+# 1362 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2012 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2044 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1340 "parser_cocci_menhir.mly"
+# 1364 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2052 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 99 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 2084 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1342 "parser_cocci_menhir.mly"
+# 1366 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 2092 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 2124 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1344 "parser_cocci_menhir.mly"
+# 1368 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 2132 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 2164 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1346 "parser_cocci_menhir.mly"
+# 1370 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 2172 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 97 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 2204 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1348 "parser_cocci_menhir.mly"
+# 1372 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 2212 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 95 "parser_cocci_menhir.mly"
+# 119 "parser_cocci_menhir.mly"
(Data.clt)
# 2244 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1350 "parser_cocci_menhir.mly"
+# 1374 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 2252 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 96 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 2284 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1352 "parser_cocci_menhir.mly"
+# 1376 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 2292 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 94 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 2324 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1354 "parser_cocci_menhir.mly"
+# 1378 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 2332 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_dot_expressions_ = Obj.magic _3 in
let _2 : (
-# 93 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 2364 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1356 "parser_cocci_menhir.mly"
+# 1380 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 2372 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1328 "parser_cocci_menhir.mly"
+# 1352 "parser_cocci_menhir.mly"
( _1 )
# 2396 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 2428 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1330 "parser_cocci_menhir.mly"
+# 1354 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 2436 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 101 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2468 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1332 "parser_cocci_menhir.mly"
+# 1356 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2476 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 2508 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1334 "parser_cocci_menhir.mly"
+# 1358 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 2516 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 2548 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1336 "parser_cocci_menhir.mly"
+# 1360 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 2556 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2588 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1338 "parser_cocci_menhir.mly"
+# 1362 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2596 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2628 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1340 "parser_cocci_menhir.mly"
+# 1364 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2636 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 99 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 2668 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1342 "parser_cocci_menhir.mly"
+# 1366 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 2676 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 2708 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1344 "parser_cocci_menhir.mly"
+# 1368 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 2716 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 2748 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1346 "parser_cocci_menhir.mly"
+# 1370 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 2756 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 97 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 2788 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1348 "parser_cocci_menhir.mly"
+# 1372 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 2796 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 95 "parser_cocci_menhir.mly"
+# 119 "parser_cocci_menhir.mly"
(Data.clt)
# 2828 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1350 "parser_cocci_menhir.mly"
+# 1374 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 2836 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 96 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 2868 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1352 "parser_cocci_menhir.mly"
+# 1376 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 2876 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 94 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 2908 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1354 "parser_cocci_menhir.mly"
+# 1378 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 2916 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_invalid_ = Obj.magic _3 in
let _2 : (
-# 93 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 2948 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1356 "parser_cocci_menhir.mly"
+# 1380 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 2956 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1328 "parser_cocci_menhir.mly"
+# 1352 "parser_cocci_menhir.mly"
( _1 )
# 2980 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 3012 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1330 "parser_cocci_menhir.mly"
+# 1354 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 3020 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 101 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3052 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1332 "parser_cocci_menhir.mly"
+# 1356 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3060 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 3092 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1334 "parser_cocci_menhir.mly"
+# 1358 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 3100 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 3132 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1336 "parser_cocci_menhir.mly"
+# 1360 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 3140 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3172 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1338 "parser_cocci_menhir.mly"
+# 1362 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3180 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3212 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1340 "parser_cocci_menhir.mly"
+# 1364 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3220 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 99 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 3252 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1342 "parser_cocci_menhir.mly"
+# 1366 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 3260 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 3292 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1344 "parser_cocci_menhir.mly"
+# 1368 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 3300 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 3332 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1346 "parser_cocci_menhir.mly"
+# 1370 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 3340 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 97 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 3372 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1348 "parser_cocci_menhir.mly"
+# 1372 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 3380 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 95 "parser_cocci_menhir.mly"
+# 119 "parser_cocci_menhir.mly"
(Data.clt)
# 3412 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1350 "parser_cocci_menhir.mly"
+# 1374 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 3420 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 96 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 3452 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1352 "parser_cocci_menhir.mly"
+# 1376 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 3460 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 94 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 3492 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1354 "parser_cocci_menhir.mly"
+# 1378 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 3500 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_eexpr_nest_expressions_ = Obj.magic _3 in
let _2 : (
-# 93 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 3532 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1356 "parser_cocci_menhir.mly"
+# 1380 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 3540 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1328 "parser_cocci_menhir.mly"
+# 1352 "parser_cocci_menhir.mly"
( _1 )
# 3564 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 3596 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1330 "parser_cocci_menhir.mly"
+# 1354 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 3604 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 101 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3636 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1332 "parser_cocci_menhir.mly"
+# 1356 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3644 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 3676 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1334 "parser_cocci_menhir.mly"
+# 1358 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 3684 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 3716 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1336 "parser_cocci_menhir.mly"
+# 1360 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 3724 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3756 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1338 "parser_cocci_menhir.mly"
+# 1362 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3764 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 100 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3796 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1340 "parser_cocci_menhir.mly"
+# 1364 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3804 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 99 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 3836 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1342 "parser_cocci_menhir.mly"
+# 1366 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 3844 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 3876 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1344 "parser_cocci_menhir.mly"
+# 1368 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 3884 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 98 "parser_cocci_menhir.mly"
+# 122 "parser_cocci_menhir.mly"
(Data.clt)
# 3916 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1346 "parser_cocci_menhir.mly"
+# 1370 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 3924 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 97 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 3956 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1348 "parser_cocci_menhir.mly"
+# 1372 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 3964 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 95 "parser_cocci_menhir.mly"
+# 119 "parser_cocci_menhir.mly"
(Data.clt)
# 3996 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1350 "parser_cocci_menhir.mly"
+# 1374 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 4004 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 96 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 4036 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1352 "parser_cocci_menhir.mly"
+# 1376 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 4044 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 94 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 4076 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1354 "parser_cocci_menhir.mly"
+# 1378 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 4084 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_expr_invalid_ = Obj.magic _3 in
let _2 : (
-# 93 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 4116 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1356 "parser_cocci_menhir.mly"
+# 1380 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 4124 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arity =
-# 521 "parser_cocci_menhir.mly"
+# 545 "parser_cocci_menhir.mly"
( Ast.UNIQUE )
# 4146 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arity =
-# 522 "parser_cocci_menhir.mly"
+# 546 "parser_cocci_menhir.mly"
( Ast.OPT )
# 4168 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arity =
-# 523 "parser_cocci_menhir.mly"
+# 547 "parser_cocci_menhir.mly"
( Ast.MULTI )
# 4190 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_arity =
-# 524 "parser_cocci_menhir.mly"
+# 548 "parser_cocci_menhir.mly"
( Ast.NONE )
# 4207 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let r : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 4238 "parser_cocci_menhir.ml"
) = Obj.magic r in
let i : 'tv_option_eexpr_ = Obj.magic i in
let l : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 4244 "parser_cocci_menhir.ml"
) = Obj.magic l in
let _startpos = _startpos_l_ in
let _endpos = _endpos_r_ in
let _v : 'tv_array_dec =
-# 1155 "parser_cocci_menhir.mly"
+# 1179 "parser_cocci_menhir.mly"
( (l,i,r) )
# 4251 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_assign_expr_eexpr_dot_expressions_ =
-# 1300 "parser_cocci_menhir.mly"
+# 1324 "parser_cocci_menhir.mly"
( _1 )
# 4275 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 4307 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_eexpr_dot_expressions_ =
-# 1302 "parser_cocci_menhir.mly"
+# 1326 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in
Ast0.wrap(Ast0.Assignment(_1,P.clt2mcode op clt,
Ast0.set_arg_exp _3,false)) )
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 4349 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_eexpr_dot_expressions_ =
-# 1306 "parser_cocci_menhir.mly"
+# 1330 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Assignment
(_1,P.clt2mcode Ast.SimpleAssign _2,Ast0.set_arg_exp _3,false)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_assign_expr_eexpr_nest_expressions_ =
-# 1300 "parser_cocci_menhir.mly"
+# 1324 "parser_cocci_menhir.mly"
( _1 )
# 4383 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 4415 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_eexpr_nest_expressions_ =
-# 1302 "parser_cocci_menhir.mly"
+# 1326 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in
Ast0.wrap(Ast0.Assignment(_1,P.clt2mcode op clt,
Ast0.set_arg_exp _3,false)) )
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 4457 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_eexpr_nest_expressions_ =
-# 1306 "parser_cocci_menhir.mly"
+# 1330 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Assignment
(_1,P.clt2mcode Ast.SimpleAssign _2,Ast0.set_arg_exp _3,false)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_assign_expr_expr_invalid_ =
-# 1300 "parser_cocci_menhir.mly"
+# 1324 "parser_cocci_menhir.mly"
( _1 )
# 4491 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 4523 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_expr_invalid_ =
-# 1302 "parser_cocci_menhir.mly"
+# 1326 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in
Ast0.wrap(Ast0.Assignment(_1,P.clt2mcode op clt,
Ast0.set_arg_exp _3,false)) )
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 4565 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_expr_invalid_ =
-# 1306 "parser_cocci_menhir.mly"
+# 1330 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Assignment
(_1,P.clt2mcode Ast.SimpleAssign _2,Ast0.set_arg_exp _3,false)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_assign_expr_bis =
-# 1311 "parser_cocci_menhir.mly"
+# 1335 "parser_cocci_menhir.mly"
( _1 )
# 4599 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 4631 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_bis =
-# 1313 "parser_cocci_menhir.mly"
+# 1337 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in
Ast0.wrap(Ast0.Assignment(_1,P.clt2mcode op clt,
Ast0.set_arg_exp _3,false)) )
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 4673 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_bis =
-# 1317 "parser_cocci_menhir.mly"
+# 1341 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Assignment
(_1,P.clt2mcode Ast.SimpleAssign _2,Ast0.set_arg_exp _3,false)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_basic_expr_eexpr_dot_expressions_ =
-# 1297 "parser_cocci_menhir.mly"
+# 1321 "parser_cocci_menhir.mly"
( _1 )
# 4707 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_basic_expr_eexpr_nest_expressions_ =
-# 1297 "parser_cocci_menhir.mly"
+# 1321 "parser_cocci_menhir.mly"
( _1 )
# 4731 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_basic_expr_expr_invalid_ =
-# 1297 "parser_cocci_menhir.mly"
+# 1321 "parser_cocci_menhir.mly"
( _1 )
# 4755 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_fun_start = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 4787 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 4792 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_case_line =
-# 1017 "parser_cocci_menhir.mly"
+# 1041 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Default(P.clt2mcode "default" _1,P.clt2mcode ":" _2,_3)) )
# 4800 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _4 : 'tv_fun_start = Obj.magic _4 in
let _3 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 4837 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 4843 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_case_line =
-# 1020 "parser_cocci_menhir.mly"
+# 1044 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Case(P.clt2mcode "case" _1,_2,P.clt2mcode ":" _3,_4)) )
# 4850 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_eexpr_dot_expressions_ =
-# 1359 "parser_cocci_menhir.mly"
+# 1383 "parser_cocci_menhir.mly"
( _1 )
# 4874 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_eexpr_dot_expressions_ = Obj.magic e in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 4911 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 4917 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_e_ in
let _v : 'tv_cast_expr_eexpr_dot_expressions_ =
-# 1361 "parser_cocci_menhir.mly"
+# 1385 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 4925 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_eexpr_invalid_ =
-# 1359 "parser_cocci_menhir.mly"
+# 1383 "parser_cocci_menhir.mly"
( _1 )
# 4949 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_eexpr_invalid_ = Obj.magic e in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 4986 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 4992 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_e_ in
let _v : 'tv_cast_expr_eexpr_invalid_ =
-# 1361 "parser_cocci_menhir.mly"
+# 1385 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5000 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_eexpr_nest_expressions_ =
-# 1359 "parser_cocci_menhir.mly"
+# 1383 "parser_cocci_menhir.mly"
( _1 )
# 5024 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_eexpr_nest_expressions_ = Obj.magic e in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 5061 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5067 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_e_ in
let _v : 'tv_cast_expr_eexpr_nest_expressions_ =
-# 1361 "parser_cocci_menhir.mly"
+# 1385 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5075 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_expr_invalid_ =
-# 1359 "parser_cocci_menhir.mly"
+# 1383 "parser_cocci_menhir.mly"
( _1 )
# 5099 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_expr_invalid_ = Obj.magic e in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 5136 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5142 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_e_ in
let _v : 'tv_cast_expr_expr_invalid_ =
-# 1361 "parser_cocci_menhir.mly"
+# 1385 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5150 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_choose_iso =
-# 243 "parser_cocci_menhir.mly"
+# 267 "parser_cocci_menhir.mly"
( List.map P.id2name _2 )
# 5178 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_any_strict_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5202 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_ctype_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5226 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_d_ident_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5250 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_ident_or_const_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5274 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_meta_ident_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5298 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5322 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5346 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_with_econstraint_not_ceq_or_sub__ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5370 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_with_econstraint_re_or_not_eqe_or_sub__ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5394 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_with_idconstraint_re_or_not_eqid__ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5418 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_with_idconstraint_virt_re_or_not_eqid__ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5442 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_with_seed_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5466 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_or_meta_ident_with_x_eq_not_pos__ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5490 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_typedef_ident_ =
-# 2012 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
( _1 )
# 5514 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cond_expr_eexpr_dot_expressions_ =
-# 1322 "parser_cocci_menhir.mly"
+# 1346 "parser_cocci_menhir.mly"
( _1 )
# 5538 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let r : 'tv_cond_expr_eexpr_dot_expressions_ = Obj.magic r in
let dd : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5580 "parser_cocci_menhir.ml"
) = Obj.magic dd in
let t : 'tv_option_eexpr_ = Obj.magic t in
let w : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5586 "parser_cocci_menhir.ml"
) = Obj.magic w in
let _startpos = _startpos_l_ in
let _endpos = _endpos_r_ in
let _v : 'tv_cond_expr_eexpr_dot_expressions_ =
-# 1324 "parser_cocci_menhir.mly"
+# 1348 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.CondExpr (l, P.clt2mcode "?" w, t,
P.clt2mcode ":" dd, r)) )
# 5595 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cond_expr_eexpr_nest_expressions_ =
-# 1322 "parser_cocci_menhir.mly"
+# 1346 "parser_cocci_menhir.mly"
( _1 )
# 5619 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let r : 'tv_cond_expr_eexpr_nest_expressions_ = Obj.magic r in
let dd : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5661 "parser_cocci_menhir.ml"
) = Obj.magic dd in
let t : 'tv_option_eexpr_ = Obj.magic t in
let w : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5667 "parser_cocci_menhir.ml"
) = Obj.magic w in
let _startpos = _startpos_l_ in
let _endpos = _endpos_r_ in
let _v : 'tv_cond_expr_eexpr_nest_expressions_ =
-# 1324 "parser_cocci_menhir.mly"
+# 1348 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.CondExpr (l, P.clt2mcode "?" w, t,
P.clt2mcode ":" dd, r)) )
# 5676 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cond_expr_expr_invalid_ =
-# 1322 "parser_cocci_menhir.mly"
+# 1346 "parser_cocci_menhir.mly"
( _1 )
# 5700 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let r : 'tv_cond_expr_expr_invalid_ = Obj.magic r in
let dd : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5742 "parser_cocci_menhir.ml"
) = Obj.magic dd in
let t : 'tv_option_eexpr_ = Obj.magic t in
let w : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 5748 "parser_cocci_menhir.ml"
) = Obj.magic w in
let _startpos = _startpos_l_ in
let _endpos = _endpos_r_ in
let _v : 'tv_cond_expr_expr_invalid_ =
-# 1324 "parser_cocci_menhir.mly"
+# 1348 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.CondExpr (l, P.clt2mcode "?" w, t,
P.clt2mcode ":" dd, r)) )
# 5757 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 57 "parser_cocci_menhir.mly"
+# 81 "parser_cocci_menhir.mly"
(Data.clt)
# 5778 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_const_vol =
-# 926 "parser_cocci_menhir.mly"
+# 950 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Const _1 )
# 5785 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 57 "parser_cocci_menhir.mly"
+# 81 "parser_cocci_menhir.mly"
(Data.clt)
# 5806 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_const_vol =
-# 927 "parser_cocci_menhir.mly"
+# 951 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Volatile _1 )
# 5813 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_aexpr_TEllipsis_ =
-# 1788 "parser_cocci_menhir.mly"
+# 1812 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 5837 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 5863 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_aexpr_TEllipsis_ =
-# 1790 "parser_cocci_menhir.mly"
+# 1814 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 5872 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_aexpr_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 5904 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_continue_list_aexpr_TEllipsis_ =
-# 1793 "parser_cocci_menhir.mly"
+# 1817 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_aexpr_TEllipsis_ =
-# 1796 "parser_cocci_menhir.mly"
+# 1820 "parser_cocci_menhir.mly"
( _2 )
# 5942 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_dparam_TEllipsis_ =
-# 1788 "parser_cocci_menhir.mly"
+# 1812 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 5966 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 5992 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_dparam_TEllipsis_ =
-# 1790 "parser_cocci_menhir.mly"
+# 1814 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6001 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_dparam_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6033 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_continue_list_dparam_TEllipsis_ =
-# 1793 "parser_cocci_menhir.mly"
+# 1817 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_dparam_TEllipsis_ =
-# 1796 "parser_cocci_menhir.mly"
+# 1820 "parser_cocci_menhir.mly"
( _2 )
# 6071 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1788 "parser_cocci_menhir.mly"
+# 1812 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6095 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6121 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1790 "parser_cocci_menhir.mly"
+# 1814 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6130 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6162 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_continue_list_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1793 "parser_cocci_menhir.mly"
+# 1817 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1796 "parser_cocci_menhir.mly"
+# 1820 "parser_cocci_menhir.mly"
( _2 )
# 6200 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_initialize2_edots_when_TEllipsis_initialize__ =
-# 1788 "parser_cocci_menhir.mly"
+# 1812 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6224 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6250 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_initialize2_edots_when_TEllipsis_initialize__ =
-# 1790 "parser_cocci_menhir.mly"
+# 1814 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6259 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6291 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_continue_list_initialize2_edots_when_TEllipsis_initialize__ =
-# 1793 "parser_cocci_menhir.mly"
+# 1817 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_initialize2_edots_when_TEllipsis_initialize__ =
-# 1796 "parser_cocci_menhir.mly"
+# 1820 "parser_cocci_menhir.mly"
( _2 )
# 6329 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_one_dec_decl__TEllipsis_ =
-# 1788 "parser_cocci_menhir.mly"
+# 1812 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6353 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6379 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_one_dec_decl__TEllipsis_ =
-# 1790 "parser_cocci_menhir.mly"
+# 1814 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6388 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6420 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_continue_list_one_dec_decl__TEllipsis_ =
-# 1793 "parser_cocci_menhir.mly"
+# 1817 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_one_dec_decl__TEllipsis_ =
-# 1796 "parser_cocci_menhir.mly"
+# 1820 "parser_cocci_menhir.mly"
( _2 )
# 6458 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_one_dec_name_opt_decl__TEllipsis_ =
-# 1788 "parser_cocci_menhir.mly"
+# 1812 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6482 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6508 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_one_dec_name_opt_decl__TEllipsis_ =
-# 1790 "parser_cocci_menhir.mly"
+# 1814 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6517 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 6549 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_continue_list_one_dec_name_opt_decl__TEllipsis_ =
-# 1793 "parser_cocci_menhir.mly"
+# 1817 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_list_one_dec_name_opt_decl__TEllipsis_ =
-# 1796 "parser_cocci_menhir.mly"
+# 1820 "parser_cocci_menhir.mly"
( _2 )
# 6587 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_continue_struct_decl_list =
-# 660 "parser_cocci_menhir.mly"
+# 684 "parser_cocci_menhir.mly"
( [] )
# 6604 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_struct_decl_list =
-# 661 "parser_cocci_menhir.mly"
+# 685 "parser_cocci_menhir.mly"
( _1@_2 )
# 6634 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_struct_decl_list =
-# 662 "parser_cocci_menhir.mly"
+# 686 "parser_cocci_menhir.mly"
( _1 )
# 6658 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 6690 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 6695 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 6707 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 6713 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 6726 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 6758 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 6763 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 6775 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 6781 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 6794 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 6826 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 6831 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 6843 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 6849 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 6862 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 6894 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 6899 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 6912 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 6918 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 6931 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 6972 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 6977 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 6982 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7007 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7020 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7052 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7057 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 7069 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7075 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7088 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7125 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7130 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7135 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7158 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7171 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7203 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7208 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 7220 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7226 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7239 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7271 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7276 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 7288 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7294 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7307 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7339 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7344 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 7356 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7362 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7375 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 7407 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7412 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 7425 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7431 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7444 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 7485 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 7490 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7495 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7520 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7533 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7565 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7570 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 7582 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7588 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7601 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7638 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7643 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 7648 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7671 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7684 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7711 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 7722 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 7728 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7741 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7768 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 7779 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 7785 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7798 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 7825 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 7836 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 7842 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7855 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 7882 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 7894 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 7900 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7913 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 7949 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 7954 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 7978 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7991 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 8018 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 8029 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 8035 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8048 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 8080 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 8085 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 8107 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8120 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 8147 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 557 "parser_cocci_menhir.mly"
+# 581 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 8158 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8164 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8177 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 8204 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 559 "parser_cocci_menhir.mly"
+# 583 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 8215 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8221 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8234 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 8261 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 561 "parser_cocci_menhir.mly"
+# 585 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 8272 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8278 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8291 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 8318 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 563 "parser_cocci_menhir.mly"
+# 587 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 8329 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8335 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8348 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 8375 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 565 "parser_cocci_menhir.mly"
+# 589 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 8386 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8392 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8405 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 8432 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 567 "parser_cocci_menhir.mly"
+# 591 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 8443 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8449 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8462 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 8495 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 569 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 8508 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8514 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8527 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8569 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8575 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 8580 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8613 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8626 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8673 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8679 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 8685 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8721 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8734 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 576 "parser_cocci_menhir.mly"
+# 600 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 8776 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8782 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8795 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8837 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8843 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8878 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8891 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8938 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 8944 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 8983 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8996 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 9038 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 9044 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 9049 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 585 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = s in
let ty = Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) in
Ast0.wrap(Ast0.StructUnionDef(ty,P.clt2mcode "{" l,d,P.clt2mcode "}" r)) )
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 9074 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9087 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 9114 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 589 "parser_cocci_menhir.mly"
+# 613 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 9125 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 9131 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9144 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9181 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9186 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 9199 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9205 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9219 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9256 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9261 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 9274 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9280 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9294 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9331 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9336 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 9349 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9355 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9369 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 9406 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9411 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 9425 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9431 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9445 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 9491 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 9496 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9501 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9527 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9541 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9578 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9583 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 9596 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9602 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9616 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9658 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9663 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9668 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9692 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9706 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9743 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9748 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 9761 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 9767 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9781 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9818 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9823 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 9836 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 9842 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9856 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 9893 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9898 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 9911 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 9917 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9931 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 9968 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 9973 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 9987 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 9993 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10007 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 10053 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 10058 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 10063 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10089 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10103 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10140 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 10145 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 10158 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10164 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10178 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10220 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10225 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 10230 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10254 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10268 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10300 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 10312 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10318 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10332 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10364 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 10376 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10382 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10396 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10428 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 10440 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10446 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10460 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 10492 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 10505 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10511 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10525 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 10566 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 10571 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10596 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10610 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10642 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 10654 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10660 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10674 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10711 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10716 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 10739 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10753 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 10785 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 557 "parser_cocci_menhir.mly"
+# 581 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 10797 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 10803 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10817 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10849 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 559 "parser_cocci_menhir.mly"
+# 583 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 10861 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 10867 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10881 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 10913 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 561 "parser_cocci_menhir.mly"
+# 585 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 10925 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 10931 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10945 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 10977 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 563 "parser_cocci_menhir.mly"
+# 587 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 10989 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 10995 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11009 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 11041 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 565 "parser_cocci_menhir.mly"
+# 589 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 11053 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11059 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11073 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 11105 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 567 "parser_cocci_menhir.mly"
+# 591 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 11117 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11123 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11137 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 11175 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 569 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 11189 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11195 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11209 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11256 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11262 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 11267 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11301 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11315 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11367 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11373 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 11379 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11416 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11430 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 576 "parser_cocci_menhir.mly"
+# 600 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 11478 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11484 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11498 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11545 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11551 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11587 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11601 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11653 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11659 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11699 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11713 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11760 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 11766 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 11771 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 585 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = s in
let ty = Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) in
Ast0.wrap(Ast0.StructUnionDef(ty,P.clt2mcode "{" l,d,P.clt2mcode "}" r)) )
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11797 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11811 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 11843 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 589 "parser_cocci_menhir.mly"
+# 613 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 11855 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 11861 "parser_cocci_menhir.ml"
in
-# 602 "parser_cocci_menhir.mly"
+# 626 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11875 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let r : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 11896 "parser_cocci_menhir.ml"
) = Obj.magic r in
let _startpos = _startpos_r_ in
let _endpos = _endpos_r_ in
let _v : 'tv_ctype =
-# 604 "parser_cocci_menhir.mly"
+# 628 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,None)) )
# 11903 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let r : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 11924 "parser_cocci_menhir.ml"
) = Obj.magic r in
let _startpos = _startpos_r_ in
let _endpos = _endpos_r_ in
let _v : 'tv_ctype =
-# 606 "parser_cocci_menhir.mly"
+# 630 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,None)) )
# 11931 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 11962 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_midzero_list_ctype_ctype_ = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 11968 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_ctype =
-# 608 "parser_cocci_menhir.mly"
+# 632 "parser_cocci_menhir.mly"
( let (mids,code) = t in
Ast0.wrap
(Ast0.DisjType(P.clt2mcode "(" lp,code,mids, P.clt2mcode ")" rp)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_d_ident =
-# 1146 "parser_cocci_menhir.mly"
+# 1170 "parser_cocci_menhir.mly"
( (_1,
function t ->
List.fold_right
let _startpos = _startpos_t_ in
let _endpos = _endpos_i_ in
let _v : 'tv_decl =
-# 900 "parser_cocci_menhir.mly"
+# 924 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Param(t, Some i)) )
# 12044 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos_t_ in
let _v : 'tv_decl =
-# 901 "parser_cocci_menhir.mly"
+# 925 "parser_cocci_menhir.mly"
( (*verify in FunDecl*) Ast0.wrap(Ast0.Param(t, None)) )
# 12068 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 12124 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 12130 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 12135 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let i : 'tv_ident = Obj.magic i in
let s : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 12141 "parser_cocci_menhir.ml"
) = Obj.magic s in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 12146 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_t_ in
let _endpos = _endpos_rp1_ in
let _v : 'tv_decl =
-# 904 "parser_cocci_menhir.mly"
+# 928 "parser_cocci_menhir.mly"
( let fnptr =
Ast0.wrap
(Ast0.FunctionPointer
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12180 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl =
-# 911 "parser_cocci_menhir.mly"
+# 935 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaParam(P.clt2mcode nm clt,pure)) )
# 12188 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 12209 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_ident =
-# 1713 "parser_cocci_menhir.mly"
+# 1737 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 12216 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 66 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 12237 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_ident =
-# 1715 "parser_cocci_menhir.mly"
+# 1739 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 12245 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_list_decl_ =
-# 1736 "parser_cocci_menhir.mly"
+# 1760 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.DOTS
(_1
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_list_name_opt_decl_ =
-# 1736 "parser_cocci_menhir.mly"
+# 1760 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.DOTS
(_1
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12322 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement =
-# 1204 "parser_cocci_menhir.mly"
+# 1228 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
[Ast0.wrap(Ast0.MetaStmt(P.clt2mcode nm clt,pure))] )
# 12330 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement =
-# 1207 "parser_cocci_menhir.mly"
+# 1231 "parser_cocci_menhir.mly"
( List.map
(function x ->
Ast0.wrap
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement =
-# 1212 "parser_cocci_menhir.mly"
+# 1236 "parser_cocci_menhir.mly"
( [_1] )
# 12382 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 12413 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let t : 'tv_midzero_list_fun_start_fun_start_ = Obj.magic t in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 12419 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_decl_statement =
-# 1221 "parser_cocci_menhir.mly"
+# 1245 "parser_cocci_menhir.mly"
( let (mids,code) = t in
if List.for_all
(function x ->
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12455 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement_expr =
-# 1234 "parser_cocci_menhir.mly"
+# 1258 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
[Ast0.wrap(Ast0.MetaStmt(P.clt2mcode nm clt,pure))] )
# 12463 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement_expr =
-# 1237 "parser_cocci_menhir.mly"
+# 1261 "parser_cocci_menhir.mly"
( List.map
(function x ->
Ast0.wrap
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement_expr =
-# 1242 "parser_cocci_menhir.mly"
+# 1266 "parser_cocci_menhir.mly"
( [_1] )
# 12515 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 12546 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let t : 'tv_midzero_list_fun_after_stm_fun_after_dots_or_ = Obj.magic t in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 12552 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_decl_statement_expr =
-# 1251 "parser_cocci_menhir.mly"
+# 1275 "parser_cocci_menhir.mly"
( let (mids,code) = t in
if List.for_all (function [] -> true | _ -> false) code
then []
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12592 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_decl_var =
-# 1032 "parser_cocci_menhir.mly"
+# 1056 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.TyDecl(t,P.clt2mcode ";" pv))] )
# 12600 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12621 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_var =
-# 1033 "parser_cocci_menhir.mly"
+# 1057 "parser_cocci_menhir.mly"
( [P.meta_decl _1] )
# 12628 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12659 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1035 "parser_cocci_menhir.mly"
+# 1059 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
Ast0.wrap(Ast0.UnInit(s,fn t,id,P.clt2mcode ";" pv)))
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12714 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1035 "parser_cocci_menhir.mly"
+# 1059 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
Ast0.wrap(Ast0.UnInit(s,fn t,id,P.clt2mcode ";" pv)))
let _startpos = _startpos_f_ in
let _endpos = _endpos_f_ in
let _v : 'tv_decl_var =
-# 1039 "parser_cocci_menhir.mly"
+# 1063 "parser_cocci_menhir.mly"
( [f] )
# 12759 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12800 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12806 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1041 "parser_cocci_menhir.mly"
+# 1065 "parser_cocci_menhir.mly"
(let (id,fn) = d in
[Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv))])
# 12823 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12869 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12875 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1041 "parser_cocci_menhir.mly"
+# 1065 "parser_cocci_menhir.mly"
(let (id,fn) = d in
[Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv))])
# 12894 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12925 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1046 "parser_cocci_menhir.mly"
+# 1070 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 12989 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1046 "parser_cocci_menhir.mly"
+# 1070 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13055 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1046 "parser_cocci_menhir.mly"
+# 1070 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13126 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1046 "parser_cocci_menhir.mly"
+# 1070 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13199 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13205 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1054 "parser_cocci_menhir.mly"
+# 1078 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13278 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13284 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1054 "parser_cocci_menhir.mly"
+# 1078 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13359 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13365 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1054 "parser_cocci_menhir.mly"
+# 1078 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13445 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13451 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1054 "parser_cocci_menhir.mly"
+# 1078 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13543 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13548 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13554 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13559 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 13565 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13570 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1064 "parser_cocci_menhir.mly"
+# 1088 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13657 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13662 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13668 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13673 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 13679 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13684 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1064 "parser_cocci_menhir.mly"
+# 1088 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let _5 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13748 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13753 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13759 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_decl_var =
-# 1072 "parser_cocci_menhir.mly"
+# 1096 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.MacroDecl(_1,P.clt2mcode "(" _2,_3,
P.clt2mcode ")" _4,P.clt2mcode ";" _5))] )
# 13768 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13839 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13845 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13850 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13856 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13861 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 13867 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13872 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1078 "parser_cocci_menhir.mly"
+# 1102 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13969 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 13975 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13980 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 13986 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 13991 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 13997 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 14002 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1078 "parser_cocci_menhir.mly"
+# 1102 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 14061 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let id : 'tv_comma_list_typedef_ident_ = Obj.magic id in
let t : 'tv_typedef_ctype = Obj.magic t in
let s : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 14068 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_decl_var =
-# 1086 "parser_cocci_menhir.mly"
+# 1110 "parser_cocci_menhir.mly"
( let s = P.clt2mcode "typedef" s in
List.map
(function id ->
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_define_param_list_option =
-# 823 "parser_cocci_menhir.mly"
+# 847 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.DOTS
(_1
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 85 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Data.clt * token)
# 14128 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_defineop =
-# 779 "parser_cocci_menhir.mly"
+# 803 "parser_cocci_menhir.mly"
( let (clt,ident) = _1 in
function body ->
Ast0.wrap
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 14181 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_define_param_list_option = Obj.magic _2 in
let _1 : (
-# 86 "parser_cocci_menhir.mly"
+# 110 "parser_cocci_menhir.mly"
(Data.clt * token * int * int)
# 14187 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_defineop =
-# 796 "parser_cocci_menhir.mly"
+# 820 "parser_cocci_menhir.mly"
( let (clt,ident,parenoff,parencol) = _1 in
(* clt is the start of the #define itself *)
let (arity,line,lline,offset,col,strbef,straft,pos) = clt in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dep =
-# 231 "parser_cocci_menhir.mly"
+# 255 "parser_cocci_menhir.mly"
( _1 )
# 14237 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_dep =
-# 232 "parser_cocci_menhir.mly"
+# 256 "parser_cocci_menhir.mly"
( Ast.AndDep(_1, _3) )
# 14271 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_dep =
-# 233 "parser_cocci_menhir.mly"
+# 257 "parser_cocci_menhir.mly"
( Ast.OrDep (_1, _3) )
# 14305 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_depends =
-# 227 "parser_cocci_menhir.mly"
+# 251 "parser_cocci_menhir.mly"
( Ast.NoDep )
# 14322 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_parents_ in
let _v : 'tv_depends =
-# 228 "parser_cocci_menhir.mly"
+# 252 "parser_cocci_menhir.mly"
( parents )
# 14354 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_ident = Obj.magic _2 in
let _1 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 14381 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_designator =
-# 1190 "parser_cocci_menhir.mly"
+# 1214 "parser_cocci_menhir.mly"
( Ast0.DesignatorField (P.clt2mcode "." _1,_2) )
# 14388 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 14419 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 14425 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_designator =
-# 1192 "parser_cocci_menhir.mly"
+# 1216 "parser_cocci_menhir.mly"
( Ast0.DesignatorIndex (P.clt2mcode "[" _1,_2,P.clt2mcode "]" _3) )
# 14432 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _5 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 14473 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : 'tv_eexpr = Obj.magic _4 in
let _3 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14479 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 14485 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_designator =
-# 1194 "parser_cocci_menhir.mly"
+# 1218 "parser_cocci_menhir.mly"
( Ast0.DesignatorRange (P.clt2mcode "[" _1,_2,P.clt2mcode "..." _3,
_4,P.clt2mcode "]" _5) )
# 14493 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dexpr =
-# 1271 "parser_cocci_menhir.mly"
+# 1295 "parser_cocci_menhir.mly"
( _1 )
# 14517 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_disable =
-# 246 "parser_cocci_menhir.mly"
+# 270 "parser_cocci_menhir.mly"
( List.map P.id2name _2 )
# 14545 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14566 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dot_expressions =
-# 1280 "parser_cocci_menhir.mly"
+# 1304 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Edots(P.clt2mcode "..." _1,None)) )
# 14573 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dot_expressions =
-# 1281 "parser_cocci_menhir.mly"
+# 1305 "parser_cocci_menhir.mly"
( _1 )
# 14597 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dparam =
-# 819 "parser_cocci_menhir.mly"
+# 843 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DParam _1) )
# 14621 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14642 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_edots_when_TEllipsis_eexpr_ =
-# 2022 "parser_cocci_menhir.mly"
+# 2046 "parser_cocci_menhir.mly"
( (d,None) )
# 14649 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_eexpr = Obj.magic w in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14688 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__5_ in
let _v : 'tv_edots_when_TEllipsis_eexpr_ =
-# 2023 "parser_cocci_menhir.mly"
+# 2047 "parser_cocci_menhir.mly"
( (d,Some w) )
# 14695 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14716 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_edots_when_TEllipsis_enum_decl_one_ =
-# 2022 "parser_cocci_menhir.mly"
+# 2046 "parser_cocci_menhir.mly"
( (d,None) )
# 14723 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_enum_decl_one = Obj.magic w in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14762 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__5_ in
let _v : 'tv_edots_when_TEllipsis_enum_decl_one_ =
-# 2023 "parser_cocci_menhir.mly"
+# 2047 "parser_cocci_menhir.mly"
( (d,Some w) )
# 14769 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14790 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_edots_when_TEllipsis_initialize_ =
-# 2022 "parser_cocci_menhir.mly"
+# 2046 "parser_cocci_menhir.mly"
( (d,None) )
# 14797 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_initialize = Obj.magic w in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14836 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__5_ in
let _v : 'tv_edots_when_TEllipsis_initialize_ =
-# 2023 "parser_cocci_menhir.mly"
+# 2047 "parser_cocci_menhir.mly"
( (d,Some w) )
# 14843 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14864 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_edots_when_TEllipsis_struct_decl_one_ =
-# 2022 "parser_cocci_menhir.mly"
+# 2046 "parser_cocci_menhir.mly"
( (d,None) )
# 14871 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_struct_decl_one = Obj.magic w in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 14910 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__5_ in
let _v : 'tv_edots_when_TEllipsis_struct_decl_one_ =
-# 2023 "parser_cocci_menhir.mly"
+# 2047 "parser_cocci_menhir.mly"
( (d,Some w) )
# 14917 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_eexpr =
-# 1269 "parser_cocci_menhir.mly"
+# 1293 "parser_cocci_menhir.mly"
( _1 )
# 14941 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_eexpr_list_option =
-# 2002 "parser_cocci_menhir.mly"
+# 2026 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.DOTS
(_1
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_empty_list_start_aexpr_TEllipsis_ =
-# 1764 "parser_cocci_menhir.mly"
+# 1788 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 14986 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_aexpr_TEllipsis_ =
-# 1765 "parser_cocci_menhir.mly"
+# 1789 "parser_cocci_menhir.mly"
( _1 )
# 15010 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_empty_list_start_dparam_TEllipsis_ =
-# 1764 "parser_cocci_menhir.mly"
+# 1788 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15027 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_dparam_TEllipsis_ =
-# 1765 "parser_cocci_menhir.mly"
+# 1789 "parser_cocci_menhir.mly"
( _1 )
# 15051 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_empty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1764 "parser_cocci_menhir.mly"
+# 1788 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15068 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1765 "parser_cocci_menhir.mly"
+# 1789 "parser_cocci_menhir.mly"
( _1 )
# 15092 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_empty_list_start_one_dec_decl__TEllipsis_ =
-# 1764 "parser_cocci_menhir.mly"
+# 1788 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15109 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_one_dec_decl__TEllipsis_ =
-# 1765 "parser_cocci_menhir.mly"
+# 1789 "parser_cocci_menhir.mly"
( _1 )
# 15133 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_empty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1764 "parser_cocci_menhir.mly"
+# 1788 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15150 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1765 "parser_cocci_menhir.mly"
+# 1789 "parser_cocci_menhir.mly"
( _1 )
# 15174 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_decl_list =
-# 697 "parser_cocci_menhir.mly"
+# 721 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1 P.mkedots (fun c -> Ast0.EComma c))) )
# 15198 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_decl_one =
-# 669 "parser_cocci_menhir.mly"
+# 693 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 15222 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_enum_val = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 15254 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_enum_decl_one =
-# 671 "parser_cocci_menhir.mly"
+# 695 "parser_cocci_menhir.mly"
( let id = Ast0.wrap(Ast0.Ident(_1)) in
Ast0.wrap
(Ast0.Assignment
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 678 "parser_cocci_menhir.mly"
+# 702 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 15290 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 15311 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 680 "parser_cocci_menhir.mly"
+# 704 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 15319 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 15340 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 683 "parser_cocci_menhir.mly"
+# 707 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.CONST,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 15370 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 687 "parser_cocci_menhir.mly"
+# 711 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ANY,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 15400 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 691 "parser_cocci_menhir.mly"
+# 715 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ID,pure)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_exists =
-# 249 "parser_cocci_menhir.mly"
+# 273 "parser_cocci_menhir.mly"
( Ast.Exists )
# 15431 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_exists =
-# 250 "parser_cocci_menhir.mly"
+# 274 "parser_cocci_menhir.mly"
( Ast.Forall )
# 15453 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_exists =
-# 251 "parser_cocci_menhir.mly"
+# 275 "parser_cocci_menhir.mly"
( Ast.Undetermined )
# 15470 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_expr =
-# 1267 "parser_cocci_menhir.mly"
+# 1291 "parser_cocci_menhir.mly"
( _1 )
# 15494 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_r_ in
let _endpos = _endpos_r_ in
let _v : 'tv_expr_dots_TEllipsis_ =
-# 1451 "parser_cocci_menhir.mly"
+# 1475 "parser_cocci_menhir.mly"
( r )
# 15518 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 470 "parser_cocci_menhir.mly"
+# 494 "parser_cocci_menhir.mly"
( P.ty_pointerify Type_cocci.Unknown m )
# 15542 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 472 "parser_cocci_menhir.mly"
+# 496 "parser_cocci_menhir.mly"
( P.ty_pointerify (Type_cocci.EnumName Type_cocci.NoName) m )
# 15570 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 474 "parser_cocci_menhir.mly"
+# 498 "parser_cocci_menhir.mly"
( P.ty_pointerify
(Type_cocci.StructUnionName (Type_cocci.Struct,Type_cocci.NoName)) m )
# 15599 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 477 "parser_cocci_menhir.mly"
+# 501 "parser_cocci_menhir.mly"
( P.ty_pointerify
(Type_cocci.StructUnionName (Type_cocci.Union,Type_cocci.NoName)) m )
# 15628 "parser_cocci_menhir.ml"
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_extends =
-# 222 "parser_cocci_menhir.mly"
+# 246 "parser_cocci_menhir.mly"
( () )
# 15645 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let parent : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 15670 "parser_cocci_menhir.ml"
) = Obj.magic parent in
let _startpos = _startpos__1_ in
let _endpos = _endpos_parent_ in
let _v : 'tv_extends =
-# 224 "parser_cocci_menhir.mly"
+# 248 "parser_cocci_menhir.mly"
( !Data.install_bindings (parent) )
# 15677 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 87 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(string * Data.clt)
# 15703 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 87 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(string * Data.clt)
# 15708 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_filespec =
-# 734 "parser_cocci_menhir.mly"
+# 758 "parser_cocci_menhir.mly"
( [Ast0.wrap
(Ast0.FILEINFO(P.id2mcode _1,
P.id2mcode _2))] )
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fninfo =
-# 855 "parser_cocci_menhir.mly"
+# 879 "parser_cocci_menhir.mly"
( [] )
# 15734 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo =
-# 857 "parser_cocci_menhir.mly"
+# 881 "parser_cocci_menhir.mly"
( try
let _ =
List.find (function Ast0.FStorage(_) -> true | _ -> false) _2 in
let _startpos = _startpos_t_ in
let _endpos = _endpos_r_ in
let _v : 'tv_fninfo =
-# 862 "parser_cocci_menhir.mly"
+# 886 "parser_cocci_menhir.mly"
( (Ast0.FType(t))::r )
# 15798 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_fninfo = Obj.magic _2 in
let _1 : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 15825 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo =
-# 864 "parser_cocci_menhir.mly"
+# 888 "parser_cocci_menhir.mly"
( try
let _ = List.find (function Ast0.FInline(_) -> true | _ -> false) _2 in
raise (Semantic_cocci.Semantic "duplicate inline")
} = _menhir_stack in
let _2 : 'tv_fninfo = Obj.magic _2 in
let _1 : (
-# 58 "parser_cocci_menhir.mly"
+# 82 "parser_cocci_menhir.mly"
(string * Data.clt)
# 15862 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo =
-# 869 "parser_cocci_menhir.mly"
+# 893 "parser_cocci_menhir.mly"
( try
let _ = List.find (function Ast0.FAttr(_) -> true | _ -> false) _2 in
raise (Semantic_cocci.Semantic "multiple attributes")
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fninfo_nt =
-# 875 "parser_cocci_menhir.mly"
+# 899 "parser_cocci_menhir.mly"
( [] )
# 15889 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo_nt =
-# 877 "parser_cocci_menhir.mly"
+# 901 "parser_cocci_menhir.mly"
( try
let _ =
List.find (function Ast0.FStorage(_) -> true | _ -> false) _2 in
} = _menhir_stack in
let _2 : 'tv_fninfo_nt = Obj.magic _2 in
let _1 : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 15950 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo_nt =
-# 883 "parser_cocci_menhir.mly"
+# 907 "parser_cocci_menhir.mly"
( try
let _ = List.find (function Ast0.FInline(_) -> true | _ -> false) _2 in
raise (Semantic_cocci.Semantic "duplicate inline")
} = _menhir_stack in
let _2 : 'tv_fninfo_nt = Obj.magic _2 in
let _1 : (
-# 58 "parser_cocci_menhir.mly"
+# 82 "parser_cocci_menhir.mly"
(string * Data.clt)
# 15987 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo_nt =
-# 888 "parser_cocci_menhir.mly"
+# 912 "parser_cocci_menhir.mly"
( try
let _ = List.find (function Ast0.FAttr(_) -> true | _ -> false) _2 in
raise (Semantic_cocci.Semantic "duplicate init")
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fun_after_dots =
-# 1935 "parser_cocci_menhir.mly"
+# 1959 "parser_cocci_menhir.mly"
([])
# 16014 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots =
-# 1936 "parser_cocci_menhir.mly"
+# 1960 "parser_cocci_menhir.mly"
(_2)
# 16042 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots =
-# 1937 "parser_cocci_menhir.mly"
+# 1961 "parser_cocci_menhir.mly"
(Ast0.wrap(Ast0.Exp(_1))::_2)
# 16072 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots =
-# 1938 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
(_1@_2)
# 16102 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fun_after_dots_or =
-# 1945 "parser_cocci_menhir.mly"
+# 1969 "parser_cocci_menhir.mly"
([])
# 16119 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots_or =
-# 1946 "parser_cocci_menhir.mly"
+# 1970 "parser_cocci_menhir.mly"
(_2)
# 16147 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots_or =
-# 1947 "parser_cocci_menhir.mly"
+# 1971 "parser_cocci_menhir.mly"
(Ast0.wrap(Ast0.Exp(_1))::_2)
# 16177 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots_or =
-# 1948 "parser_cocci_menhir.mly"
+# 1972 "parser_cocci_menhir.mly"
(_1@_2)
# 16207 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_exp =
-# 1941 "parser_cocci_menhir.mly"
+# 1965 "parser_cocci_menhir.mly"
(_1::_2)
# 16237 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fun_after_exp_or =
-# 1951 "parser_cocci_menhir.mly"
+# 1975 "parser_cocci_menhir.mly"
([])
# 16254 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_exp_or =
-# 1952 "parser_cocci_menhir.mly"
+# 1976 "parser_cocci_menhir.mly"
(_1::_2)
# 16284 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fun_after_stm =
-# 1930 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
([])
# 16301 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_stm =
-# 1931 "parser_cocci_menhir.mly"
+# 1955 "parser_cocci_menhir.mly"
(_1::_2)
# 16331 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_stm =
-# 1932 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
(_1@_2)
# 16361 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_fun_start =
-# 1927 "parser_cocci_menhir.mly"
+# 1951 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1)) )
# 16385 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1693 "parser_cocci_menhir.mly"
+# 1717 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 16409 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 16430 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1695 "parser_cocci_menhir.mly"
+# 1719 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 16438 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 16459 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1698 "parser_cocci_menhir.mly"
+# 1722 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaFunc(P.clt2mcode nm clt,constraints,pure)) )
# 16467 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 16488 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1701 "parser_cocci_menhir.mly"
+# 1725 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap
(Ast0.MetaLocalFunc(P.clt2mcode nm clt,constraints,pure)) )
};
} = _menhir_stack in
let rb : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 16557 "parser_cocci_menhir.ml"
) = Obj.magic rb in
let b : 'tv_fun_start = Obj.magic b in
let lb : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 16563 "parser_cocci_menhir.ml"
) = Obj.magic lb in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 16568 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let d : 'tv_decl_list_decl_ = Obj.magic d in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 16574 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_f_ in
let _endpos = _endpos_rb_ in
let _v : 'tv_fundecl =
-# 846 "parser_cocci_menhir.mly"
+# 870 "parser_cocci_menhir.mly"
( P.verify_parameter_declarations (Ast0.undots d);
Ast0.wrap(Ast0.FunDecl((Ast0.default_info(),Ast0.context_befaft()),
f, i,
};
} = _menhir_stack in
let pt : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 16635 "parser_cocci_menhir.ml"
) = Obj.magic pt in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 16640 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 16646 "parser_cocci_menhir.ml"
) = Obj.magic lp in
in
-# 834 "parser_cocci_menhir.mly"
+# 858 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.UnInit
(s,
};
} = _menhir_stack in
let pt : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 16719 "parser_cocci_menhir.ml"
) = Obj.magic pt in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 16724 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 16730 "parser_cocci_menhir.ml"
) = Obj.magic lp in
in
-# 834 "parser_cocci_menhir.mly"
+# 858 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.UnInit
(s,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_ident =
-# 1706 "parser_cocci_menhir.mly"
+# 1730 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 16778 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 16799 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_ident =
-# 1708 "parser_cocci_menhir.mly"
+# 1732 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 16807 "parser_cocci_menhir.ml"
let _startpos = _startpos_i_ in
let _endpos = _endpos_i_ in
let _v : 'tv_ident_or_const =
-# 1666 "parser_cocci_menhir.mly"
+# 1690 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(Ast0.wrap(Ast0.Id(P.id2mcode i)))) )
# 16831 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16852 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_ident_or_const =
-# 1668 "parser_cocci_menhir.mly"
+# 1692 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 16860 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 84 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16881 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_incl =
-# 262 "parser_cocci_menhir.mly"
+# 286 "parser_cocci_menhir.mly"
( let (x,_) = _1 in Data.Include(x) )
# 16888 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16913 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_incl =
-# 263 "parser_cocci_menhir.mly"
+# 287 "parser_cocci_menhir.mly"
( Data.Iso(Common.Left(P.id2name _2)) )
# 16920 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 83 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(string)
# 16945 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_incl =
-# 264 "parser_cocci_menhir.mly"
+# 288 "parser_cocci_menhir.mly"
( Data.Iso(Common.Right _2) )
# 16952 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_incl =
-# 266 "parser_cocci_menhir.mly"
+# 290 "parser_cocci_menhir.mly"
( let names = List.map P.id2name _2 in
(* ensure that the names of virtual and real rules don't overlap *)
List.iter
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 152 "parser_cocci_menhir.mly"
+# 176 "parser_cocci_menhir.mly"
(Data.incl_iso list)
# 17013 "parser_cocci_menhir.ml"
) =
-# 258 "parser_cocci_menhir.mly"
+# 282 "parser_cocci_menhir.mly"
( _1 )
# 17017 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 152 "parser_cocci_menhir.mly"
+# 176 "parser_cocci_menhir.mly"
(Data.incl_iso list)
# 17045 "parser_cocci_menhir.ml"
) =
-# 259 "parser_cocci_menhir.mly"
+# 283 "parser_cocci_menhir.mly"
( _1 )
# 17049 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 84 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17070 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_includes =
-# 740 "parser_cocci_menhir.mly"
+# 764 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Include(P.clt2mcode "#include"
(P.drop_pos (P.drop_aft (P.id2clt _1))),
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 84 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17107 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_includes =
-# 751 "parser_cocci_menhir.mly"
+# 775 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Include(P.clt2mcode "#include"
(P.drop_pos (P.drop_aft (P.id2clt _1))),
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_includes =
-# 762 "parser_cocci_menhir.mly"
+# 786 "parser_cocci_menhir.mly"
( d (Ast0.wrap(Ast0.DOTS([]))) )
# 17151 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_d_ in
let _endpos = _endpos__3_ in
let _v : 'tv_includes =
-# 764 "parser_cocci_menhir.mly"
+# 788 "parser_cocci_menhir.mly"
( let ty = Ast0.wrap(Ast0.TopExp(Ast0.wrap(Ast0.TypeExp(t)))) in
d (Ast0.wrap(Ast0.DOTS([ty]))) )
# 17186 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_includes =
-# 767 "parser_cocci_menhir.mly"
+# 791 "parser_cocci_menhir.mly"
( let body =
match b with
[e] ->
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize =
-# 1159 "parser_cocci_menhir.mly"
+# 1183 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitExpr(_1)) )
# 17252 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 17283 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_initialize_list = Obj.magic _2 in
let _1 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 17289 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize =
-# 1161 "parser_cocci_menhir.mly"
+# 1185 "parser_cocci_menhir.mly"
( if P.struct_initializer _2
then
let il = P.drop_dot_commas _2 in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 17322 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize =
-# 1168 "parser_cocci_menhir.mly"
+# 1192 "parser_cocci_menhir.mly"
(let (nm,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaInit(P.clt2mcode nm clt,pure)) )
# 17330 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize2 =
-# 1174 "parser_cocci_menhir.mly"
+# 1198 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitExpr(_1)) )
# 17354 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 17385 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_initialize_list = Obj.magic _2 in
let _1 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 17391 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize2 =
-# 1176 "parser_cocci_menhir.mly"
+# 1200 "parser_cocci_menhir.mly"
( if P.struct_initializer _2
then
let il = P.drop_dot_commas _2 in
} = _menhir_stack in
let _3 : 'tv_initialize2 = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 17435 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize2 =
-# 1184 "parser_cocci_menhir.mly"
+# 1208 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitGccExt(_1,P.clt2mcode "=" _2,_3)) )
# 17443 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_initialize2 = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 17475 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize2 =
-# 1186 "parser_cocci_menhir.mly"
+# 1210 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitGccName(_1,P.clt2mcode ":" _2,_3)) )
# 17483 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize_list =
-# 1199 "parser_cocci_menhir.mly"
+# 1223 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1 P.mkidots (fun c -> Ast0.IComma c))) )
# 17507 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_invalid =
-# 1277 "parser_cocci_menhir.mly"
+# 1301 "parser_cocci_menhir.mly"
( raise (Semantic_cocci.Semantic "not matchable") )
# 17529 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_is_expression =
-# 254 "parser_cocci_menhir.mly"
+# 278 "parser_cocci_menhir.mly"
( false )
# 17546 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_is_expression =
-# 255 "parser_cocci_menhir.mly"
+# 279 "parser_cocci_menhir.mly"
( true )
# 17568 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_ctype_ =
-# 2078 "parser_cocci_menhir.mly"
+# 2102 "parser_cocci_menhir.mly"
( Common.Left t )
# 17596 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_ctype_ =
-# 2079 "parser_cocci_menhir.mly"
+# 2103 "parser_cocci_menhir.mly"
( Common.Right t )
# 17624 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_decl_var_ =
-# 2078 "parser_cocci_menhir.mly"
+# 2102 "parser_cocci_menhir.mly"
( Common.Left t )
# 17652 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_decl_var_ =
-# 2079 "parser_cocci_menhir.mly"
+# 2103 "parser_cocci_menhir.mly"
( Common.Right t )
# 17680 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_eexpr_ =
-# 2078 "parser_cocci_menhir.mly"
+# 2102 "parser_cocci_menhir.mly"
( Common.Left t )
# 17708 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_eexpr_ =
-# 2079 "parser_cocci_menhir.mly"
+# 2103 "parser_cocci_menhir.mly"
( Common.Right t )
# 17736 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_nest_start_ =
-# 2078 "parser_cocci_menhir.mly"
+# 2102 "parser_cocci_menhir.mly"
( Common.Left t )
# 17764 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_nest_start_ =
-# 2079 "parser_cocci_menhir.mly"
+# 2103 "parser_cocci_menhir.mly"
( Common.Right t )
# 17792 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_single_statement_ =
-# 2078 "parser_cocci_menhir.mly"
+# 2102 "parser_cocci_menhir.mly"
( Common.Left t )
# 17820 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_single_statement_ =
-# 2079 "parser_cocci_menhir.mly"
+# 2103 "parser_cocci_menhir.mly"
( Common.Right t )
# 17848 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 17886 "parser_cocci_menhir.ml"
) =
-# 2046 "parser_cocci_menhir.mly"
+# 2070 "parser_cocci_menhir.mly"
( let fn x = Ast0.ExprTag x in P.iso_adjust fn fn e1 el )
# 17890 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 17928 "parser_cocci_menhir.ml"
) =
-# 2048 "parser_cocci_menhir.mly"
+# 2072 "parser_cocci_menhir.mly"
( let fn x = Ast0.ArgExprTag x in P.iso_adjust fn fn e1 el )
# 17932 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 17970 "parser_cocci_menhir.ml"
) =
-# 2050 "parser_cocci_menhir.mly"
+# 2074 "parser_cocci_menhir.mly"
( let fn x = Ast0.TestExprTag x in P.iso_adjust fn fn e1 el )
# 17974 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18012 "parser_cocci_menhir.ml"
) =
-# 2052 "parser_cocci_menhir.mly"
+# 2076 "parser_cocci_menhir.mly"
( let ffn x = Ast0.ExprTag x in
let fn x = Ast0.TestExprTag x in
P.iso_adjust ffn fn e1 el )
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18056 "parser_cocci_menhir.ml"
) =
-# 2056 "parser_cocci_menhir.mly"
+# 2080 "parser_cocci_menhir.mly"
( let fn x = Ast0.StmtTag x in P.iso_adjust fn fn s1 sl )
# 18060 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18098 "parser_cocci_menhir.ml"
) =
-# 2058 "parser_cocci_menhir.mly"
+# 2082 "parser_cocci_menhir.mly"
( let fn x = Ast0.TypeCTag x in P.iso_adjust fn fn t1 tl )
# 18102 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18140 "parser_cocci_menhir.ml"
) =
-# 2060 "parser_cocci_menhir.mly"
+# 2084 "parser_cocci_menhir.mly"
( let fn x = Ast0.DotsStmtTag x in P.iso_adjust fn fn e1 el )
# 18144 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18182 "parser_cocci_menhir.ml"
) =
-# 2062 "parser_cocci_menhir.mly"
+# 2086 "parser_cocci_menhir.mly"
( let check_one = function
[x] -> x
| _ ->
let _startpos = _startpos_m_ in
let _endpos = _endpos_m_ in
let _v : (
-# 171 "parser_cocci_menhir.mly"
+# 195 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 18223 "parser_cocci_menhir.ml"
) =
-# 188 "parser_cocci_menhir.mly"
+# 212 "parser_cocci_menhir.mly"
( m "" )
# 18227 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_nm_ in
let _endpos = _endpos__2_ in
let _v : (
-# 155 "parser_cocci_menhir.mly"
+# 179 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 18255 "parser_cocci_menhir.ml"
) =
-# 203 "parser_cocci_menhir.mly"
+# 227 "parser_cocci_menhir.mly"
( P.make_iso_rule_name_result (P.id2name nm) )
# 18259 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 18280 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_iter_ident =
-# 1720 "parser_cocci_menhir.mly"
+# 1744 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 18287 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 66 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 18308 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_iter_ident =
-# 1722 "parser_cocci_menhir.mly"
+# 1746 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 18316 "parser_cocci_menhir.ml"
} = _menhir_stack in
let xs : 'tv_list_TMul_ = Obj.magic xs in
let x : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 18360 "parser_cocci_menhir.ml"
) = Obj.magic x in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_list_len =
-# 335 "parser_cocci_menhir.mly"
+# 359 "parser_cocci_menhir.mly"
( Common.Left _1 )
# 19252 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 19273 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_list_len =
-# 336 "parser_cocci_menhir.mly"
+# 360 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in Common.Right (int_of_string x) )
# 19280 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos_t_ in
let _v : 'tv_meta_exp_type =
-# 513 "parser_cocci_menhir.mly"
+# 537 "parser_cocci_menhir.mly"
( [Ast0_cocci.ast0_type_to_type t] )
# 19550 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos__3_ in
let _v : 'tv_meta_exp_type =
-# 515 "parser_cocci_menhir.mly"
+# 539 "parser_cocci_menhir.mly"
( [Type_cocci.Array (Ast0_cocci.ast0_type_to_type t)] )
# 19582 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_meta_exp_type =
-# 517 "parser_cocci_menhir.mly"
+# 541 "parser_cocci_menhir.mly"
( List.map
(function x -> P.ty_pointerify (Ast0_cocci.ast0_type_to_type x) m)
t )
} = _menhir_stack in
let _3 : 'tv_pure_ident = Obj.magic _3 in
let _1 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 19653 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_meta_ident =
-# 1489 "parser_cocci_menhir.mly"
+# 1513 "parser_cocci_menhir.mly"
( (Some _1,P.id2name _3) )
# 19660 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_pure_ident_kwd = Obj.magic _3 in
let _1 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 19691 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_meta_ident =
-# 1490 "parser_cocci_menhir.mly"
+# 1514 "parser_cocci_menhir.mly"
( (Some _1,_3) )
# 19698 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos_m_ in
let _v : (
-# 163 "parser_cocci_menhir.mly"
+# 187 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 19722 "parser_cocci_menhir.ml"
) =
-# 187 "parser_cocci_menhir.mly"
+# 211 "parser_cocci_menhir.mly"
( m (!Ast0.rule_name) )
# 19726 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 347 "parser_cocci_menhir.mly"
+# 371 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaParamDecl(arity,name)) in
!Data.add_param_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 19779 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 351 "parser_cocci_menhir.mly"
+# 375 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let len = Ast.AnyLen in
let tok = check_meta(Ast.MetaParamListDecl(arity,name,len)) in
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 19837 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 356 "parser_cocci_menhir.mly"
+# 380 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let len = Ast.AnyLen in
let tok = check_meta(Ast.MetaExpListDecl(arity,name,len)) in
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 19895 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 361 "parser_cocci_menhir.mly"
+# 385 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaTypeDecl(arity,name)) in
!Data.add_type_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 19948 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 365 "parser_cocci_menhir.mly"
+# 389 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaInitDecl(arity,name)) in
!Data.add_init_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20001 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 369 "parser_cocci_menhir.mly"
+# 393 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaStmDecl(arity,name)) in
!Data.add_stm_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20054 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 373 "parser_cocci_menhir.mly"
+# 397 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaDeclDecl(arity,name)) in
!Data.add_decl_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20107 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 377 "parser_cocci_menhir.mly"
+# 401 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaFieldDecl(arity,name)) in
!Data.add_field_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20160 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 381 "parser_cocci_menhir.mly"
+# 405 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaStmListDecl(arity,name)) in
!Data.add_stmlist_meta name pure; tok) )
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20217 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 385 "parser_cocci_menhir.mly"
+# 409 "parser_cocci_menhir.mly"
( (fun arity (_,name) pure check_meta ->
if arity = Ast.NONE && pure = Ast0.Impure
then (!Data.add_type_name name; [])
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20271 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 390 "parser_cocci_menhir.mly"
+# 414 "parser_cocci_menhir.mly"
( (fun arity (_,name) pure check_meta ->
if arity = Ast.NONE && pure = Ast0.Impure
then (!Data.add_declarer_name name; [])
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20329 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 395 "parser_cocci_menhir.mly"
+# 419 "parser_cocci_menhir.mly"
( (fun arity (_,name) pure check_meta ->
if arity = Ast.NONE && pure = Ast0.Impure
then (!Data.add_iterator_name name; [])
in
-# 276 "parser_cocci_menhir.mly"
+# 300 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20387 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__4_ in
let _v : 'tv_metadec = let kindfn =
-# 340 "parser_cocci_menhir.mly"
+# 364 "parser_cocci_menhir.mly"
( (fun name check_meta seed ->
let tok = check_meta(Ast.MetaFreshIdDecl(name,seed)) in
!Data.add_fresh_id_meta name; tok) )
in
-# 279 "parser_cocci_menhir.mly"
+# 303 "parser_cocci_menhir.mly"
( P.create_fresh_metadec kindfn ids )
# 20432 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 402 "parser_cocci_menhir.mly"
+# 426 "parser_cocci_menhir.mly"
(
let idfn arity name pure check_meta constraints =
let tok = check_meta(Ast.MetaIdDecl(arity,name)) in
in
-# 285 "parser_cocci_menhir.mly"
+# 309 "parser_cocci_menhir.mly"
( let (normal,virt) = Common.partition_either (fun x -> x) ids in
let (idfn,virtfn) = kindfn in
function cr ->
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 418 "parser_cocci_menhir.mly"
+# 442 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaFuncDecl(arity,name)) in
!Data.add_func_meta name constraints pure; tok) )
in
-# 294 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20552 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 422 "parser_cocci_menhir.mly"
+# 446 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaLocalFuncDecl(arity,name)) in
!Data.add_local_func_meta name constraints pure;
in
-# 294 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20610 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 427 "parser_cocci_menhir.mly"
+# 451 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaDeclarerDecl(arity,name)) in
!Data.add_declarer_meta name constraints pure; tok) )
in
-# 294 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20663 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 431 "parser_cocci_menhir.mly"
+# 455 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaIteratorDecl(arity,name)) in
!Data.add_iterator_meta name constraints pure; tok) )
in
-# 294 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20716 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 437 "parser_cocci_menhir.mly"
+# 461 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaErrDecl(arity,name)) in
!Data.add_err_meta name constraints pure; tok) )
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20769 "parser_cocci_menhir.ml"
in
in
-# 441 "parser_cocci_menhir.mly"
+# 465 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
match l with
None ->
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20841 "parser_cocci_menhir.ml"
in
in
-# 441 "parser_cocci_menhir.mly"
+# 465 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
match l with
None ->
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20921 "parser_cocci_menhir.ml"
in
let m = m0 in
let l = l0 in
-# 450 "parser_cocci_menhir.mly"
+# 474 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let ty = Some [P.ty_pointerify Type_cocci.Unknown m] in
match l with
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 20994 "parser_cocci_menhir.ml"
in
let _v : 'tv_metadec = let kindfn =
let ty = ty0 in
-# 460 "parser_cocci_menhir.mly"
+# 484 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let ty = Some [ty] in
let tok = check_meta(Ast.MetaExpDecl(arity,name,ty)) in
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21055 "parser_cocci_menhir.ml"
in
in
-# 465 "parser_cocci_menhir.mly"
+# 489 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaConstDecl(arity,name,ty)) in
!Data.add_const_meta ty name constraints pure; tok) )
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21115 "parser_cocci_menhir.ml"
in
in
-# 465 "parser_cocci_menhir.mly"
+# 489 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaConstDecl(arity,name,ty)) in
!Data.add_const_meta ty name constraints pure; tok) )
in
-# 299 "parser_cocci_menhir.mly"
+# 323 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21183 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 482 "parser_cocci_menhir.mly"
+# 506 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let tok = check_meta(Ast.MetaExpDecl(arity,name,None)) in
!Data.add_exp_meta None name constraints pure; tok) )
in
-# 304 "parser_cocci_menhir.mly"
+# 328 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21236 "parser_cocci_menhir.ml"
in
let _v : 'tv_metadec = let kindfn =
let vl = vl0 in
-# 486 "parser_cocci_menhir.mly"
+# 510 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let ty = Some vl in
(match constraints with
in
-# 304 "parser_cocci_menhir.mly"
+# 328 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21313 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_ar_ in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec =
-# 310 "parser_cocci_menhir.mly"
+# 334 "parser_cocci_menhir.mly"
( (if !Data.in_generating
then failwith "position variables not allowed in a generated rule file");
let kindfn arity name pure check_meta constraints =
let _startpos = _startpos_ar_ in
let _endpos = _endpos__9_ in
let _v : 'tv_metadec =
-# 320 "parser_cocci_menhir.mly"
+# 344 "parser_cocci_menhir.mly"
( P.create_len_metadec ar ispure
(fun lenname arity name pure check_meta ->
let tok = check_meta(Ast.MetaParamListDecl(arity,name,lenname)) in
let _startpos = _startpos_ar_ in
let _endpos = _endpos__9_ in
let _v : 'tv_metadec =
-# 328 "parser_cocci_menhir.mly"
+# 352 "parser_cocci_menhir.mly"
( P.create_len_metadec ar ispure
(fun lenname arity name pure check_meta ->
let tok = check_meta(Ast.MetaExpListDecl(arity,name,lenname)) in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_ctype_ctype_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21525 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_eexpr_eexpr_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21555 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_expr_eexpr_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21585 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_fun_after_stm_fun_after_dots_or_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21615 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_fun_start_fun_start_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21645 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_rule_elem_statement_rule_elem_statement_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21675 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_statement_statement_ =
-# 2016 "parser_cocci_menhir.mly"
+# 2040 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 21705 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_minus_body =
-# 708 "parser_cocci_menhir.mly"
+# 732 "parser_cocci_menhir.mly"
( match f@b(*@ew*) with
[] -> raise (Semantic_cocci.Semantic "minus slice can't be empty")
| code -> Top_level.top_level code )
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_minus_exp_body =
-# 722 "parser_cocci_menhir.mly"
+# 746 "parser_cocci_menhir.mly"
( match f@[b](*@ew*) with
[] -> raise (Semantic_cocci.Semantic "minus slice can't be empty")
| code -> Top_level.top_level code )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 143 "parser_cocci_menhir.mly"
+# 167 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 21797 "parser_cocci_menhir.ml"
) =
-# 183 "parser_cocci_menhir.mly"
+# 207 "parser_cocci_menhir.mly"
( _1 )
# 21801 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 143 "parser_cocci_menhir.mly"
+# 167 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 21829 "parser_cocci_menhir.ml"
) =
-# 183 "parser_cocci_menhir.mly"
+# 207 "parser_cocci_menhir.mly"
( m )
# 21833 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 143 "parser_cocci_menhir.mly"
+# 167 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 21861 "parser_cocci_menhir.ml"
) =
-# 184 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
( m )
# 21865 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 140 "parser_cocci_menhir.mly"
+# 164 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 21893 "parser_cocci_menhir.ml"
) =
-# 179 "parser_cocci_menhir.mly"
+# 203 "parser_cocci_menhir.mly"
( _1 )
# 21897 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 140 "parser_cocci_menhir.mly"
+# 164 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 21925 "parser_cocci_menhir.ml"
) =
-# 179 "parser_cocci_menhir.mly"
+# 203 "parser_cocci_menhir.mly"
( m )
# 21929 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 140 "parser_cocci_menhir.mly"
+# 164 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 21957 "parser_cocci_menhir.ml"
) =
-# 180 "parser_cocci_menhir.mly"
+# 204 "parser_cocci_menhir.mly"
( m )
# 21961 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 1841 "parser_cocci_menhir.mly"
+# 1865 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.DECL(_1))] )
# 21985 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 1842 "parser_cocci_menhir.mly"
+# 1866 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Ty(_1))))] )
# 22009 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 1843 "parser_cocci_menhir.mly"
+# 1867 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.TopInit(_1))))] )
# 22033 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 1845 "parser_cocci_menhir.mly"
+# 1869 "parser_cocci_menhir.mly"
( List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1 )
# 22057 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_ctype = Obj.magic b in
let a : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22084 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_ctype_ =
-# 2019 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 22091 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_eexpr = Obj.magic b in
let a : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22118 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_eexpr_ =
-# 2019 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 22125 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_fun_after_dots_or = Obj.magic b in
let a : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22152 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_fun_after_dots_or_ =
-# 2019 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 22159 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_fun_start = Obj.magic b in
let a : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22186 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_fun_start_ =
-# 2019 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 22193 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_rule_elem_statement = Obj.magic b in
let a : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22220 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_rule_elem_statement_ =
-# 2019 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 22227 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_statement = Obj.magic b in
let a : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22254 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_statement_ =
-# 2019 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 22261 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_name_opt_decl =
-# 915 "parser_cocci_menhir.mly"
+# 939 "parser_cocci_menhir.mly"
( _1 )
# 22285 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22336 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 22342 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 22347 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let s : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 22352 "parser_cocci_menhir.ml"
) = Obj.magic s in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 22357 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_t_ in
let _endpos = _endpos_rp1_ in
let _v : 'tv_name_opt_decl =
-# 918 "parser_cocci_menhir.mly"
+# 942 "parser_cocci_menhir.mly"
( let fnptr =
Ast0.wrap
(Ast0.FunctionPointer
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_dots =
-# 1961 "parser_cocci_menhir.mly"
+# 1985 "parser_cocci_menhir.mly"
(_1@_2)
# 22400 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_dots =
-# 1962 "parser_cocci_menhir.mly"
+# 1986 "parser_cocci_menhir.mly"
(_2)
# 22428 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_dots =
-# 1963 "parser_cocci_menhir.mly"
+# 1987 "parser_cocci_menhir.mly"
((Ast0.wrap(Ast0.Exp(_1)))::_2)
# 22458 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_nest_after_exp =
-# 1971 "parser_cocci_menhir.mly"
+# 1995 "parser_cocci_menhir.mly"
([])
# 22475 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_exp =
-# 1972 "parser_cocci_menhir.mly"
+# 1996 "parser_cocci_menhir.mly"
(_1::_2)
# 22505 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_nest_after_stm =
-# 1966 "parser_cocci_menhir.mly"
+# 1990 "parser_cocci_menhir.mly"
([])
# 22522 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_stm =
-# 1967 "parser_cocci_menhir.mly"
+# 1991 "parser_cocci_menhir.mly"
(_1::_2)
# 22552 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_stm =
-# 1968 "parser_cocci_menhir.mly"
+# 1992 "parser_cocci_menhir.mly"
(_1@_2)
# 22582 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 22613 "parser_cocci_menhir.ml"
) = Obj.magic c in
let e : 'tv_expr_dots_TEllipsis_ = Obj.magic e in
let _1 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 22619 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_nest_expressions =
-# 1286 "parser_cocci_menhir.mly"
+# 1310 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.NestExpr(P.clt2mcode "<..." _1,
Ast0.wrap(Ast0.DOTS(e (P.mkedots "..."))),
P.clt2mcode "...>" c, None, false)) )
};
} = _menhir_stack in
let c : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 22659 "parser_cocci_menhir.ml"
) = Obj.magic c in
let e : 'tv_expr_dots_TEllipsis_ = Obj.magic e in
let _1 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 22665 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_nest_expressions =
-# 1290 "parser_cocci_menhir.mly"
+# 1314 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.NestExpr(P.clt2mcode "<+..." _1,
Ast0.wrap(Ast0.DOTS(e (P.mkedots "..."))),
P.clt2mcode "...+>" c, None, true)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nest_start =
-# 1958 "parser_cocci_menhir.mly"
+# 1982 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1)) )
# 22698 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : (
-# 174 "parser_cocci_menhir.mly"
+# 198 "parser_cocci_menhir.mly"
(unit)
# 22720 "parser_cocci_menhir.ml"
) =
-# 2086 "parser_cocci_menhir.mly"
+# 2110 "parser_cocci_menhir.mly"
( () )
# 22724 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 174 "parser_cocci_menhir.mly"
+# 198 "parser_cocci_menhir.mly"
(unit)
# 22750 "parser_cocci_menhir.ml"
) =
-# 2087 "parser_cocci_menhir.mly"
+# 2111 "parser_cocci_menhir.mly"
( () )
# 22754 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : (
-# 174 "parser_cocci_menhir.mly"
+# 198 "parser_cocci_menhir.mly"
(unit)
# 22776 "parser_cocci_menhir.ml"
) =
-# 2088 "parser_cocci_menhir.mly"
+# 2112 "parser_cocci_menhir.mly"
( () )
# 22780 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_g_ in
let _endpos = _endpos_dg_ in
let _v : 'tv_no_dot_start_end_dexpr_edots_when_TEllipsis_eexpr__ =
-# 1456 "parser_cocci_menhir.mly"
+# 1480 "parser_cocci_menhir.mly"
( function dot_builder ->
g :: (List.concat(List.map (function (d,g) -> [dot_builder d;g]) dg)) )
# 22811 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let x : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 22832 "parser_cocci_menhir.ml"
) = Obj.magic x in
} = _menhir_stack in
let xs : 'tv_nonempty_list_TMul_ = Obj.magic xs in
let x : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 22866 "parser_cocci_menhir.ml"
) = Obj.magic x in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1768 "parser_cocci_menhir.mly"
+# 1792 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 22897 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 22923 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1770 "parser_cocci_menhir.mly"
+# 1794 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 22932 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_aexpr_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 22964 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1773 "parser_cocci_menhir.mly"
+# 1797 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1776 "parser_cocci_menhir.mly"
+# 1800 "parser_cocci_menhir.mly"
( _2 )
# 23002 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23023 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1777 "parser_cocci_menhir.mly"
+# 1801 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 23030 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23056 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23061 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1779 "parser_cocci_menhir.mly"
+# 1803 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23069 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_aexpr_TEllipsis_ = Obj.magic r in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23101 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23106 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_nonempty_list_start_aexpr_TEllipsis_ =
-# 1782 "parser_cocci_menhir.mly"
+# 1806 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
(build_dots "..." d)::
(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1768 "parser_cocci_menhir.mly"
+# 1792 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 23140 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23166 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1770 "parser_cocci_menhir.mly"
+# 1794 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23175 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_dparam_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23207 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1773 "parser_cocci_menhir.mly"
+# 1797 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1776 "parser_cocci_menhir.mly"
+# 1800 "parser_cocci_menhir.mly"
( _2 )
# 23245 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23266 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1777 "parser_cocci_menhir.mly"
+# 1801 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 23273 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23299 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23304 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1779 "parser_cocci_menhir.mly"
+# 1803 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23312 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_dparam_TEllipsis_ = Obj.magic r in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23344 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23349 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_nonempty_list_start_dparam_TEllipsis_ =
-# 1782 "parser_cocci_menhir.mly"
+# 1806 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
(build_dots "..." d)::
(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1768 "parser_cocci_menhir.mly"
+# 1792 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 23383 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23409 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1770 "parser_cocci_menhir.mly"
+# 1794 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23418 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23450 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1773 "parser_cocci_menhir.mly"
+# 1797 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1776 "parser_cocci_menhir.mly"
+# 1800 "parser_cocci_menhir.mly"
( _2 )
# 23488 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1777 "parser_cocci_menhir.mly"
+# 1801 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 23512 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23538 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1779 "parser_cocci_menhir.mly"
+# 1803 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23547 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ = Obj.magic r in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23579 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_nonempty_list_start_enum_decl_one_edots_when_TEllipsis_enum_decl_one__ =
-# 1782 "parser_cocci_menhir.mly"
+# 1806 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
(build_dots "..." d)::
(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1768 "parser_cocci_menhir.mly"
+# 1792 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 23614 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23640 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1770 "parser_cocci_menhir.mly"
+# 1794 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23649 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23681 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1773 "parser_cocci_menhir.mly"
+# 1797 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1776 "parser_cocci_menhir.mly"
+# 1800 "parser_cocci_menhir.mly"
( _2 )
# 23719 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1777 "parser_cocci_menhir.mly"
+# 1801 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 23743 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23769 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1779 "parser_cocci_menhir.mly"
+# 1803 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23778 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_initialize2_edots_when_TEllipsis_initialize__ = Obj.magic r in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23810 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ =
-# 1782 "parser_cocci_menhir.mly"
+# 1806 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
(build_dots "..." d)::
(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1768 "parser_cocci_menhir.mly"
+# 1792 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 23845 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23871 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1770 "parser_cocci_menhir.mly"
+# 1794 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 23880 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 23912 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1773 "parser_cocci_menhir.mly"
+# 1797 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1776 "parser_cocci_menhir.mly"
+# 1800 "parser_cocci_menhir.mly"
( _2 )
# 23950 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 23971 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1777 "parser_cocci_menhir.mly"
+# 1801 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 23978 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24004 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 24009 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1779 "parser_cocci_menhir.mly"
+# 1803 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24017 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_one_dec_decl__TEllipsis_ = Obj.magic r in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24049 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 24054 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ =
-# 1782 "parser_cocci_menhir.mly"
+# 1806 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
(build_dots "..." d)::
(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1768 "parser_cocci_menhir.mly"
+# 1792 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 24088 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24114 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1770 "parser_cocci_menhir.mly"
+# 1794 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24123 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24155 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1773 "parser_cocci_menhir.mly"
+# 1797 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
(_3 build_dots build_comma) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1776 "parser_cocci_menhir.mly"
+# 1800 "parser_cocci_menhir.mly"
( _2 )
# 24193 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 24214 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_d_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1777 "parser_cocci_menhir.mly"
+# 1801 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 24221 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24247 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 24252 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1779 "parser_cocci_menhir.mly"
+# 1803 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24260 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_one_dec_name_opt_decl__TEllipsis_ = Obj.magic r in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24292 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 24297 "parser_cocci_menhir.ml"
) = Obj.magic d in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_nonempty_list_start_one_dec_name_opt_decl__TEllipsis_ =
-# 1782 "parser_cocci_menhir.mly"
+# 1806 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
(build_dots "..." d)::
(Ast0.wrap(build_comma(P.clt2mcode "," _2)))::
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_not_ceq =
-# 1629 "parser_cocci_menhir.mly"
+# 1653 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_not_ceq =
-# 1635 "parser_cocci_menhir.mly"
+# 1659 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos_ceq_ in
let _endpos = _endpos_ceq_ in
let _v : 'tv_not_ceq_or_sub =
-# 1605 "parser_cocci_menhir.mly"
+# 1629 "parser_cocci_menhir.mly"
(Ast0.NotExpCstrt ceq)
# 24403 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_not_ceq_or_sub =
-# 1606 "parser_cocci_menhir.mly"
+# 1630 "parser_cocci_menhir.mly"
(Ast0.SubExpCstrt s)
# 24427 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_not_eqe =
-# 1610 "parser_cocci_menhir.mly"
+# 1634 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_not_eqe =
-# 1617 "parser_cocci_menhir.mly"
+# 1641 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_not_eqid =
-# 1567 "parser_cocci_menhir.mly"
+# 1591 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_not_eqid =
-# 1581 "parser_cocci_menhir.mly"
+# 1605 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_not_pos =
-# 1673 "parser_cocci_menhir.mly"
+# 1697 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_not_pos =
-# 1682 "parser_cocci_menhir.mly"
+# 1706 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_dec_decl_ =
-# 1743 "parser_cocci_menhir.mly"
+# 1767 "parser_cocci_menhir.mly"
( _1 )
# 24699 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 70 "parser_cocci_menhir.mly"
+# 94 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 24720 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_dec_decl_ =
-# 1745 "parser_cocci_menhir.mly"
+# 1769 "parser_cocci_menhir.mly"
( let (nm,lenname,pure,clt) = _1 in
let nm = P.clt2mcode nm clt in
let lenname =
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_dec_name_opt_decl_ =
-# 1743 "parser_cocci_menhir.mly"
+# 1767 "parser_cocci_menhir.mly"
( _1 )
# 24758 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 70 "parser_cocci_menhir.mly"
+# 94 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 24779 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_dec_name_opt_decl_ =
-# 1745 "parser_cocci_menhir.mly"
+# 1769 "parser_cocci_menhir.mly"
( let (nm,lenname,pure,clt) = _1 in
let nm = P.clt2mcode nm clt in
let lenname =
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24819 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_one_decl_var =
-# 1094 "parser_cocci_menhir.mly"
+# 1118 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TyDecl(t,P.clt2mcode ";" pv)) )
# 24827 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 24848 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_decl_var =
-# 1095 "parser_cocci_menhir.mly"
+# 1119 "parser_cocci_menhir.mly"
( P.meta_decl _1 )
# 24855 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24886 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1097 "parser_cocci_menhir.mly"
+# 1121 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.UnInit(s,fn t,id,P.clt2mcode ";" pv)) )
# 24903 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 24939 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1097 "parser_cocci_menhir.mly"
+# 1121 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.UnInit(s,fn t,id,P.clt2mcode ";" pv)) )
# 24958 "parser_cocci_menhir.ml"
let _startpos = _startpos_f_ in
let _endpos = _endpos_f_ in
let _v : 'tv_one_decl_var =
-# 1099 "parser_cocci_menhir.mly"
+# 1123 "parser_cocci_menhir.mly"
( f )
# 24982 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25023 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25029 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1101 "parser_cocci_menhir.mly"
+# 1125 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv)) )
# 25046 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25092 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25098 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1101 "parser_cocci_menhir.mly"
+# 1125 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv)) )
# 25117 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25148 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1106 "parser_cocci_menhir.mly"
+# 1130 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
Ast0.wrap(Ast0.UnInit(s,fn idtype,id,P.clt2mcode ";" pv)) )
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25209 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1106 "parser_cocci_menhir.mly"
+# 1130 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
Ast0.wrap(Ast0.UnInit(s,fn idtype,id,P.clt2mcode ";" pv)) )
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25272 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1106 "parser_cocci_menhir.mly"
+# 1130 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
Ast0.wrap(Ast0.UnInit(s,fn idtype,id,P.clt2mcode ";" pv)) )
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25340 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1106 "parser_cocci_menhir.mly"
+# 1130 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
Ast0.wrap(Ast0.UnInit(s,fn idtype,id,P.clt2mcode ";" pv)) )
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25410 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25416 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1111 "parser_cocci_menhir.mly"
+# 1135 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25489 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25495 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1111 "parser_cocci_menhir.mly"
+# 1135 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25570 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25576 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1111 "parser_cocci_menhir.mly"
+# 1135 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25656 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25662 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1111 "parser_cocci_menhir.mly"
+# 1135 "parser_cocci_menhir.mly"
( let (id,fn) = d in
!Data.add_type_name (P.id2name i);
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25754 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 25759 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 25765 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 25770 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 25776 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 25781 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1121 "parser_cocci_menhir.mly"
+# 1145 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25868 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 25873 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 25879 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 25884 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 25890 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 25895 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1121 "parser_cocci_menhir.mly"
+# 1145 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let _5 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 25959 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 25964 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 25970 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_one_decl_var =
-# 1129 "parser_cocci_menhir.mly"
+# 1153 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.MacroDecl(_1,P.clt2mcode "(" _2,_3,
P.clt2mcode ")" _4,P.clt2mcode ";" _5)) )
# 25979 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 26050 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 26056 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 26061 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 26067 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 26072 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 26078 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 26083 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1135 "parser_cocci_menhir.mly"
+# 1159 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 26180 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 26186 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 26191 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 26197 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 26202 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 26208 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 26213 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1135 "parser_cocci_menhir.mly"
+# 1159 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_plus_after_dots =
-# 1908 "parser_cocci_menhir.mly"
+# 1932 "parser_cocci_menhir.mly"
([])
# 26499 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 1909 "parser_cocci_menhir.mly"
+# 1933 "parser_cocci_menhir.mly"
(_2)
# 26527 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 1911 "parser_cocci_menhir.mly"
+# 1935 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Exp(_1)))))::_2 )
# 26557 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 1912 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DECL(_1))::_2 )
# 26587 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 1914 "parser_cocci_menhir.mly"
+# 1938 "parser_cocci_menhir.mly"
( (List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1)@_2 )
# 26617 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_plus_after_exp =
-# 1904 "parser_cocci_menhir.mly"
+# 1928 "parser_cocci_menhir.mly"
([])
# 26634 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_exp =
-# 1905 "parser_cocci_menhir.mly"
+# 1929 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(_1)))::_2 )
# 26664 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_plus_after_stm =
-# 1917 "parser_cocci_menhir.mly"
+# 1941 "parser_cocci_menhir.mly"
([])
# 26681 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_stm =
-# 1918 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(_1)))::_2 )
# 26711 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_stm =
-# 1919 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DECL(_1))::_2 )
# 26741 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_stm =
-# 1921 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( (List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1)@_2 )
# 26771 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_plus_body =
-# 716 "parser_cocci_menhir.mly"
+# 740 "parser_cocci_menhir.mly"
( Top_level.top_level (f@b(*@ew*)) )
# 26801 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_plus_exp_body =
-# 730 "parser_cocci_menhir.mly"
+# 754 "parser_cocci_menhir.mly"
( Top_level.top_level (f@[b](*@ew*)) )
# 26831 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 149 "parser_cocci_menhir.mly"
+# 173 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 26859 "parser_cocci_menhir.ml"
) =
-# 185 "parser_cocci_menhir.mly"
+# 209 "parser_cocci_menhir.mly"
( _1 )
# 26863 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 149 "parser_cocci_menhir.mly"
+# 173 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 26891 "parser_cocci_menhir.ml"
) =
-# 185 "parser_cocci_menhir.mly"
+# 209 "parser_cocci_menhir.mly"
( p )
# 26895 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 149 "parser_cocci_menhir.mly"
+# 173 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 26923 "parser_cocci_menhir.ml"
) =
-# 186 "parser_cocci_menhir.mly"
+# 210 "parser_cocci_menhir.mly"
( p )
# 26927 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 146 "parser_cocci_menhir.mly"
+# 170 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 26955 "parser_cocci_menhir.ml"
) =
-# 181 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
( _1 )
# 26959 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 146 "parser_cocci_menhir.mly"
+# 170 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 26987 "parser_cocci_menhir.ml"
) =
-# 181 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
( p )
# 26991 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 146 "parser_cocci_menhir.mly"
+# 170 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 27019 "parser_cocci_menhir.ml"
) =
-# 182 "parser_cocci_menhir.mly"
+# 206 "parser_cocci_menhir.mly"
( p )
# 27023 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_plus_start =
-# 1893 "parser_cocci_menhir.mly"
+# 1917 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Ty(_1))))] )
# 27047 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_plus_start =
-# 1894 "parser_cocci_menhir.mly"
+# 1918 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.TopInit(_1))))] )
# 27071 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 1896 "parser_cocci_menhir.mly"
+# 1920 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(_1)))::_2 )
# 27101 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 1898 "parser_cocci_menhir.mly"
+# 1922 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Exp(_1)))))::_2 )
# 27131 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 1899 "parser_cocci_menhir.mly"
+# 1923 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DECL(_1))::_2 )
# 27161 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 1901 "parser_cocci_menhir.mly"
+# 1925 "parser_cocci_menhir.mly"
( (List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1)@_2 )
# 27191 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 27212 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pnrule =
-# 236 "parser_cocci_menhir.mly"
+# 260 "parser_cocci_menhir.mly"
( Ast.Dep _1 )
# 27219 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 27244 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pnrule =
-# 237 "parser_cocci_menhir.mly"
+# 261 "parser_cocci_menhir.mly"
( Ast.AntiDep _2 )
# 27251 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 27276 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pnrule =
-# 238 "parser_cocci_menhir.mly"
+# 262 "parser_cocci_menhir.mly"
( Ast.EverDep _2 )
# 27283 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 27308 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pnrule =
-# 239 "parser_cocci_menhir.mly"
+# 263 "parser_cocci_menhir.mly"
( Ast.NeverDep _2 )
# 27315 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_pnrule =
-# 240 "parser_cocci_menhir.mly"
+# 264 "parser_cocci_menhir.mly"
( _2 )
# 27347 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1389 "parser_cocci_menhir.mly"
+# 1413 "parser_cocci_menhir.mly"
( _1 )
# 27371 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 27407 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 27413 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1391 "parser_cocci_menhir.mly"
+# 1415 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 27422 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 27454 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1394 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 27462 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 108 "parser_cocci_menhir.mly"
+# 132 "parser_cocci_menhir.mly"
(Data.clt)
# 27494 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1396 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 27503 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 27529 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1399 "parser_cocci_menhir.mly"
+# 1423 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 27537 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 27563 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1401 "parser_cocci_menhir.mly"
+# 1425 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 27571 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 27607 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 27613 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1427 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.FunCall(_1,P.clt2mcode "(" _2,
_3,
P.clt2mcode ")" _4)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1389 "parser_cocci_menhir.mly"
+# 1413 "parser_cocci_menhir.mly"
( _1 )
# 27647 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 27683 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 27689 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1391 "parser_cocci_menhir.mly"
+# 1415 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 27698 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 27730 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1394 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 27738 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 108 "parser_cocci_menhir.mly"
+# 132 "parser_cocci_menhir.mly"
(Data.clt)
# 27770 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1396 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 27779 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 27805 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1399 "parser_cocci_menhir.mly"
+# 1423 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 27813 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 27839 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1401 "parser_cocci_menhir.mly"
+# 1425 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 27847 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 27883 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 27889 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_eexpr_invalid_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1427 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.FunCall(_1,P.clt2mcode "(" _2,
_3,
P.clt2mcode ")" _4)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1389 "parser_cocci_menhir.mly"
+# 1413 "parser_cocci_menhir.mly"
( _1 )
# 27923 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 27959 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 27965 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1391 "parser_cocci_menhir.mly"
+# 1415 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 27974 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 28006 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1394 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 28014 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 108 "parser_cocci_menhir.mly"
+# 132 "parser_cocci_menhir.mly"
(Data.clt)
# 28046 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1396 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 28055 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 28081 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1399 "parser_cocci_menhir.mly"
+# 1423 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 28089 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 28115 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1401 "parser_cocci_menhir.mly"
+# 1425 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 28123 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 28159 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 28165 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_eexpr_nest_expressions_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1427 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.FunCall(_1,P.clt2mcode "(" _2,
_3,
P.clt2mcode ")" _4)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1389 "parser_cocci_menhir.mly"
+# 1413 "parser_cocci_menhir.mly"
( _1 )
# 28199 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 28235 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 106 "parser_cocci_menhir.mly"
+# 130 "parser_cocci_menhir.mly"
(Data.clt)
# 28241 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1391 "parser_cocci_menhir.mly"
+# 1415 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 28250 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 28282 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1394 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 28290 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_ident = Obj.magic _3 in
let _2 : (
-# 108 "parser_cocci_menhir.mly"
+# 132 "parser_cocci_menhir.mly"
(Data.clt)
# 28322 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1396 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 28331 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 28357 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1399 "parser_cocci_menhir.mly"
+# 1423 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 28365 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 28391 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1401 "parser_cocci_menhir.mly"
+# 1425 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 28399 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 28435 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 28441 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_postfix_expr_expr_invalid_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1427 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.FunCall(_1,P.clt2mcode "(" _2,
_3,
P.clt2mcode ")" _4)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 28475 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28496 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1410 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 28504 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28525 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1413 "parser_cocci_menhir.mly"
+# 1437 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 28533 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28554 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1416 "parser_cocci_menhir.mly"
+# 1440 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 28562 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28583 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1419 "parser_cocci_menhir.mly"
+# 1443 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 28591 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 28612 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1422 "parser_cocci_menhir.mly"
+# 1446 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.CONST,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 67 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 28642 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1426 "parser_cocci_menhir.mly"
+# 1450 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 28650 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 28671 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1429 "parser_cocci_menhir.mly"
+# 1453 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ANY,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 28701 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1433 "parser_cocci_menhir.mly"
+# 1457 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ID,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 28731 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1437 "parser_cocci_menhir.mly"
+# 1461 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.LocalID,pure)) )
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 28771 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 28777 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1441 "parser_cocci_menhir.mly"
+# 1465 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 28785 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 28816 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_eexpr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 28822 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1468 "parser_cocci_menhir.mly"
( let (mids,code) = _2 in
Ast0.wrap(Ast0.DisjExpr(P.clt2mcode "(" _1,
code, mids,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_dot_expressions_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1472 "parser_cocci_menhir.mly"
( _1 )
# 28856 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 28880 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28901 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1410 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 28909 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28930 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1413 "parser_cocci_menhir.mly"
+# 1437 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 28938 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28959 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1416 "parser_cocci_menhir.mly"
+# 1440 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 28967 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 28988 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1419 "parser_cocci_menhir.mly"
+# 1443 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 28996 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29017 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1422 "parser_cocci_menhir.mly"
+# 1446 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.CONST,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 67 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 29047 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1426 "parser_cocci_menhir.mly"
+# 1450 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 29055 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29076 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1429 "parser_cocci_menhir.mly"
+# 1453 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ANY,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29106 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1433 "parser_cocci_menhir.mly"
+# 1457 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ID,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29136 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1437 "parser_cocci_menhir.mly"
+# 1461 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.LocalID,pure)) )
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 29176 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 29182 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1441 "parser_cocci_menhir.mly"
+# 1465 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 29190 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 29221 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_eexpr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 29227 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1468 "parser_cocci_menhir.mly"
( let (mids,code) = _2 in
Ast0.wrap(Ast0.DisjExpr(P.clt2mcode "(" _1,
code, mids,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1472 "parser_cocci_menhir.mly"
( _1 )
# 29261 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 29285 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29306 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1410 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 29314 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29335 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1413 "parser_cocci_menhir.mly"
+# 1437 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 29343 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29364 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1416 "parser_cocci_menhir.mly"
+# 1440 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 29372 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29393 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1419 "parser_cocci_menhir.mly"
+# 1443 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 29401 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29422 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1422 "parser_cocci_menhir.mly"
+# 1446 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.CONST,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 67 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 29452 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1426 "parser_cocci_menhir.mly"
+# 1450 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 29460 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29481 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1429 "parser_cocci_menhir.mly"
+# 1453 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ANY,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29511 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1433 "parser_cocci_menhir.mly"
+# 1457 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ID,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29541 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1437 "parser_cocci_menhir.mly"
+# 1461 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.LocalID,pure)) )
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 29581 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 29587 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1441 "parser_cocci_menhir.mly"
+# 1465 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 29595 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 29626 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_eexpr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 29632 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1468 "parser_cocci_menhir.mly"
( let (mids,code) = _2 in
Ast0.wrap(Ast0.DisjExpr(P.clt2mcode "(" _1,
code, mids,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1472 "parser_cocci_menhir.mly"
( _1 )
# 29666 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 29690 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29711 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1410 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 29719 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29740 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1413 "parser_cocci_menhir.mly"
+# 1437 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 29748 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29769 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1416 "parser_cocci_menhir.mly"
+# 1440 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 29777 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29798 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1419 "parser_cocci_menhir.mly"
+# 1443 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 29806 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29827 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1422 "parser_cocci_menhir.mly"
+# 1446 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.CONST,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 67 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 29857 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1426 "parser_cocci_menhir.mly"
+# 1450 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 29865 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29886 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1429 "parser_cocci_menhir.mly"
+# 1453 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ANY,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29916 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1433 "parser_cocci_menhir.mly"
+# 1457 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.ID,pure)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 71 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 29946 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1437 "parser_cocci_menhir.mly"
+# 1461 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,ty,clt) = _1 in
Ast0.wrap
(Ast0.MetaExpr(P.clt2mcode nm clt,constraints,ty,Ast.LocalID,pure)) )
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 29986 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 29992 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1441 "parser_cocci_menhir.mly"
+# 1465 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 30000 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 30031 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_expr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 30037 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1468 "parser_cocci_menhir.mly"
( let (mids,code) = _2 in
Ast0.wrap(Ast0.DisjExpr(P.clt2mcode "(" _1,
code, mids,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1472 "parser_cocci_menhir.mly"
( _1 )
# 30071 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure =
-# 196 "parser_cocci_menhir.mly"
+# 220 "parser_cocci_menhir.mly"
( Ast0.Pure )
# 30093 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure =
-# 197 "parser_cocci_menhir.mly"
+# 221 "parser_cocci_menhir.mly"
( Ast0.Context )
# 30115 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pure =
-# 198 "parser_cocci_menhir.mly"
+# 222 "parser_cocci_menhir.mly"
( Ast0.PureContext )
# 30141 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pure =
-# 199 "parser_cocci_menhir.mly"
+# 223 "parser_cocci_menhir.mly"
( Ast0.PureContext )
# 30167 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_pure =
-# 200 "parser_cocci_menhir.mly"
+# 224 "parser_cocci_menhir.mly"
( Ast0.Impure )
# 30184 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30205 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident =
-# 1462 "parser_cocci_menhir.mly"
+# 1486 "parser_cocci_menhir.mly"
( _1 )
# 30212 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1465 "parser_cocci_menhir.mly"
+# 1489 "parser_cocci_menhir.mly"
( "identifier" )
# 30234 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1466 "parser_cocci_menhir.mly"
+# 1490 "parser_cocci_menhir.mly"
( "expression" )
# 30256 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1467 "parser_cocci_menhir.mly"
+# 1491 "parser_cocci_menhir.mly"
( "statement" )
# 30278 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1468 "parser_cocci_menhir.mly"
+# 1492 "parser_cocci_menhir.mly"
( "function" )
# 30300 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1469 "parser_cocci_menhir.mly"
+# 1493 "parser_cocci_menhir.mly"
( "local" )
# 30322 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1470 "parser_cocci_menhir.mly"
+# 1494 "parser_cocci_menhir.mly"
( "type" )
# 30344 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1471 "parser_cocci_menhir.mly"
+# 1495 "parser_cocci_menhir.mly"
( "parameter" )
# 30366 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1472 "parser_cocci_menhir.mly"
+# 1496 "parser_cocci_menhir.mly"
( "idexpression" )
# 30388 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1473 "parser_cocci_menhir.mly"
+# 1497 "parser_cocci_menhir.mly"
( "initialiser" )
# 30410 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1474 "parser_cocci_menhir.mly"
+# 1498 "parser_cocci_menhir.mly"
( "list" )
# 30432 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1475 "parser_cocci_menhir.mly"
+# 1499 "parser_cocci_menhir.mly"
( "fresh" )
# 30454 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1476 "parser_cocci_menhir.mly"
+# 1500 "parser_cocci_menhir.mly"
( "constant" )
# 30476 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1477 "parser_cocci_menhir.mly"
+# 1501 "parser_cocci_menhir.mly"
( "error" )
# 30498 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1478 "parser_cocci_menhir.mly"
+# 1502 "parser_cocci_menhir.mly"
( "words" )
# 30520 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1479 "parser_cocci_menhir.mly"
+# 1503 "parser_cocci_menhir.mly"
( "pure" )
# 30542 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1480 "parser_cocci_menhir.mly"
+# 1504 "parser_cocci_menhir.mly"
( "context" )
# 30564 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1481 "parser_cocci_menhir.mly"
+# 1505 "parser_cocci_menhir.mly"
( "generated" )
# 30586 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1482 "parser_cocci_menhir.mly"
+# 1506 "parser_cocci_menhir.mly"
( "typedef" )
# 30608 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1483 "parser_cocci_menhir.mly"
+# 1507 "parser_cocci_menhir.mly"
( "declarer" )
# 30630 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1484 "parser_cocci_menhir.mly"
+# 1508 "parser_cocci_menhir.mly"
( "iterator" )
# 30652 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1485 "parser_cocci_menhir.mly"
+# 1509 "parser_cocci_menhir.mly"
( "name" )
# 30674 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1486 "parser_cocci_menhir.mly"
+# 1510 "parser_cocci_menhir.mly"
( "position" )
# 30696 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident =
-# 1493 "parser_cocci_menhir.mly"
+# 1517 "parser_cocci_menhir.mly"
( (None,P.id2name _1) )
# 30720 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident =
-# 1494 "parser_cocci_menhir.mly"
+# 1518 "parser_cocci_menhir.mly"
( (None,_1) )
# 30744 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident =
-# 1495 "parser_cocci_menhir.mly"
+# 1519 "parser_cocci_menhir.mly"
( _1 )
# 30768 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_i_ in
let _endpos = _endpos_optc_ in
let _v : 'tv_pure_ident_or_meta_ident_with_econstraint_not_ceq_or_sub_ =
-# 1521 "parser_cocci_menhir.mly"
+# 1545 "parser_cocci_menhir.mly"
(
match optc with
None -> (i, Ast0.NoConstraint)
let _startpos = _startpos_i_ in
let _endpos = _endpos_optc_ in
let _v : 'tv_pure_ident_or_meta_ident_with_econstraint_re_or_not_eqe_or_sub_ =
-# 1521 "parser_cocci_menhir.mly"
+# 1545 "parser_cocci_menhir.mly"
(
match optc with
None -> (i, Ast0.NoConstraint)
let _startpos = _startpos_i_ in
let _endpos = _endpos_c_ in
let _v : 'tv_pure_ident_or_meta_ident_with_idconstraint_re_or_not_eqid_ =
-# 1539 "parser_cocci_menhir.mly"
+# 1563 "parser_cocci_menhir.mly"
(
match c with
None -> (i, Ast.IdNoConstraint)
let _startpos = _startpos_i_ in
let _endpos = _endpos_c_ in
let _v : 'tv_pure_ident_or_meta_ident_with_idconstraint_virt_re_or_not_eqid_ =
-# 1529 "parser_cocci_menhir.mly"
+# 1553 "parser_cocci_menhir.mly"
(
Common.Left
(match c with
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_pure_ident_or_meta_ident_with_idconstraint_virt_re_or_not_eqid_ =
-# 1535 "parser_cocci_menhir.mly"
+# 1559 "parser_cocci_menhir.mly"
( Common.Right (P.id2name _3) )
# 30937 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident_with_seed =
-# 1498 "parser_cocci_menhir.mly"
+# 1522 "parser_cocci_menhir.mly"
( (_1,Ast.NoVal) )
# 30961 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_pure_ident_or_meta_ident_with_seed =
-# 1501 "parser_cocci_menhir.mly"
+# 1525 "parser_cocci_menhir.mly"
( match _3 with
[Ast.SeedString s] -> (_1,Ast.StringSeed s)
| _ -> (_1,Ast.ListSeed _3) )
let _startpos = _startpos_i_ in
let _endpos = _endpos_l_ in
let _v : 'tv_pure_ident_or_meta_ident_with_x_eq_not_pos_ =
-# 1515 "parser_cocci_menhir.mly"
+# 1539 "parser_cocci_menhir.mly"
(
(i, l)
)
let _startpos = _startpos_re_ in
let _endpos = _endpos_re_ in
let _v : 'tv_re_or_not_eqe_or_sub =
-# 1600 "parser_cocci_menhir.mly"
+# 1624 "parser_cocci_menhir.mly"
(Ast0.NotIdCstrt re)
# 31053 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_ne_ in
let _endpos = _endpos_ne_ in
let _v : 'tv_re_or_not_eqe_or_sub =
-# 1601 "parser_cocci_menhir.mly"
+# 1625 "parser_cocci_menhir.mly"
(Ast0.NotExpCstrt ne)
# 31077 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_re_or_not_eqe_or_sub =
-# 1602 "parser_cocci_menhir.mly"
+# 1626 "parser_cocci_menhir.mly"
(Ast0.SubExpCstrt s)
# 31101 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_re_ in
let _endpos = _endpos_re_ in
let _v : 'tv_re_or_not_eqid =
-# 1546 "parser_cocci_menhir.mly"
+# 1570 "parser_cocci_menhir.mly"
(Ast.IdRegExpConstraint re)
# 31125 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_ne_ in
let _endpos = _endpos_ne_ in
let _v : 'tv_re_or_not_eqid =
-# 1547 "parser_cocci_menhir.mly"
+# 1571 "parser_cocci_menhir.mly"
(ne)
# 31149 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let re : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31174 "parser_cocci_menhir.ml"
) = Obj.magic re in
let _startpos = _startpos__1_ in
let _endpos = _endpos_re_ in
let _v : 'tv_regexp_eqid =
-# 1551 "parser_cocci_menhir.mly"
+# 1575 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
};
} = _menhir_stack in
let re : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31211 "parser_cocci_menhir.ml"
) = Obj.magic re in
let _startpos = _startpos__1_ in
let _endpos = _endpos_re_ in
let _v : 'tv_regexp_eqid =
-# 1558 "parser_cocci_menhir.mly"
+# 1582 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : (
-# 137 "parser_cocci_menhir.mly"
+# 161 "parser_cocci_menhir.mly"
(unit)
# 31240 "parser_cocci_menhir.ml"
) =
-# 178 "parser_cocci_menhir.mly"
+# 202 "parser_cocci_menhir.mly"
( )
# 31244 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_rule_elem_statement =
-# 990 "parser_cocci_menhir.mly"
+# 1014 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Decl((Ast0.default_info(),Ast0.context_befaft()),_1)) )
# 31268 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 31294 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 991 "parser_cocci_menhir.mly"
+# 1015 "parser_cocci_menhir.mly"
( P.exp_stm _1 _2 )
# 31302 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 31333 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 31339 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_rule_elem_statement =
-# 992 "parser_cocci_menhir.mly"
+# 1016 "parser_cocci_menhir.mly"
( P.ret_exp _1 _2 _3 )
# 31346 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 31372 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 31377 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 993 "parser_cocci_menhir.mly"
+# 1017 "parser_cocci_menhir.mly"
( P.ret _1 _2 )
# 31384 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 31410 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 31415 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 994 "parser_cocci_menhir.mly"
+# 1018 "parser_cocci_menhir.mly"
( P.break _1 _2 )
# 31422 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 31448 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 31453 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 995 "parser_cocci_menhir.mly"
+# 1019 "parser_cocci_menhir.mly"
( P.cont _1 _2 )
# 31460 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 31491 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_rule_elem_statement_rule_elem_statement_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 31497 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_rule_elem_statement =
-# 997 "parser_cocci_menhir.mly"
+# 1021 "parser_cocci_menhir.mly"
( let (mids,code) = _2 in
Ast0.wrap
(Ast0.Disj(P.clt2mcode "(" _1,
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31564 "parser_cocci_menhir.ml"
) = let nm =
in
-# 208 "parser_cocci_menhir.mly"
+# 232 "parser_cocci_menhir.mly"
( P.make_cocci_rule_name_result nm d i a e ee )
# 31575 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_x0_ in
let _endpos = _endpos__8_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31637 "parser_cocci_menhir.ml"
) = let nm =
in
-# 208 "parser_cocci_menhir.mly"
+# 232 "parser_cocci_menhir.mly"
( P.make_cocci_rule_name_result nm d i a e ee )
# 31649 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__8_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31709 "parser_cocci_menhir.ml"
) =
-# 213 "parser_cocci_menhir.mly"
+# 237 "parser_cocci_menhir.mly"
( P.make_generated_rule_name_result None d i a e ee )
# 31713 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31755 "parser_cocci_menhir.ml"
) = let nm =
in
-# 215 "parser_cocci_menhir.mly"
+# 239 "parser_cocci_menhir.mly"
( P.make_script_rule_name_result lang nm d )
# 31766 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__6_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31814 "parser_cocci_menhir.ml"
) = let nm =
in
-# 215 "parser_cocci_menhir.mly"
+# 239 "parser_cocci_menhir.mly"
( P.make_script_rule_name_result lang nm d )
# 31826 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31868 "parser_cocci_menhir.ml"
) =
-# 217 "parser_cocci_menhir.mly"
+# 241 "parser_cocci_menhir.mly"
( P.make_initial_script_rule_name_result lang d )
# 31872 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 31914 "parser_cocci_menhir.ml"
) =
-# 219 "parser_cocci_menhir.mly"
+# 243 "parser_cocci_menhir.mly"
( P.make_final_script_rule_name_result lang d )
# 31918 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_py_ in
let _endpos = _endpos__2_ in
let _v : (
-# 165 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 31946 "parser_cocci_menhir.ml"
) =
-# 2092 "parser_cocci_menhir.mly"
+# 2116 "parser_cocci_menhir.mly"
( ((Some (P.id2name py), None), None) )
# 31950 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_py_ in
let _endpos = _endpos__3_ in
let _v : (
-# 165 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 31984 "parser_cocci_menhir.ml"
) =
-# 2094 "parser_cocci_menhir.mly"
+# 2118 "parser_cocci_menhir.mly"
( ((Some (P.id2name py), None), Some _2) )
# 31988 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 165 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 32038 "parser_cocci_menhir.ml"
) =
-# 2096 "parser_cocci_menhir.mly"
+# 2120 "parser_cocci_menhir.mly"
( ((None, Some (P.id2name ast)), Some _6) )
# 32042 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 165 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 32092 "parser_cocci_menhir.ml"
) =
-# 2098 "parser_cocci_menhir.mly"
+# 2122 "parser_cocci_menhir.mly"
( ((Some (P.id2name str), None), Some _6) )
# 32096 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 165 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 32148 "parser_cocci_menhir.ml"
) =
-# 2100 "parser_cocci_menhir.mly"
+# 2124 "parser_cocci_menhir.mly"
( ((Some (P.id2name str), Some (P.id2name ast)), Some _6) )
# 32152 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let cocci : 'tv_pure_ident = Obj.magic cocci in
let _2 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 32187 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_cocci_ in
let _v : 'tv_script_name_decl =
-# 2104 "parser_cocci_menhir.mly"
+# 2128 "parser_cocci_menhir.mly"
( let nm = P.id2name cocci in
let mv = Parse_aux.lookup _2 nm in
((_2, nm), mv) )
let _startpos = _startpos__1_ in
let _endpos = _endpos_cocci_ in
let _v : 'tv_script_name_decl =
-# 2108 "parser_cocci_menhir.mly"
+# 2132 "parser_cocci_menhir.mly"
( let nm = P.id2name cocci in
let name = ("virtual", nm) in
let mv = Ast.MetaIdDecl(Ast.NONE,name) in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 32256 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_seed_elem =
-# 1506 "parser_cocci_menhir.mly"
+# 1530 "parser_cocci_menhir.mly"
( let (x,_) = _1 in Ast.SeedString x )
# 32263 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 65 "parser_cocci_menhir.mly"
+# 89 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 32284 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_seed_elem =
-# 1507 "parser_cocci_menhir.mly"
+# 1531 "parser_cocci_menhir.mly"
( let (x,_,_,_) = _1 in Ast.SeedId x )
# 32291 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_pure_ident = Obj.magic _3 in
let _1 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 32322 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_seed_elem =
-# 1509 "parser_cocci_menhir.mly"
+# 1533 "parser_cocci_menhir.mly"
( let nm = (_1,P.id2name _3) in
P.check_meta(Ast.MetaIdDecl(Ast.NONE,nm));
Ast.SeedId nm )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let x : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 32352 "parser_cocci_menhir.ml"
) = Obj.magic x in
} = _menhir_stack in
let xs : 'tv_separated_nonempty_list_TComma_TString_ = Obj.magic xs in
let x : (
-# 91 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string * Data.clt)
# 32390 "parser_cocci_menhir.ml"
) = Obj.magic x in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_single_statement =
-# 1005 "parser_cocci_menhir.mly"
+# 1029 "parser_cocci_menhir.mly"
( _1 )
# 33291 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33322 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_statement_statement_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33328 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_single_statement =
-# 1009 "parser_cocci_menhir.mly"
+# 1033 "parser_cocci_menhir.mly"
( let (mids,code) = _2 in
Ast0.wrap
(Ast0.Disj(P.clt2mcode "(" _1,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_statement =
-# 932 "parser_cocci_menhir.mly"
+# 956 "parser_cocci_menhir.mly"
( _1 )
# 33363 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 33384 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_statement =
-# 934 "parser_cocci_menhir.mly"
+# 958 "parser_cocci_menhir.mly"
( P.meta_stm _1 )
# 33391 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 33417 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 936 "parser_cocci_menhir.mly"
+# 960 "parser_cocci_menhir.mly"
( P.exp_stm _1 _2 )
# 33425 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33467 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33473 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33478 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_statement =
-# 938 "parser_cocci_menhir.mly"
+# 962 "parser_cocci_menhir.mly"
( P.ifthen _1 _2 _3 _4 _5 )
# 33485 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _7 : 'tv_single_statement = Obj.magic _7 in
let _6 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33537 "parser_cocci_menhir.ml"
) = Obj.magic _6 in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33543 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33549 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33554 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : 'tv_statement =
-# 940 "parser_cocci_menhir.mly"
+# 964 "parser_cocci_menhir.mly"
( P.ifthenelse _1 _2 _3 _4 _5 _6 _7 )
# 33561 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _9 : 'tv_single_statement = Obj.magic _9 in
let _8 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33623 "parser_cocci_menhir.ml"
) = Obj.magic _8 in
let _7 : 'tv_option_eexpr_ = Obj.magic _7 in
let _6 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 33629 "parser_cocci_menhir.ml"
) = Obj.magic _6 in
let _5 : 'tv_option_eexpr_ = Obj.magic _5 in
let _4 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 33635 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_option_eexpr_ = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33641 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33646 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__9_ in
let _v : 'tv_statement =
-# 943 "parser_cocci_menhir.mly"
+# 967 "parser_cocci_menhir.mly"
( P.forloop _1 _2 _3 _4 _5 _6 _7 _8 _9 )
# 33653 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33695 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33701 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33706 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_statement =
-# 945 "parser_cocci_menhir.mly"
+# 969 "parser_cocci_menhir.mly"
( P.whileloop _1 _2 _3 _4 _5 )
# 33713 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _7 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 33764 "parser_cocci_menhir.ml"
) = Obj.magic _7 in
let _6 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33769 "parser_cocci_menhir.ml"
) = Obj.magic _6 in
let _5 : 'tv_eexpr = Obj.magic _5 in
let _4 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33775 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33780 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_single_statement = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33786 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : 'tv_statement =
-# 947 "parser_cocci_menhir.mly"
+# 971 "parser_cocci_menhir.mly"
( P.doloop _1 _2 _3 _4 _5 _6 _7 )
# 33793 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33835 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33841 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_statement =
-# 949 "parser_cocci_menhir.mly"
+# 973 "parser_cocci_menhir.mly"
( P.iterator _1 _2 _3 _4 _5 )
# 33849 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _8 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 33905 "parser_cocci_menhir.ml"
) = Obj.magic _8 in
let _7 : 'tv_list_case_line_ = Obj.magic _7 in
let _6 : 'tv_list_decl_var_ = Obj.magic _6 in
let _5 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 33912 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 33917 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 33923 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33928 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__8_ in
let _v : 'tv_statement =
-# 951 "parser_cocci_menhir.mly"
+# 975 "parser_cocci_menhir.mly"
( P.switch _1 _2 _3 _4 _5 (List.concat _6) _7 _8 )
# 33935 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 33966 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 33972 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_statement =
-# 952 "parser_cocci_menhir.mly"
+# 976 "parser_cocci_menhir.mly"
( P.ret_exp _1 _2 _3 )
# 33979 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34005 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 60 "parser_cocci_menhir.mly"
+# 84 "parser_cocci_menhir.mly"
(Data.clt)
# 34010 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 953 "parser_cocci_menhir.mly"
+# 977 "parser_cocci_menhir.mly"
( P.ret _1 _2 )
# 34017 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34043 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 34048 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 954 "parser_cocci_menhir.mly"
+# 978 "parser_cocci_menhir.mly"
( P.break _1 _2 )
# 34055 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34081 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 34086 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 955 "parser_cocci_menhir.mly"
+# 979 "parser_cocci_menhir.mly"
( P.cont _1 _2 )
# 34093 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 34119 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 956 "parser_cocci_menhir.mly"
+# 980 "parser_cocci_menhir.mly"
( P.label _1 _2 )
# 34127 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34158 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_ident = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 34164 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_statement =
-# 957 "parser_cocci_menhir.mly"
+# 981 "parser_cocci_menhir.mly"
( P.goto _1 _2 _3 )
# 34171 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 34202 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_fun_start = Obj.magic _2 in
let _1 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 34208 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_statement =
-# 959 "parser_cocci_menhir.mly"
+# 983 "parser_cocci_menhir.mly"
( P.seq _1 _2 _3 )
# 34215 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_list_whenppdecs_ = Obj.magic w in
let _1 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 34242 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_w_ in
let _v : 'tv_stm_dots =
-# 963 "parser_cocci_menhir.mly"
+# 987 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Dots(P.clt2mcode "..." _1, List.concat w)) )
# 34249 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 34285 "parser_cocci_menhir.ml"
) = Obj.magic c in
let b : 'tv_nest_start = Obj.magic b in
let w : 'tv_list_whenppdecs_ = Obj.magic w in
let _1 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 34292 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_stm_dots =
-# 965 "parser_cocci_menhir.mly"
+# 989 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<..." _1, b,
P.clt2mcode "...>" c, List.concat w, false)) )
# 34300 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let c : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 34336 "parser_cocci_menhir.ml"
) = Obj.magic c in
let b : 'tv_nest_start = Obj.magic b in
let w : 'tv_list_whenppdecs_ = Obj.magic w in
let _1 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 34343 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_stm_dots =
-# 968 "parser_cocci_menhir.mly"
+# 992 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<+..." _1, b,
P.clt2mcode "...+>" c, List.concat w, true)) )
# 34351 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 34372 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 894 "parser_cocci_menhir.mly"
+# 918 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Static s )
# 34379 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 34400 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 895 "parser_cocci_menhir.mly"
+# 919 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Auto s )
# 34407 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 34428 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 896 "parser_cocci_menhir.mly"
+# 920 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Register s )
# 34435 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 56 "parser_cocci_menhir.mly"
+# 80 "parser_cocci_menhir.mly"
(Data.clt)
# 34456 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 897 "parser_cocci_menhir.mly"
+# 921 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Extern s )
# 34463 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl =
-# 628 "parser_cocci_menhir.mly"
+# 652 "parser_cocci_menhir.mly"
( [] )
# 34485 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl =
-# 629 "parser_cocci_menhir.mly"
+# 653 "parser_cocci_menhir.mly"
( [_1] )
# 34509 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_list =
-# 651 "parser_cocci_menhir.mly"
+# 675 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1)) )
# 34533 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_list_start =
-# 654 "parser_cocci_menhir.mly"
+# 678 "parser_cocci_menhir.mly"
( _1 )
# 34557 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_struct_decl_list_start =
-# 655 "parser_cocci_menhir.mly"
+# 679 "parser_cocci_menhir.mly"
( _1@_2 )
# 34587 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_struct_decl_list_start =
-# 657 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( (P.mkddots_one "..." d)::r )
# 34617 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 69 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 34638 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_one =
-# 632 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( P.meta_field _1 )
# 34645 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34676 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_struct_decl_one =
-# 634 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.UnInit(None,fn t,id,P.clt2mcode ";" pv)) )
# 34686 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34747 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 34752 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 34758 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 34763 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 34769 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 34774 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_struct_decl_one =
-# 638 "parser_cocci_menhir.mly"
+# 662 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34819 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 646 "parser_cocci_menhir.mly"
+# 670 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
Ast0.wrap(Ast0.UnInit(None,fn idtype,id,P.clt2mcode ";" pv)) )
};
} = _menhir_stack in
let pv : (
-# 111 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 34873 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 646 "parser_cocci_menhir.mly"
+# 670 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let idtype = P.make_cv cv (Ast0.wrap (Ast0.TypeName(P.id2mcode i))) in
Ast0.wrap(Ast0.UnInit(None,fn idtype,id,P.clt2mcode ";" pv)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 34914 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_struct_or_union =
-# 624 "parser_cocci_menhir.mly"
+# 648 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Struct s )
# 34921 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let u : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 34942 "parser_cocci_menhir.ml"
) = Obj.magic u in
let _startpos = _startpos_u_ in
let _endpos = _endpos_u_ in
let _v : 'tv_struct_or_union =
-# 625 "parser_cocci_menhir.mly"
+# 649 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Union u )
# 34949 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_sub =
-# 1646 "parser_cocci_menhir.mly"
+# 1670 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_sub =
-# 1655 "parser_cocci_menhir.mly"
+# 1679 "parser_cocci_menhir.mly"
( (if !Data.in_iso
then failwith "constraints not allowed in iso file");
(if !Data.in_generating
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_top_eexpr =
-# 1274 "parser_cocci_menhir.mly"
+# 1298 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Exp(_1)))) )
# 35052 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 35083 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_initialize_list = Obj.magic _2 in
let _1 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 35089 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_top_init =
-# 1881 "parser_cocci_menhir.mly"
+# 1905 "parser_cocci_menhir.mly"
( if P.struct_initializer _2
then
let il = P.drop_dot_commas _2 in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_toplevel_after_dots =
-# 1869 "parser_cocci_menhir.mly"
+# 1893 "parser_cocci_menhir.mly"
([])
# 35118 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots =
-# 1870 "parser_cocci_menhir.mly"
+# 1894 "parser_cocci_menhir.mly"
(_2)
# 35146 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots =
-# 1871 "parser_cocci_menhir.mly"
+# 1895 "parser_cocci_menhir.mly"
((Ast0.wrap(Ast0.Exp(_1)))::_2)
# 35176 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots =
-# 1872 "parser_cocci_menhir.mly"
+# 1896 "parser_cocci_menhir.mly"
(_1@_2)
# 35206 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots_init =
-# 1860 "parser_cocci_menhir.mly"
+# 1884 "parser_cocci_menhir.mly"
(_2)
# 35234 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots_init =
-# 1861 "parser_cocci_menhir.mly"
+# 1885 "parser_cocci_menhir.mly"
((Ast0.wrap(Ast0.Exp(_1)))::_2)
# 35264 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots_init =
-# 1862 "parser_cocci_menhir.mly"
+# 1886 "parser_cocci_menhir.mly"
(_1@_2)
# 35294 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_toplevel_after_exp =
-# 1865 "parser_cocci_menhir.mly"
+# 1889 "parser_cocci_menhir.mly"
([])
# 35311 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_exp =
-# 1866 "parser_cocci_menhir.mly"
+# 1890 "parser_cocci_menhir.mly"
(_1::_2)
# 35341 "parser_cocci_menhir.ml"
in
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_toplevel_after_stm =
-# 1875 "parser_cocci_menhir.mly"
+# 1899 "parser_cocci_menhir.mly"
([])
# 35358 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_stm =
-# 1876 "parser_cocci_menhir.mly"
+# 1900 "parser_cocci_menhir.mly"
(_1::_2)
# 35388 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_stm =
-# 1877 "parser_cocci_menhir.mly"
+# 1901 "parser_cocci_menhir.mly"
(_1@_2)
# 35418 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_start_toplevel_after_dots_ =
-# 1855 "parser_cocci_menhir.mly"
+# 1879 "parser_cocci_menhir.mly"
( _1::_2 )
# 35448 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_start_toplevel_after_dots_ =
-# 1856 "parser_cocci_menhir.mly"
+# 1880 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.Exp(_1)))::_2 )
# 35478 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_start_toplevel_after_dots_ =
-# 1857 "parser_cocci_menhir.mly"
+# 1881 "parser_cocci_menhir.mly"
( _1@_2 )
# 35508 "parser_cocci_menhir.ml"
in
let b : 'tv_toplevel_after_dots_init = Obj.magic b in
let w0 : 'tv_list_whenppdecs_ = Obj.magic w0 in
let a0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35541 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 973 "parser_cocci_menhir.mly"
+# 997 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Dots(P.clt2mcode "..." a, List.concat w)) )
# 35551 "parser_cocci_menhir.ml"
in
-# 1848 "parser_cocci_menhir.mly"
+# 1872 "parser_cocci_menhir.mly"
( a::b )
# 35557 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_toplevel_after_dots_init = Obj.magic b in
let c0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35599 "parser_cocci_menhir.ml"
) = Obj.magic c0 in
let b0 : 'tv_nest_start = Obj.magic b0 in
let w0 : 'tv_list_whenppdecs_ = Obj.magic w0 in
let a0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35606 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 977 "parser_cocci_menhir.mly"
+# 1001 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<..." a, b,
P.clt2mcode "...>" c, List.concat w, false)) )
# 35619 "parser_cocci_menhir.ml"
in
-# 1849 "parser_cocci_menhir.mly"
+# 1873 "parser_cocci_menhir.mly"
( a::b )
# 35625 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_toplevel_after_dots_init = Obj.magic b in
let c0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35667 "parser_cocci_menhir.ml"
) = Obj.magic c0 in
let b0 : 'tv_nest_start = Obj.magic b0 in
let w0 : 'tv_list_whenppdecs_ = Obj.magic w0 in
let a0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35674 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 980 "parser_cocci_menhir.mly"
+# 1004 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<+..." a, b,
P.clt2mcode "...+>" c, List.concat w, true)) )
# 35687 "parser_cocci_menhir.ml"
in
-# 1849 "parser_cocci_menhir.mly"
+# 1873 "parser_cocci_menhir.mly"
( a::b )
# 35693 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35729 "parser_cocci_menhir.ml"
) = Obj.magic c0 in
let b0 : 'tv_nest_start = Obj.magic b0 in
let w0 : 'tv_list_whenppdecs_ = Obj.magic w0 in
let a0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35736 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 977 "parser_cocci_menhir.mly"
+# 1001 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<..." a, b,
P.clt2mcode "...>" c, List.concat w, false)) )
# 35749 "parser_cocci_menhir.ml"
in
-# 1850 "parser_cocci_menhir.mly"
+# 1874 "parser_cocci_menhir.mly"
( [a] )
# 35755 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35791 "parser_cocci_menhir.ml"
) = Obj.magic c0 in
let b0 : 'tv_nest_start = Obj.magic b0 in
let w0 : 'tv_list_whenppdecs_ = Obj.magic w0 in
let a0 : (
-# 77 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(Data.clt)
# 35798 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 980 "parser_cocci_menhir.mly"
+# 1004 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<+..." a, b,
P.clt2mcode "...+>" c, List.concat w, true)) )
# 35811 "parser_cocci_menhir.ml"
in
-# 1850 "parser_cocci_menhir.mly"
+# 1874 "parser_cocci_menhir.mly"
( [a] )
# 35817 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_startne_toplevel_after_dots_init_ =
-# 1851 "parser_cocci_menhir.mly"
+# 1875 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.Exp(_1)))::_2 )
# 35847 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_startne_toplevel_after_dots_init_ =
-# 1852 "parser_cocci_menhir.mly"
+# 1876 "parser_cocci_menhir.mly"
( _1@_2 )
# 35877 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 35909 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 35914 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 35926 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 35932 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 35945 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 35977 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 35982 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 35994 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 36000 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36013 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36045 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36050 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 36062 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 36068 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36081 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 36113 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36118 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 36131 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 36137 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36150 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 36191 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 36196 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36201 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 36226 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36239 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36271 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36276 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 36288 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 36294 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36307 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36344 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36349 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36354 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 36377 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36390 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36422 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36427 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 36439 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36445 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36458 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36490 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36495 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 36507 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36513 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36526 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36558 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36563 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 36575 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36581 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36594 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 36626 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36631 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 36644 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36650 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36663 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 36704 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 36709 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36714 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36739 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36752 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36784 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36789 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 36801 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36807 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36820 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36857 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36862 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 36867 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 36890 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36903 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36930 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 36941 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 36947 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 36960 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 36987 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 36998 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 37004 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37017 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 37044 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 37055 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 37061 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37074 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 37101 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 37113 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 37119 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37132 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 37168 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 37173 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 37197 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37210 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 37237 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 37248 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 37254 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37267 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 37299 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 37304 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 37326 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37339 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 37366 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 557 "parser_cocci_menhir.mly"
+# 581 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 37377 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37383 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37396 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 37423 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 559 "parser_cocci_menhir.mly"
+# 583 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 37434 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37440 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37453 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 37480 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 561 "parser_cocci_menhir.mly"
+# 585 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 37491 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37497 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37510 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 37537 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 563 "parser_cocci_menhir.mly"
+# 587 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 37548 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37554 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37567 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 37594 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 565 "parser_cocci_menhir.mly"
+# 589 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 37605 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37611 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37624 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 37651 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 567 "parser_cocci_menhir.mly"
+# 591 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 37662 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37668 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37681 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 37714 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 569 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 37727 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37733 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37746 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 37788 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 37794 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 37799 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37832 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37845 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 37892 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 37898 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 37904 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 37940 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37953 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 576 "parser_cocci_menhir.mly"
+# 600 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 37995 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 38001 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38014 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 38056 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 38062 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 38097 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38110 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 38157 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 38163 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 38202 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38215 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 38257 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 38263 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 38268 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 585 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = s in
let ty = Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) in
Ast0.wrap(Ast0.StructUnionDef(ty,P.clt2mcode "{" l,d,P.clt2mcode "}" r)) )
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 38293 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38306 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 38333 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 589 "parser_cocci_menhir.mly"
+# 613 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 38344 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 38350 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38363 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38400 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38405 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 38418 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38424 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38438 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38475 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38480 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 38493 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38499 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38513 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38550 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38555 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 38568 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38574 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38588 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 38625 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38630 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 38644 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38650 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38664 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 38710 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 38715 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38720 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38746 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38760 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38797 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38802 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 38815 "parser_cocci_menhir.ml"
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38821 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38835 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38877 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38882 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38887 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 594 "parser_cocci_menhir.mly"
+# 618 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 38911 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38925 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 38962 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 38967 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 38980 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38986 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39000 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39037 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 39042 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 39055 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 39061 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39075 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39112 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 39117 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 39130 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 39136 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39150 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 39187 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 39192 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 39206 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 39212 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39226 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 39272 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 39277 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 39282 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 39308 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39322 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39359 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 39364 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 39377 "parser_cocci_menhir.ml"
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 39383 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39397 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39439 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39444 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 54 "parser_cocci_menhir.mly"
+# 78 "parser_cocci_menhir.mly"
(Data.clt)
# 39449 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 596 "parser_cocci_menhir.mly"
+# 620 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 39473 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39487 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39519 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 531 "parser_cocci_menhir.mly"
+# 555 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 39531 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39537 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39551 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39583 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 533 "parser_cocci_menhir.mly"
+# 557 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 39595 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39601 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39615 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39647 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 535 "parser_cocci_menhir.mly"
+# 559 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 39659 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39665 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39679 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 39711 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 537 "parser_cocci_menhir.mly"
+# 561 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 39724 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39730 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39744 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 39785 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 49 "parser_cocci_menhir.mly"
+# 73 "parser_cocci_menhir.mly"
(string)
# 39790 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 540 "parser_cocci_menhir.mly"
+# 564 "parser_cocci_menhir.mly"
( let nm = (r,P.id2name p) in
(* this is only possible when we are in a metavar decl. Otherwise,
it will be represented already as a MetaType *)
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39815 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39829 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39861 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 547 "parser_cocci_menhir.mly"
+# 571 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 39873 "parser_cocci_menhir.ml"
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39879 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39893 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39930 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 39935 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 549 "parser_cocci_menhir.mly"
+# 573 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 597 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( ty )
# 39958 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39972 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 40004 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 557 "parser_cocci_menhir.mly"
+# 581 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 40016 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40022 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40036 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 40068 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 559 "parser_cocci_menhir.mly"
+# 583 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 40080 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40086 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40100 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 51 "parser_cocci_menhir.mly"
+# 75 "parser_cocci_menhir.mly"
(Data.clt)
# 40132 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 561 "parser_cocci_menhir.mly"
+# 585 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 40144 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40150 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40164 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 40196 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 563 "parser_cocci_menhir.mly"
+# 587 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 40208 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40214 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40228 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 40260 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 565 "parser_cocci_menhir.mly"
+# 589 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 40272 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40278 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40292 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 52 "parser_cocci_menhir.mly"
+# 76 "parser_cocci_menhir.mly"
(Data.clt)
# 40324 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 567 "parser_cocci_menhir.mly"
+# 591 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 40336 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40342 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40356 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 40394 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 569 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 40408 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40414 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40428 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40475 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40481 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 40486 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40520 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40534 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40586 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40592 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 53 "parser_cocci_menhir.mly"
+# 77 "parser_cocci_menhir.mly"
(Data.clt)
# 40598 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 571 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "enums must be named in the iso file");
Ast0.wrap(Ast0.EnumDef(Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40635 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40649 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 576 "parser_cocci_menhir.mly"
+# 600 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 40697 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40703 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40717 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40764 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40770 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40806 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40820 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40872 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40878 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 579 "parser_cocci_menhir.mly"
+# 603 "parser_cocci_menhir.mly"
( (if i = None && !Data.in_iso
then failwith "structures must be named in the iso file");
Ast0.wrap(Ast0.StructUnionDef(Ast0.wrap(Ast0.StructUnionName(s, i)),
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 40918 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40932 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40979 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 105 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 40985 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 40990 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 585 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = s in
let ty = Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) in
Ast0.wrap(Ast0.StructUnionDef(ty,P.clt2mcode "{" l,d,P.clt2mcode "}" r)) )
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 41016 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41030 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 62 "parser_cocci_menhir.mly"
+# 86 "parser_cocci_menhir.mly"
(string * Data.clt)
# 41062 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 589 "parser_cocci_menhir.mly"
+# 613 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 41074 "parser_cocci_menhir.ml"
in
-# 598 "parser_cocci_menhir.mly"
+# 622 "parser_cocci_menhir.mly"
( ty )
# 41080 "parser_cocci_menhir.ml"
in
-# 615 "parser_cocci_menhir.mly"
+# 639 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41094 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 41125 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_midzero_list_ctype_ctype_ = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41131 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_typedef_ctype =
-# 617 "parser_cocci_menhir.mly"
+# 641 "parser_cocci_menhir.mly"
( let (mids,code) = t in
Ast0.wrap
(Ast0.DisjType(P.clt2mcode "(" lp,code,mids, P.clt2mcode ")" rp)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_typedef_ident =
-# 1727 "parser_cocci_menhir.mly"
+# 1751 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode _1)) )
# 41164 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 68 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 41185 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_typedef_ident =
-# 1729 "parser_cocci_menhir.mly"
+# 1753 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 41193 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1365 "parser_cocci_menhir.mly"
+# 1389 "parser_cocci_menhir.mly"
( _1 )
# 41217 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_dot_expressions_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41244 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1367 "parser_cocci_menhir.mly"
+# 1391 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 41251 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_dot_expressions_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41278 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1369 "parser_cocci_menhir.mly"
+# 1393 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 41285 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1371 "parser_cocci_menhir.mly"
+# 1395 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 41315 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_dot_expressions_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41342 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1373 "parser_cocci_menhir.mly"
+# 1397 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 41350 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_dot_expressions_ = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 41377 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1376 "parser_cocci_menhir.mly"
+# 1400 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 41384 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 41420 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41426 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 41431 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1378 "parser_cocci_menhir.mly"
+# 1402 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfType (P.clt2mcode "sizeof" s,
P.clt2mcode "(" lp,t,
P.clt2mcode ")" rp)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1365 "parser_cocci_menhir.mly"
+# 1389 "parser_cocci_menhir.mly"
( _1 )
# 41464 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_invalid_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41491 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1367 "parser_cocci_menhir.mly"
+# 1391 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 41498 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_invalid_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41525 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1369 "parser_cocci_menhir.mly"
+# 1393 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 41532 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1371 "parser_cocci_menhir.mly"
+# 1395 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 41562 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_invalid_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41589 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1373 "parser_cocci_menhir.mly"
+# 1397 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 41597 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_invalid_ = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 41624 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1376 "parser_cocci_menhir.mly"
+# 1400 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 41631 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 41667 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41673 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 41678 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1378 "parser_cocci_menhir.mly"
+# 1402 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfType (P.clt2mcode "sizeof" s,
P.clt2mcode "(" lp,t,
P.clt2mcode ")" rp)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1365 "parser_cocci_menhir.mly"
+# 1389 "parser_cocci_menhir.mly"
( _1 )
# 41711 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_nest_expressions_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41738 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1367 "parser_cocci_menhir.mly"
+# 1391 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 41745 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_nest_expressions_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41772 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1369 "parser_cocci_menhir.mly"
+# 1393 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 41779 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1371 "parser_cocci_menhir.mly"
+# 1395 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 41809 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_nest_expressions_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41836 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1373 "parser_cocci_menhir.mly"
+# 1397 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 41844 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_eexpr_nest_expressions_ = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 41871 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1376 "parser_cocci_menhir.mly"
+# 1400 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 41878 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 41914 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 41920 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 41925 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1378 "parser_cocci_menhir.mly"
+# 1402 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfType (P.clt2mcode "sizeof" s,
P.clt2mcode "(" lp,t,
P.clt2mcode ")" rp)) )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1365 "parser_cocci_menhir.mly"
+# 1389 "parser_cocci_menhir.mly"
( _1 )
# 41958 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_expr_invalid_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 41985 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1367 "parser_cocci_menhir.mly"
+# 1391 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 41992 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_expr_invalid_ = Obj.magic _2 in
let _1 : (
-# 89 "parser_cocci_menhir.mly"
+# 113 "parser_cocci_menhir.mly"
(Data.clt)
# 42019 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1369 "parser_cocci_menhir.mly"
+# 1393 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 42026 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1371 "parser_cocci_menhir.mly"
+# 1395 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 42056 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_expr_invalid_ = Obj.magic _2 in
let _1 : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 42083 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1373 "parser_cocci_menhir.mly"
+# 1397 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 42091 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_expr_invalid_ = Obj.magic _2 in
let _1 : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 42118 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1376 "parser_cocci_menhir.mly"
+# 1400 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 42125 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 81 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Data.clt)
# 42161 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 80 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Data.clt)
# 42167 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 61 "parser_cocci_menhir.mly"
+# 85 "parser_cocci_menhir.mly"
(Data.clt)
# 42172 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1378 "parser_cocci_menhir.mly"
+# 1402 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfType (P.clt2mcode "sizeof" s,
P.clt2mcode "(" lp,t,
P.clt2mcode ")" rp)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 97 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 42202 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1382 "parser_cocci_menhir.mly"
+# 1406 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.GetRef _1 )
# 42209 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 42230 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1383 "parser_cocci_menhir.mly"
+# 1407 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.DeRef _1 )
# 42237 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 42258 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1384 "parser_cocci_menhir.mly"
+# 1408 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.UnPlus _1 )
# 42265 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 102 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt)
# 42286 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1385 "parser_cocci_menhir.mly"
+# 1409 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.UnMinus _1 )
# 42293 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 103 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(Data.clt)
# 42314 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1386 "parser_cocci_menhir.mly"
+# 1410 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Tilde _1 )
# 42321 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_when_start =
-# 1979 "parser_cocci_menhir.mly"
+# 2003 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS((Ast0.wrap(Ast0.Exp(_1)))::_2)) )
# 42351 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_when_start =
-# 1981 "parser_cocci_menhir.mly"
+# 2005 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1@_2)) )
# 42381 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_w_ in
let _endpos = _endpos_w_ in
let _v : 'tv_whenppdecs =
-# 984 "parser_cocci_menhir.mly"
+# 1008 "parser_cocci_menhir.mly"
( w )
# 42405 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_whens_when_start_rule_elem_statement_any_strict_ =
-# 2026 "parser_cocci_menhir.mly"
+# 2050 "parser_cocci_menhir.mly"
( [Ast0.WhenNot w] )
# 42441 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_whens_when_start_rule_elem_statement_any_strict_ =
-# 2027 "parser_cocci_menhir.mly"
+# 2051 "parser_cocci_menhir.mly"
( [Ast0.WhenAlways w] )
# 42477 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_whens_when_start_rule_elem_statement_any_strict_ =
-# 2029 "parser_cocci_menhir.mly"
+# 2053 "parser_cocci_menhir.mly"
( List.map (function x -> Ast0.WhenModifier(x)) _2 )
# 42509 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_whens_when_start_rule_elem_statement_any_strict_ =
-# 2030 "parser_cocci_menhir.mly"
+# 2054 "parser_cocci_menhir.mly"
( [Ast0.WhenNotTrue e] )
# 42545 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_whens_when_start_rule_elem_statement_any_strict_ =
-# 2031 "parser_cocci_menhir.mly"
+# 2055 "parser_cocci_menhir.mly"
( [Ast0.WhenNotFalse e] )
# 42581 "parser_cocci_menhir.ml"
in
let rec script_meta_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1953 lexer lexbuf) : (
-# 165 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 42605 "parser_cocci_menhir.ml"
))
and rule_name =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1878 lexer lexbuf) : (
-# 159 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 42613 "parser_cocci_menhir.ml"
))
and reinit =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1876 lexer lexbuf) : (
-# 137 "parser_cocci_menhir.mly"
+# 161 "parser_cocci_menhir.mly"
(unit)
# 42621 "parser_cocci_menhir.ml"
))
and plus_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1840 lexer lexbuf) : (
-# 146 "parser_cocci_menhir.mly"
+# 170 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 42629 "parser_cocci_menhir.ml"
))
and plus_exp_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1832 lexer lexbuf) : (
-# 149 "parser_cocci_menhir.mly"
+# 173 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 42637 "parser_cocci_menhir.ml"
))
and never_used =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1826 lexer lexbuf) : (
-# 174 "parser_cocci_menhir.mly"
+# 198 "parser_cocci_menhir.mly"
(unit)
# 42645 "parser_cocci_menhir.ml"
))
and minus_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1742 lexer lexbuf) : (
-# 140 "parser_cocci_menhir.mly"
+# 164 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 42653 "parser_cocci_menhir.ml"
))
and minus_exp_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1730 lexer lexbuf) : (
-# 143 "parser_cocci_menhir.mly"
+# 167 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 42661 "parser_cocci_menhir.ml"
))
and meta_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1727 lexer lexbuf) : (
-# 163 "parser_cocci_menhir.mly"
+# 187 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 42669 "parser_cocci_menhir.ml"
))
and iso_rule_name =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1723 lexer lexbuf) : (
-# 155 "parser_cocci_menhir.mly"
+# 179 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 42677 "parser_cocci_menhir.ml"
))
and iso_meta_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1456 lexer lexbuf) : (
-# 171 "parser_cocci_menhir.mly"
+# 195 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 42685 "parser_cocci_menhir.ml"
))
and iso_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 18 lexer lexbuf) : (
-# 168 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 42693 "parser_cocci_menhir.ml"
))
and include_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 0 lexer lexbuf) : (
-# 152 "parser_cocci_menhir.mly"
+# 176 "parser_cocci_menhir.mly"
(Data.incl_iso list)
# 42701 "parser_cocci_menhir.ml"
))
HCoop / bpt / coccinelle.git / blobdiff