type token =
| Tvolatile of (
-# 120 "parser_cocci_menhir.mly"
+# 96 "parser_cocci_menhir.mly"
(Data.clt)
# 8 "parser_cocci_menhir.ml"
)
| Tvoid of (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 13 "parser_cocci_menhir.ml"
)
| Tunsigned of (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 18 "parser_cocci_menhir.ml"
)
| Tunion of (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 23 "parser_cocci_menhir.ml"
)
| Ttypedef of (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 28 "parser_cocci_menhir.ml"
)
| Tstruct of (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 33 "parser_cocci_menhir.ml"
)
| Tstatic of (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 38 "parser_cocci_menhir.ml"
)
| Tssize_t of (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 43 "parser_cocci_menhir.ml"
)
| Tsize_t of (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 48 "parser_cocci_menhir.ml"
)
| Tsigned of (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 53 "parser_cocci_menhir.ml"
)
| Tshort of (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 58 "parser_cocci_menhir.ml"
)
| Tregister of (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 63 "parser_cocci_menhir.ml"
)
| Tptrdiff_t of (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 68 "parser_cocci_menhir.ml"
)
| Tlong of (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 73 "parser_cocci_menhir.ml"
)
| Tlist
| Tint of (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 79 "parser_cocci_menhir.ml"
)
| Tinline of (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 84 "parser_cocci_menhir.ml"
)
| Tfloat of (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 89 "parser_cocci_menhir.ml"
)
| Textern of (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 94 "parser_cocci_menhir.ml"
)
| Tenum of (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 99 "parser_cocci_menhir.ml"
)
| Tdouble of (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 104 "parser_cocci_menhir.ml"
)
| Tconst of (
-# 120 "parser_cocci_menhir.mly"
+# 96 "parser_cocci_menhir.mly"
(Data.clt)
# 109 "parser_cocci_menhir.ml"
)
| Tchar of (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 114 "parser_cocci_menhir.ml"
)
| Tauto of (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 119 "parser_cocci_menhir.ml"
)
| Tattr of (
-# 121 "parser_cocci_menhir.mly"
+# 97 "parser_cocci_menhir.mly"
(string * Data.clt)
# 124 "parser_cocci_menhir.ml"
)
| TXor of (
-# 160 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Data.clt)
# 129 "parser_cocci_menhir.ml"
)
| TWords
| TWhy0
| TWhy of (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 136 "parser_cocci_menhir.ml"
)
| TWhile of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 141 "parser_cocci_menhir.ml"
)
| TWhenTrue of (
-# 142 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 146 "parser_cocci_menhir.ml"
)
| TWhenFalse of (
-# 142 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 151 "parser_cocci_menhir.ml"
)
| TWhen of (
-# 142 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 156 "parser_cocci_menhir.ml"
)
| TUsing
| TUnderscore
| TUndef of (
-# 149 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Data.clt * token)
# 164 "parser_cocci_menhir.ml"
)
| TTypedef
| TTypeId of (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 170 "parser_cocci_menhir.ml"
)
| TType
| TTildeExclEq of (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 176 "parser_cocci_menhir.ml"
)
| TTildeEq of (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 181 "parser_cocci_menhir.ml"
)
| TTilde of (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 186 "parser_cocci_menhir.ml"
)
| TSwitch of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 191 "parser_cocci_menhir.ml"
)
| TSub of (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 196 "parser_cocci_menhir.ml"
)
| TString of (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 201 "parser_cocci_menhir.ml"
)
| TStrict of (
-# 142 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 206 "parser_cocci_menhir.ml"
)
| TStatement
| TSizeof of (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 212 "parser_cocci_menhir.ml"
)
| TShROp of (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 217 "parser_cocci_menhir.ml"
)
| TShLOp of (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 222 "parser_cocci_menhir.ml"
)
| TScriptData of (
-# 139 "parser_cocci_menhir.mly"
+# 115 "parser_cocci_menhir.mly"
(string)
# 227 "parser_cocci_menhir.ml"
)
| TScript
| TRuleName of (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 233 "parser_cocci_menhir.ml"
)
| TRightIso
| TReturn of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 239 "parser_cocci_menhir.ml"
)
| TPure
| TPtrOp of (
-# 172 "parser_cocci_menhir.mly"
+# 148 "parser_cocci_menhir.mly"
(Data.clt)
# 245 "parser_cocci_menhir.ml"
)
| TPtVirg of (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 250 "parser_cocci_menhir.ml"
)
| TPragma of (
-# 126 "parser_cocci_menhir.mly"
+# 102 "parser_cocci_menhir.mly"
(Ast_cocci.added_string * Data.clt)
# 255 "parser_cocci_menhir.ml"
)
| TPosition
| TPosAny
| TPlusFile of (
-# 151 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(string * Data.clt)
# 262 "parser_cocci_menhir.ml"
)
| TPlus0
| TPlus of (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 268 "parser_cocci_menhir.ml"
)
| TPathIsoFile of (
-# 147 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(string)
# 273 "parser_cocci_menhir.ml"
)
| TParameter
| TPOEllipsis of (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 279 "parser_cocci_menhir.ml"
)
| TPCEllipsis of (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 284 "parser_cocci_menhir.ml"
)
| TPArob
| TOrLog of (
-# 157 "parser_cocci_menhir.mly"
+# 133 "parser_cocci_menhir.mly"
(Data.clt)
# 290 "parser_cocci_menhir.ml"
)
| TOr of (
-# 159 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 295 "parser_cocci_menhir.ml"
)
| TOn
| TOPar0 of (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 301 "parser_cocci_menhir.ml"
)
| TOPar of (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 306 "parser_cocci_menhir.ml"
)
| TOInit of (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 311 "parser_cocci_menhir.ml"
)
| TOEllipsis of (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 316 "parser_cocci_menhir.ml"
)
| TOCro of (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 321 "parser_cocci_menhir.ml"
)
| TOBrace of (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 326 "parser_cocci_menhir.ml"
)
| TNothing
| TNotEq of (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 332 "parser_cocci_menhir.ml"
)
| TNever
| TName
| TMul of (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 339 "parser_cocci_menhir.ml"
)
| TMinusFile of (
-# 151 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(string * Data.clt)
# 344 "parser_cocci_menhir.ml"
)
| TMinus of (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 349 "parser_cocci_menhir.ml"
)
| TMid0 of (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 354 "parser_cocci_menhir.ml"
)
| TMetavariable
| TMetaType of (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 360 "parser_cocci_menhir.ml"
)
| TMetaStmList of (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 365 "parser_cocci_menhir.ml"
)
| TMetaStm of (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 370 "parser_cocci_menhir.ml"
)
| TMetaPos of (
-# 136 "parser_cocci_menhir.mly"
+# 112 "parser_cocci_menhir.mly"
(Parse_aux.pos_info)
# 375 "parser_cocci_menhir.ml"
)
| TMetaParamList of (
-# 133 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 380 "parser_cocci_menhir.ml"
)
| TMetaParam of (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 385 "parser_cocci_menhir.ml"
)
| TMetaLocalIdExp of (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 390 "parser_cocci_menhir.ml"
)
| TMetaLocalFunc of (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 395 "parser_cocci_menhir.ml"
)
| TMetaIterator of (
-# 129 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 400 "parser_cocci_menhir.ml"
)
| TMetaInit of (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 405 "parser_cocci_menhir.ml"
)
| TMetaIdExp of (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 410 "parser_cocci_menhir.ml"
)
| TMetaId of (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 415 "parser_cocci_menhir.ml"
)
| TMetaFunc of (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 420 "parser_cocci_menhir.ml"
)
| TMetaFieldList of (
-# 134 "parser_cocci_menhir.mly"
+# 110 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 425 "parser_cocci_menhir.ml"
)
| TMetaField of (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 430 "parser_cocci_menhir.ml"
)
| TMetaExpList of (
-# 133 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 435 "parser_cocci_menhir.ml"
)
| TMetaExp of (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 440 "parser_cocci_menhir.ml"
)
| TMetaErr of (
-# 130 "parser_cocci_menhir.mly"
+# 106 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 445 "parser_cocci_menhir.ml"
)
| TMetaDeclarer of (
-# 129 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 450 "parser_cocci_menhir.ml"
)
| TMetaDecl of (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 455 "parser_cocci_menhir.ml"
)
| TMetaConst of (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 460 "parser_cocci_menhir.ml"
)
| TMeta of (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 465 "parser_cocci_menhir.ml"
)
| TMPtVirg
| TLogOp of (
-# 163 "parser_cocci_menhir.mly"
+# 139 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 471 "parser_cocci_menhir.ml"
)
| TLocal
| TLineEnd of (
-# 142 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 477 "parser_cocci_menhir.ml"
)
| TIteratorId of (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 482 "parser_cocci_menhir.ml"
)
| TIso
| TInvalid
| TInt of (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 498 "parser_cocci_menhir.ml"
)
| TInitialize
| TInitialiser
| TIncludeNL of (
-# 148 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(string * Data.clt)
# 505 "parser_cocci_menhir.ml"
)
| TIncludeL of (
-# 148 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(string * Data.clt)
# 510 "parser_cocci_menhir.ml"
)
| TInc of (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 515 "parser_cocci_menhir.ml"
)
| TIf of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 520 "parser_cocci_menhir.ml"
)
| TIdentifier
| TIdent of (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 526 "parser_cocci_menhir.ml"
)
| TIdExpression
| TGoto of (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 532 "parser_cocci_menhir.ml"
)
| TGenerated
| TFunction
| TFunDecl of (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 539 "parser_cocci_menhir.ml"
)
| TFresh
| TForall
| TFor of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 546 "parser_cocci_menhir.ml"
)
| TFloat of (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 551 "parser_cocci_menhir.ml"
)
| TEver
| TError
| TEqEq of (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 563 "parser_cocci_menhir.ml"
)
| TEq of (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 568 "parser_cocci_menhir.ml"
)
| TElse of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 573 "parser_cocci_menhir.ml"
)
| TEllipsis of (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 578 "parser_cocci_menhir.ml"
)
| TDotDot of (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 583 "parser_cocci_menhir.ml"
)
| TDot of (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 588 "parser_cocci_menhir.ml"
)
| TDo of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 593 "parser_cocci_menhir.ml"
)
| TDmOp of (
-# 165 "parser_cocci_menhir.mly"
+# 141 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 598 "parser_cocci_menhir.ml"
)
| TDisable
| TDepends
| TDefineParam of (
-# 150 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt * token * int * int)
# 605 "parser_cocci_menhir.ml"
)
| TDefine of (
-# 149 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Data.clt * token)
# 610 "parser_cocci_menhir.ml"
)
| TDefault of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 615 "parser_cocci_menhir.ml"
)
| TDeclarerId of (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 620 "parser_cocci_menhir.ml"
)
| TDeclarer
| TDeclaration
| TDec of (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 627 "parser_cocci_menhir.ml"
)
| TCppConcatOp
| TContinue of (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 633 "parser_cocci_menhir.ml"
)
| TContext
| TConstant
| TComma of (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 640 "parser_cocci_menhir.ml"
)
| TChar of (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 645 "parser_cocci_menhir.ml"
)
| TCase of (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 650 "parser_cocci_menhir.ml"
)
| TCPar0 of (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 655 "parser_cocci_menhir.ml"
)
| TCPar of (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 660 "parser_cocci_menhir.ml"
)
| TCEllipsis of (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 665 "parser_cocci_menhir.ml"
)
| TCCro of (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 670 "parser_cocci_menhir.ml"
)
| TCBrace of (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 675 "parser_cocci_menhir.ml"
)
| TBreak of (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 680 "parser_cocci_menhir.ml"
)
| TBang0
| TBang of (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 686 "parser_cocci_menhir.ml"
)
| TAssign of (
-# 176 "parser_cocci_menhir.mly"
+# 152 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 691 "parser_cocci_menhir.ml"
)
| TArobArob
| TArob
| TAny of (
-# 142 "parser_cocci_menhir.mly"
+# 118 "parser_cocci_menhir.mly"
(Data.clt)
# 698 "parser_cocci_menhir.ml"
)
| TAndLog of (
-# 158 "parser_cocci_menhir.mly"
+# 134 "parser_cocci_menhir.mly"
(Data.clt)
# 703 "parser_cocci_menhir.ml"
)
| TAnd of (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 708 "parser_cocci_menhir.ml"
)
and _menhir_jeton = token
-# 25 "parser_cocci_menhir.mly"
+# 1 "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 =
-# 2177 "parser_cocci_menhir.mly"
+# 2153 "parser_cocci_menhir.mly"
( Ast0.set_arg_exp _1 )
# 1736 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 133 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 1757 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_aexpr =
-# 2179 "parser_cocci_menhir.mly"
+# 2155 "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 =
-# 2188 "parser_cocci_menhir.mly"
+# 2164 "parser_cocci_menhir.mly"
( Ast0.set_arg_exp(Ast0.wrap(Ast0.TypeExp(_1))) )
# 1795 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2224 "parser_cocci_menhir.mly"
+# 2200 "parser_cocci_menhir.mly"
( Ast.WhenAny )
# 1817 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2225 "parser_cocci_menhir.mly"
+# 2201 "parser_cocci_menhir.mly"
( Ast.WhenStrict )
# 1839 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2226 "parser_cocci_menhir.mly"
+# 2202 "parser_cocci_menhir.mly"
( Ast.WhenForall )
# 1861 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_any_strict =
-# 2227 "parser_cocci_menhir.mly"
+# 2203 "parser_cocci_menhir.mly"
( Ast.WhenExists )
# 1883 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_eexpr_dot_expressions_ =
-# 1434 "parser_cocci_menhir.mly"
+# 1410 "parser_cocci_menhir.mly"
( _1 )
# 1907 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 1939 "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_ =
-# 1436 "parser_cocci_menhir.mly"
+# 1412 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 1947 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 165 "parser_cocci_menhir.mly"
+# 141 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 1979 "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_ =
-# 1438 "parser_cocci_menhir.mly"
+# 1414 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 1987 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 2019 "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_ =
-# 1440 "parser_cocci_menhir.mly"
+# 1416 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 2027 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 2059 "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_ =
-# 1442 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 2067 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2099 "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_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2107 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2139 "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_ =
-# 1446 "parser_cocci_menhir.mly"
+# 1422 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2147 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 163 "parser_cocci_menhir.mly"
+# 139 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 2179 "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_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1424 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 2187 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 2219 "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_ =
-# 1450 "parser_cocci_menhir.mly"
+# 1426 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 2227 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 2259 "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_ =
-# 1452 "parser_cocci_menhir.mly"
+# 1428 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 2267 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 2299 "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_ =
-# 1454 "parser_cocci_menhir.mly"
+# 1430 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 2307 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 159 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 2339 "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_ =
-# 1456 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 2347 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 160 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Data.clt)
# 2379 "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_ =
-# 1458 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 2387 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 158 "parser_cocci_menhir.mly"
+# 134 "parser_cocci_menhir.mly"
(Data.clt)
# 2419 "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_ =
-# 1460 "parser_cocci_menhir.mly"
+# 1436 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 2427 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 157 "parser_cocci_menhir.mly"
+# 133 "parser_cocci_menhir.mly"
(Data.clt)
# 2459 "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_ =
-# 1462 "parser_cocci_menhir.mly"
+# 1438 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 2467 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_eexpr_invalid_ =
-# 1434 "parser_cocci_menhir.mly"
+# 1410 "parser_cocci_menhir.mly"
( _1 )
# 2491 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 2523 "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_ =
-# 1436 "parser_cocci_menhir.mly"
+# 1412 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 2531 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 165 "parser_cocci_menhir.mly"
+# 141 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2563 "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_ =
-# 1438 "parser_cocci_menhir.mly"
+# 1414 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2571 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 2603 "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_ =
-# 1440 "parser_cocci_menhir.mly"
+# 1416 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 2611 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 2643 "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_ =
-# 1442 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 2651 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2683 "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_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2691 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 2723 "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_ =
-# 1446 "parser_cocci_menhir.mly"
+# 1422 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 2731 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 163 "parser_cocci_menhir.mly"
+# 139 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 2763 "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_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1424 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 2771 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 2803 "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_ =
-# 1450 "parser_cocci_menhir.mly"
+# 1426 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 2811 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 2843 "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_ =
-# 1452 "parser_cocci_menhir.mly"
+# 1428 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 2851 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 2883 "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_ =
-# 1454 "parser_cocci_menhir.mly"
+# 1430 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 2891 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 159 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 2923 "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_ =
-# 1456 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 2931 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 160 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Data.clt)
# 2963 "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_ =
-# 1458 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 2971 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 158 "parser_cocci_menhir.mly"
+# 134 "parser_cocci_menhir.mly"
(Data.clt)
# 3003 "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_ =
-# 1460 "parser_cocci_menhir.mly"
+# 1436 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 3011 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 157 "parser_cocci_menhir.mly"
+# 133 "parser_cocci_menhir.mly"
(Data.clt)
# 3043 "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_ =
-# 1462 "parser_cocci_menhir.mly"
+# 1438 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 3051 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_eexpr_nest_expressions_ =
-# 1434 "parser_cocci_menhir.mly"
+# 1410 "parser_cocci_menhir.mly"
( _1 )
# 3075 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 3107 "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_ =
-# 1436 "parser_cocci_menhir.mly"
+# 1412 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 3115 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 165 "parser_cocci_menhir.mly"
+# 141 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3147 "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_ =
-# 1438 "parser_cocci_menhir.mly"
+# 1414 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3155 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 3187 "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_ =
-# 1440 "parser_cocci_menhir.mly"
+# 1416 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 3195 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 3227 "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_ =
-# 1442 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 3235 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3267 "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_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3275 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3307 "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_ =
-# 1446 "parser_cocci_menhir.mly"
+# 1422 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3315 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 163 "parser_cocci_menhir.mly"
+# 139 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 3347 "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_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1424 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 3355 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 3387 "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_ =
-# 1450 "parser_cocci_menhir.mly"
+# 1426 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 3395 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 3427 "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_ =
-# 1452 "parser_cocci_menhir.mly"
+# 1428 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 3435 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 3467 "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_ =
-# 1454 "parser_cocci_menhir.mly"
+# 1430 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 3475 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 159 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 3507 "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_ =
-# 1456 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 3515 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 160 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Data.clt)
# 3547 "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_ =
-# 1458 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 3555 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 158 "parser_cocci_menhir.mly"
+# 134 "parser_cocci_menhir.mly"
(Data.clt)
# 3587 "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_ =
-# 1460 "parser_cocci_menhir.mly"
+# 1436 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 3595 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 157 "parser_cocci_menhir.mly"
+# 133 "parser_cocci_menhir.mly"
(Data.clt)
# 3627 "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_ =
-# 1462 "parser_cocci_menhir.mly"
+# 1438 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 3635 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_expr_invalid_ =
-# 1434 "parser_cocci_menhir.mly"
+# 1410 "parser_cocci_menhir.mly"
( _1 )
# 3659 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 3691 "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_ =
-# 1436 "parser_cocci_menhir.mly"
+# 1412 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 3699 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 165 "parser_cocci_menhir.mly"
+# 141 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3731 "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_ =
-# 1438 "parser_cocci_menhir.mly"
+# 1414 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3739 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 3771 "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_ =
-# 1440 "parser_cocci_menhir.mly"
+# 1416 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 3779 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 3811 "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_ =
-# 1442 "parser_cocci_menhir.mly"
+# 1418 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 3819 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3851 "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_ =
-# 1444 "parser_cocci_menhir.mly"
+# 1420 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3859 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 3891 "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_ =
-# 1446 "parser_cocci_menhir.mly"
+# 1422 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 3899 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 163 "parser_cocci_menhir.mly"
+# 139 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 3931 "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_ =
-# 1448 "parser_cocci_menhir.mly"
+# 1424 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 3939 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 3971 "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_ =
-# 1450 "parser_cocci_menhir.mly"
+# 1426 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 3979 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 4011 "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_ =
-# 1452 "parser_cocci_menhir.mly"
+# 1428 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 4019 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 4051 "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_ =
-# 1454 "parser_cocci_menhir.mly"
+# 1430 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 4059 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 159 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 4091 "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_ =
-# 1456 "parser_cocci_menhir.mly"
+# 1432 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 4099 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 160 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Data.clt)
# 4131 "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_ =
-# 1458 "parser_cocci_menhir.mly"
+# 1434 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 4139 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 158 "parser_cocci_menhir.mly"
+# 134 "parser_cocci_menhir.mly"
(Data.clt)
# 4171 "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_ =
-# 1460 "parser_cocci_menhir.mly"
+# 1436 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 4179 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 157 "parser_cocci_menhir.mly"
+# 133 "parser_cocci_menhir.mly"
(Data.clt)
# 4211 "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_ =
-# 1462 "parser_cocci_menhir.mly"
+# 1438 "parser_cocci_menhir.mly"
( P.logic_op Ast.OrLog _1 _2 _3 )
# 4219 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arith_expr_bis =
-# 1467 "parser_cocci_menhir.mly"
+# 1443 "parser_cocci_menhir.mly"
( _1 )
# 4243 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 4275 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1469 "parser_cocci_menhir.mly"
+# 1445 "parser_cocci_menhir.mly"
( P.arith_op Ast.Mul _1 _2 _3 )
# 4283 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 165 "parser_cocci_menhir.mly"
+# 141 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 4315 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1471 "parser_cocci_menhir.mly"
+# 1447 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 4323 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 4355 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1473 "parser_cocci_menhir.mly"
+# 1449 "parser_cocci_menhir.mly"
( P.arith_op Ast.Plus _1 _2 _3 )
# 4363 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 4395 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1475 "parser_cocci_menhir.mly"
+# 1451 "parser_cocci_menhir.mly"
( P.arith_op Ast.Minus _1 _2 _3 )
# 4403 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 4435 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1477 "parser_cocci_menhir.mly"
+# 1453 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 4443 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 164 "parser_cocci_menhir.mly"
+# 140 "parser_cocci_menhir.mly"
(Ast_cocci.arithOp * Data.clt)
# 4475 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1479 "parser_cocci_menhir.mly"
+# 1455 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.arith_op op _1 clt _3 )
# 4483 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 163 "parser_cocci_menhir.mly"
+# 139 "parser_cocci_menhir.mly"
(Ast_cocci.logicalOp * Data.clt)
# 4515 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1481 "parser_cocci_menhir.mly"
+# 1457 "parser_cocci_menhir.mly"
( let (op,clt) = _2 in P.logic_op op _1 clt _3 )
# 4523 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 4555 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1483 "parser_cocci_menhir.mly"
+# 1459 "parser_cocci_menhir.mly"
( P.logic_op Ast.Eq _1 _2 _3 )
# 4563 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 162 "parser_cocci_menhir.mly"
+# 138 "parser_cocci_menhir.mly"
(Data.clt)
# 4595 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1485 "parser_cocci_menhir.mly"
+# 1461 "parser_cocci_menhir.mly"
( P.logic_op Ast.NotEq _1 _2 _3 )
# 4603 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 4635 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1487 "parser_cocci_menhir.mly"
+# 1463 "parser_cocci_menhir.mly"
( P.arith_op Ast.And _1 _2 _3 )
# 4643 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 159 "parser_cocci_menhir.mly"
+# 135 "parser_cocci_menhir.mly"
(Data.clt)
# 4675 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1489 "parser_cocci_menhir.mly"
+# 1465 "parser_cocci_menhir.mly"
( P.arith_op Ast.Or _1 _2 _3 )
# 4683 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 160 "parser_cocci_menhir.mly"
+# 136 "parser_cocci_menhir.mly"
(Data.clt)
# 4715 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1491 "parser_cocci_menhir.mly"
+# 1467 "parser_cocci_menhir.mly"
( P.arith_op Ast.Xor _1 _2 _3 )
# 4723 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_arith_expr_bis = Obj.magic _3 in
let _2 : (
-# 158 "parser_cocci_menhir.mly"
+# 134 "parser_cocci_menhir.mly"
(Data.clt)
# 4755 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_arith_expr_bis =
-# 1493 "parser_cocci_menhir.mly"
+# 1469 "parser_cocci_menhir.mly"
( P.logic_op Ast.AndLog _1 _2 _3 )
# 4763 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arity =
-# 607 "parser_cocci_menhir.mly"
+# 583 "parser_cocci_menhir.mly"
( Ast.UNIQUE )
# 4785 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arity =
-# 608 "parser_cocci_menhir.mly"
+# 584 "parser_cocci_menhir.mly"
( Ast.OPT )
# 4807 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_arity =
-# 609 "parser_cocci_menhir.mly"
+# 585 "parser_cocci_menhir.mly"
( Ast.MULTI )
# 4829 "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 =
-# 610 "parser_cocci_menhir.mly"
+# 586 "parser_cocci_menhir.mly"
( Ast.NONE )
# 4846 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let r : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 4877 "parser_cocci_menhir.ml"
) = Obj.magic r in
let i : 'tv_option_eexpr_ = Obj.magic i in
let l : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 4883 "parser_cocci_menhir.ml"
) = Obj.magic l in
let _startpos = _startpos_l_ in
let _endpos = _endpos_r_ in
let _v : 'tv_array_dec =
-# 1258 "parser_cocci_menhir.mly"
+# 1234 "parser_cocci_menhir.mly"
( (l,i,r) )
# 4890 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_assign_expr_eexpr_dot_expressions_ =
-# 1406 "parser_cocci_menhir.mly"
+# 1382 "parser_cocci_menhir.mly"
( _1 )
# 4914 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 176 "parser_cocci_menhir.mly"
+# 152 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 4946 "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_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1384 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 4988 "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_ =
-# 1412 "parser_cocci_menhir.mly"
+# 1388 "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_ =
-# 1406 "parser_cocci_menhir.mly"
+# 1382 "parser_cocci_menhir.mly"
( _1 )
# 5022 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 176 "parser_cocci_menhir.mly"
+# 152 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 5054 "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_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1384 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 5096 "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_ =
-# 1412 "parser_cocci_menhir.mly"
+# 1388 "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_ =
-# 1406 "parser_cocci_menhir.mly"
+# 1382 "parser_cocci_menhir.mly"
( _1 )
# 5130 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 176 "parser_cocci_menhir.mly"
+# 152 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 5162 "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_ =
-# 1408 "parser_cocci_menhir.mly"
+# 1384 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 5204 "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_ =
-# 1412 "parser_cocci_menhir.mly"
+# 1388 "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 =
-# 1417 "parser_cocci_menhir.mly"
+# 1393 "parser_cocci_menhir.mly"
( _1 )
# 5238 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_assign_expr_bis = Obj.magic _3 in
let _2 : (
-# 176 "parser_cocci_menhir.mly"
+# 152 "parser_cocci_menhir.mly"
(Ast_cocci.assignOp * Data.clt)
# 5270 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_bis =
-# 1419 "parser_cocci_menhir.mly"
+# 1395 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 5312 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_assign_expr_bis =
-# 1423 "parser_cocci_menhir.mly"
+# 1399 "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_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1379 "parser_cocci_menhir.mly"
( _1 )
# 5346 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_basic_expr_eexpr_nest_expressions_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1379 "parser_cocci_menhir.mly"
( _1 )
# 5370 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_basic_expr_expr_invalid_ =
-# 1403 "parser_cocci_menhir.mly"
+# 1379 "parser_cocci_menhir.mly"
( _1 )
# 5394 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_fun_start = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 5426 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 5431 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_case_line =
-# 1127 "parser_cocci_menhir.mly"
+# 1103 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Default(P.clt2mcode "default" _1,P.clt2mcode ":" _2,_3)) )
# 5439 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _4 : 'tv_fun_start = Obj.magic _4 in
let _3 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 5476 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 5482 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : 'tv_case_line =
-# 1130 "parser_cocci_menhir.mly"
+# 1106 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Case(P.clt2mcode "case" _1,_2,P.clt2mcode ":" _3,_4)) )
# 5489 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_eexpr_dot_expressions_ =
-# 1498 "parser_cocci_menhir.mly"
+# 1474 "parser_cocci_menhir.mly"
( _1 )
# 5513 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_eexpr_dot_expressions_ = Obj.magic e in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 5550 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 5556 "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_ =
-# 1500 "parser_cocci_menhir.mly"
+# 1476 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5564 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_eexpr_invalid_ =
-# 1498 "parser_cocci_menhir.mly"
+# 1474 "parser_cocci_menhir.mly"
( _1 )
# 5588 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_eexpr_invalid_ = Obj.magic e in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 5625 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 5631 "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_ =
-# 1500 "parser_cocci_menhir.mly"
+# 1476 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5639 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_eexpr_nest_expressions_ =
-# 1498 "parser_cocci_menhir.mly"
+# 1474 "parser_cocci_menhir.mly"
( _1 )
# 5663 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_eexpr_nest_expressions_ = Obj.magic e in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 5700 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 5706 "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_ =
-# 1500 "parser_cocci_menhir.mly"
+# 1476 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5714 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cast_expr_expr_invalid_ =
-# 1498 "parser_cocci_menhir.mly"
+# 1474 "parser_cocci_menhir.mly"
( _1 )
# 5738 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let e : 'tv_cast_expr_expr_invalid_ = Obj.magic e in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 5775 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 5781 "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_ =
-# 1500 "parser_cocci_menhir.mly"
+# 1476 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Cast (P.clt2mcode "(" lp, t,
P.clt2mcode ")" rp, e)) )
# 5789 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_choose_iso =
-# 307 "parser_cocci_menhir.mly"
+# 283 "parser_cocci_menhir.mly"
( List.map P.id2name _2 )
# 5817 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_any_strict_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5841 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_ctype_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5865 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_d_ident_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5889 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_ident_or_const_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5913 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_meta_ident_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5937 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_pure_ident_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5961 "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_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 5985 "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__ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6009 "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__ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6033 "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__ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6057 "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__ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6081 "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_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6105 "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__ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6129 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_comma_list_typedef_ident_ =
-# 2202 "parser_cocci_menhir.mly"
+# 2178 "parser_cocci_menhir.mly"
( _1 )
# 6153 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cond_expr_eexpr_dot_expressions_ =
-# 1428 "parser_cocci_menhir.mly"
+# 1404 "parser_cocci_menhir.mly"
( _1 )
# 6177 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let r : 'tv_eexpr = Obj.magic r in
let dd : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 6219 "parser_cocci_menhir.ml"
) = Obj.magic dd in
let t : 'tv_option_eexpr_ = Obj.magic t in
let w : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 6225 "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_ =
-# 1430 "parser_cocci_menhir.mly"
+# 1406 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.CondExpr (l, P.clt2mcode "?" w, t,
P.clt2mcode ":" dd, r)) )
# 6234 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cond_expr_eexpr_nest_expressions_ =
-# 1428 "parser_cocci_menhir.mly"
+# 1404 "parser_cocci_menhir.mly"
( _1 )
# 6258 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let r : 'tv_eexpr = Obj.magic r in
let dd : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 6300 "parser_cocci_menhir.ml"
) = Obj.magic dd in
let t : 'tv_option_eexpr_ = Obj.magic t in
let w : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 6306 "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_ =
-# 1430 "parser_cocci_menhir.mly"
+# 1406 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.CondExpr (l, P.clt2mcode "?" w, t,
P.clt2mcode ":" dd, r)) )
# 6315 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_cond_expr_expr_invalid_ =
-# 1428 "parser_cocci_menhir.mly"
+# 1404 "parser_cocci_menhir.mly"
( _1 )
# 6339 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let r : 'tv_eexpr = Obj.magic r in
let dd : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 6381 "parser_cocci_menhir.ml"
) = Obj.magic dd in
let t : 'tv_option_eexpr_ = Obj.magic t in
let w : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 6387 "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_ =
-# 1430 "parser_cocci_menhir.mly"
+# 1406 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.CondExpr (l, P.clt2mcode "?" w, t,
P.clt2mcode ":" dd, r)) )
# 6396 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 120 "parser_cocci_menhir.mly"
+# 96 "parser_cocci_menhir.mly"
(Data.clt)
# 6417 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_const_vol =
-# 1035 "parser_cocci_menhir.mly"
+# 1011 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Const _1 )
# 6424 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 120 "parser_cocci_menhir.mly"
+# 96 "parser_cocci_menhir.mly"
(Data.clt)
# 6445 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_const_vol =
-# 1036 "parser_cocci_menhir.mly"
+# 1012 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Volatile _1 )
# 6452 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_aexpr_TEllipsis_ =
-# 1978 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6476 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6502 "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_ =
-# 1980 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6511 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_aexpr_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6543 "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_ =
-# 1983 "parser_cocci_menhir.mly"
+# 1959 "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_ =
-# 1986 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
( _2 )
# 6581 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_dparam_TEllipsis_ =
-# 1978 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6605 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6631 "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_ =
-# 1980 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6640 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_dparam_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6672 "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_ =
-# 1983 "parser_cocci_menhir.mly"
+# 1959 "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_ =
-# 1986 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
( _2 )
# 6710 "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__ =
-# 1978 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6734 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6760 "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__ =
-# 1980 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6769 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6801 "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__ =
-# 1983 "parser_cocci_menhir.mly"
+# 1959 "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__ =
-# 1986 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
( _2 )
# 6839 "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__ =
-# 1978 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6863 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6889 "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__ =
-# 1980 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 6898 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 6930 "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__ =
-# 1983 "parser_cocci_menhir.mly"
+# 1959 "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__ =
-# 1986 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
( _2 )
# 6968 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_list_one_dec_decl__TEllipsis_ =
-# 1978 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 6992 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 7018 "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_ =
-# 1980 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 7027 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 7059 "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_ =
-# 1983 "parser_cocci_menhir.mly"
+# 1959 "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_ =
-# 1986 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
( _2 )
# 7097 "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_ =
-# 1978 "parser_cocci_menhir.mly"
+# 1954 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 7121 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 7147 "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_ =
-# 1980 "parser_cocci_menhir.mly"
+# 1956 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 7156 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 7188 "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_ =
-# 1983 "parser_cocci_menhir.mly"
+# 1959 "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_ =
-# 1986 "parser_cocci_menhir.mly"
+# 1962 "parser_cocci_menhir.mly"
( _2 )
# 7226 "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 =
-# 753 "parser_cocci_menhir.mly"
+# 729 "parser_cocci_menhir.mly"
( [] )
# 7243 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_continue_struct_decl_list =
-# 754 "parser_cocci_menhir.mly"
+# 730 "parser_cocci_menhir.mly"
( _1@_2 )
# 7273 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_continue_struct_decl_list =
-# 755 "parser_cocci_menhir.mly"
+# 731 "parser_cocci_menhir.mly"
( _1 )
# 7297 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7329 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7334 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 7346 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7352 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7365 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7397 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7402 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 7414 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7420 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7433 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7465 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7470 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 7482 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7488 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7501 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 7533 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7538 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 7551 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7557 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7570 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 7611 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 7616 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7621 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7646 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7659 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7691 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7696 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 7708 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7714 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7727 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7764 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7769 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7774 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 7797 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7810 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7842 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7847 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 7859 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7865 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7878 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7910 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7915 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 7927 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 7933 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 7946 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 7978 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 7983 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 7995 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 8001 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8014 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 8046 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 8051 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 8064 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 8070 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8083 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 8124 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 8129 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 8134 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 8159 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8172 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8204 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 8209 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 8221 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 8227 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8240 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8277 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8282 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 8287 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 8310 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8323 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8350 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 8361 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8367 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8380 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8407 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 8418 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8424 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8437 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8464 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 8475 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8481 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8494 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 8521 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 8533 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8539 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8552 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 8588 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 8593 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8617 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8630 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8657 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 8668 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8674 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8687 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8719 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8724 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 8746 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8759 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 8786 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 643 "parser_cocci_menhir.mly"
+# 619 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 8797 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 8803 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8816 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8843 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 645 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 8854 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 8860 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8873 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 8900 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 647 "parser_cocci_menhir.mly"
+# 623 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 8911 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 8917 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8930 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 8957 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 649 "parser_cocci_menhir.mly"
+# 625 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 8968 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 8974 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 8987 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 9014 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 651 "parser_cocci_menhir.mly"
+# 627 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 9025 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9031 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9044 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 9071 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 653 "parser_cocci_menhir.mly"
+# 629 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 9082 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9088 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9101 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 9134 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 655 "parser_cocci_menhir.mly"
+# 631 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 9147 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9153 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9166 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9208 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9214 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 9219 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9252 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9265 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9312 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9318 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 9324 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9360 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9373 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 662 "parser_cocci_menhir.mly"
+# 638 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 9415 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9421 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9434 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9476 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9482 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9517 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9530 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9577 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9583 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9622 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9635 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9677 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 9683 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 9688 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 671 "parser_cocci_menhir.mly"
+# 647 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9713 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9726 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 9753 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 675 "parser_cocci_menhir.mly"
+# 651 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 9764 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 9770 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9783 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 9820 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 9825 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 9838 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9844 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9858 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 9895 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 9900 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 9913 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9919 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 9933 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 9970 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 9975 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 9988 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 9994 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10008 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 10045 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10050 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 10064 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 10070 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10084 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 10130 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 10135 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10140 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 10166 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10180 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10217 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10222 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 10235 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 10241 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10255 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10297 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10302 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10307 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 10331 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10345 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10382 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10387 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 10400 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10406 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10420 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10457 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10462 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 10475 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10481 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10495 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10532 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10537 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 10550 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10556 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10570 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 10607 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10612 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 10626 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10632 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10646 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 10692 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 10697 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10702 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10728 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10742 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10779 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10784 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 10797 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10803 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "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 ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10859 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10864 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 10869 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 10893 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10907 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 10939 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 10951 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 10957 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 10971 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11003 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 11015 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 11021 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11035 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11067 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 11079 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 11085 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11099 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 11131 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 11144 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 11150 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11164 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 11205 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 11210 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 11235 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11249 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11281 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 11293 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 11299 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11313 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11350 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11355 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 11378 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11392 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 11424 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 643 "parser_cocci_menhir.mly"
+# 619 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 11436 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11442 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11456 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11488 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 645 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 11500 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11506 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11520 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 11552 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 647 "parser_cocci_menhir.mly"
+# 623 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 11564 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11570 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11584 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 11616 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 649 "parser_cocci_menhir.mly"
+# 625 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 11628 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11634 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11648 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 11680 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 651 "parser_cocci_menhir.mly"
+# 627 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 11692 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11698 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11712 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 11744 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 653 "parser_cocci_menhir.mly"
+# 629 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 11756 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11762 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11776 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 11814 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 655 "parser_cocci_menhir.mly"
+# 631 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 11828 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11834 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11848 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 11895 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 11901 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 11906 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 11940 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 11954 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12006 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12012 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 12018 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 12055 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 12069 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 662 "parser_cocci_menhir.mly"
+# 638 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 12117 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 12123 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 12137 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12184 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12190 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 12226 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 12240 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12292 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12298 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 12338 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 12352 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12399 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 12405 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12410 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 671 "parser_cocci_menhir.mly"
+# 647 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 12436 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 12450 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 12482 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 675 "parser_cocci_menhir.mly"
+# 651 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 12494 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 12500 "parser_cocci_menhir.ml"
in
-# 688 "parser_cocci_menhir.mly"
+# 664 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 12514 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let r : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 12535 "parser_cocci_menhir.ml"
) = Obj.magic r in
let _startpos = _startpos_r_ in
let _endpos = _endpos_r_ in
let _v : 'tv_ctype =
-# 690 "parser_cocci_menhir.mly"
+# 666 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,None)) )
# 12542 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let r : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 12563 "parser_cocci_menhir.ml"
) = Obj.magic r in
let _startpos = _startpos_r_ in
let _endpos = _endpos_r_ in
let _v : 'tv_ctype =
-# 692 "parser_cocci_menhir.mly"
+# 668 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,None)) )
# 12570 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 12601 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_midzero_list_ctype_ctype_ = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 12607 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_ctype =
-# 694 "parser_cocci_menhir.mly"
+# 670 "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 =
-# 1256 "parser_cocci_menhir.mly"
+# 1232 "parser_cocci_menhir.mly"
( (_1, function t -> P.arrayify t _2) )
# 12646 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos_a_ in
let _v : 'tv_decl =
-# 1008 "parser_cocci_menhir.mly"
+# 984 "parser_cocci_menhir.mly"
( let t = P.arrayify t a in Ast0.wrap(Ast0.Param(t, Some i)) )
# 12682 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos_t_ in
let _v : 'tv_decl =
-# 1009 "parser_cocci_menhir.mly"
+# 985 "parser_cocci_menhir.mly"
( (*verify in FunDecl*) Ast0.wrap(Ast0.Param(t, None)) )
# 12706 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 12762 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 12768 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 12773 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let i : 'tv_disj_ident = Obj.magic i in
let s : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 12779 "parser_cocci_menhir.ml"
) = Obj.magic s in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 12784 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_t_ in
let _endpos = _endpos_rp1_ in
let _v : 'tv_decl =
-# 1012 "parser_cocci_menhir.mly"
+# 988 "parser_cocci_menhir.mly"
( let fnptr =
Ast0.wrap
(Ast0.FunctionPointer
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12818 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl =
-# 1019 "parser_cocci_menhir.mly"
+# 995 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaParam(P.clt2mcode nm clt,pure)) )
# 12826 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12847 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl =
-# 1021 "parser_cocci_menhir.mly"
+# 997 "parser_cocci_menhir.mly"
( tmeta_to_param _1 )
# 12854 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 12875 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_ident =
-# 1902 "parser_cocci_menhir.mly"
+# 1878 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 12882 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 129 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 12903 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_ident =
-# 1904 "parser_cocci_menhir.mly"
+# 1880 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 12911 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_list_decl_ =
-# 1926 "parser_cocci_menhir.mly"
+# 1902 "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_ =
-# 1926 "parser_cocci_menhir.mly"
+# 1902 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.DOTS
(_1
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 12988 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement =
-# 1307 "parser_cocci_menhir.mly"
+# 1283 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
[Ast0.wrap(Ast0.MetaStmt(P.clt2mcode nm clt,pure))] )
# 12996 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement =
-# 1310 "parser_cocci_menhir.mly"
+# 1286 "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 =
-# 1315 "parser_cocci_menhir.mly"
+# 1291 "parser_cocci_menhir.mly"
( [_1] )
# 13048 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 13079 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let t : 'tv_midzero_list_fun_start_fun_start_ = Obj.magic t in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 13085 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_decl_statement =
-# 1324 "parser_cocci_menhir.mly"
+# 1300 "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 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 13121 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement_expr =
-# 1337 "parser_cocci_menhir.mly"
+# 1313 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
[Ast0.wrap(Ast0.MetaStmt(P.clt2mcode nm clt,pure))] )
# 13129 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_statement_expr =
-# 1340 "parser_cocci_menhir.mly"
+# 1316 "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 =
-# 1345 "parser_cocci_menhir.mly"
+# 1321 "parser_cocci_menhir.mly"
( [_1] )
# 13181 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 13212 "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 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 13218 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_decl_statement_expr =
-# 1354 "parser_cocci_menhir.mly"
+# 1330 "parser_cocci_menhir.mly"
( let (mids,code) = t in
if List.for_all (function [] -> true | _ -> false) code
then []
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13258 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_decl_var =
-# 1142 "parser_cocci_menhir.mly"
+# 1118 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.TyDecl(t,P.clt2mcode ";" pv))] )
# 13266 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 13287 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_decl_var =
-# 1143 "parser_cocci_menhir.mly"
+# 1119 "parser_cocci_menhir.mly"
( [P.meta_decl _1] )
# 13294 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13325 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1145 "parser_cocci_menhir.mly"
+# 1121 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13380 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1145 "parser_cocci_menhir.mly"
+# 1121 "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 =
-# 1149 "parser_cocci_menhir.mly"
+# 1125 "parser_cocci_menhir.mly"
( [f] )
# 13425 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13466 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13472 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1151 "parser_cocci_menhir.mly"
+# 1127 "parser_cocci_menhir.mly"
(let (id,fn) = d in
[Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv))])
# 13489 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13535 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13541 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1151 "parser_cocci_menhir.mly"
+# 1127 "parser_cocci_menhir.mly"
(let (id,fn) = d in
[Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv))])
# 13560 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13591 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1156 "parser_cocci_menhir.mly"
+# 1132 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13655 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1156 "parser_cocci_menhir.mly"
+# 1132 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13721 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1156 "parser_cocci_menhir.mly"
+# 1132 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13792 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1156 "parser_cocci_menhir.mly"
+# 1132 "parser_cocci_menhir.mly"
( List.map
(function (id,fn) ->
let idtype =
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13865 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13871 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1164 "parser_cocci_menhir.mly"
+# 1140 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13944 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 13950 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1164 "parser_cocci_menhir.mly"
+# 1140 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14025 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14031 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1164 "parser_cocci_menhir.mly"
+# 1140 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14111 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14117 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1164 "parser_cocci_menhir.mly"
+# 1140 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14209 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14214 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14220 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14225 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 14231 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14236 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1174 "parser_cocci_menhir.mly"
+# 1150 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14323 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14328 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14334 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14339 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 14345 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14350 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1174 "parser_cocci_menhir.mly"
+# 1150 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let _5 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14414 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14419 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14425 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_decl_var =
-# 1182 "parser_cocci_menhir.mly"
+# 1158 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.MacroDecl(_1,P.clt2mcode "(" _2,_3,
P.clt2mcode ")" _4,P.clt2mcode ";" _5))] )
# 14434 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14505 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14511 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14516 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14522 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14527 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 14533 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14538 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1188 "parser_cocci_menhir.mly"
+# 1164 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14635 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14641 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14646 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14652 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14657 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 14663 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 14668 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1188 "parser_cocci_menhir.mly"
+# 1164 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 14727 "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 : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 14734 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_decl_var =
-# 1196 "parser_cocci_menhir.mly"
+# 1172 "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 =
-# 931 "parser_cocci_menhir.mly"
+# 907 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.DOTS
(_1
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 149 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Data.clt * token)
# 14794 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_defineop =
-# 887 "parser_cocci_menhir.mly"
+# 863 "parser_cocci_menhir.mly"
( let (clt,ident) = _1 in
function body ->
Ast0.wrap
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 14847 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_define_param_list_option = Obj.magic _2 in
let _1 : (
-# 150 "parser_cocci_menhir.mly"
+# 126 "parser_cocci_menhir.mly"
(Data.clt * token * int * int)
# 14853 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_defineop =
-# 904 "parser_cocci_menhir.mly"
+# 880 "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 =
-# 295 "parser_cocci_menhir.mly"
+# 271 "parser_cocci_menhir.mly"
( _1 )
# 14903 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_dep =
-# 296 "parser_cocci_menhir.mly"
+# 272 "parser_cocci_menhir.mly"
( Ast.AndDep(_1, _3) )
# 14937 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_dep =
-# 297 "parser_cocci_menhir.mly"
+# 273 "parser_cocci_menhir.mly"
( Ast.OrDep (_1, _3) )
# 14971 "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 =
-# 291 "parser_cocci_menhir.mly"
+# 267 "parser_cocci_menhir.mly"
( Ast.NoDep )
# 14988 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_parents_ in
let _v : 'tv_depends =
-# 292 "parser_cocci_menhir.mly"
+# 268 "parser_cocci_menhir.mly"
( parents )
# 15020 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_disj_ident = Obj.magic _2 in
let _1 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 15047 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_designator =
-# 1293 "parser_cocci_menhir.mly"
+# 1269 "parser_cocci_menhir.mly"
( Ast0.DesignatorField (P.clt2mcode "." _1,_2) )
# 15054 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 15085 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 15091 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_designator =
-# 1295 "parser_cocci_menhir.mly"
+# 1271 "parser_cocci_menhir.mly"
( Ast0.DesignatorIndex (P.clt2mcode "[" _1,_2,P.clt2mcode "]" _3) )
# 15098 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _5 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 15139 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : 'tv_eexpr = Obj.magic _4 in
let _3 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15145 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 15151 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_designator =
-# 1297 "parser_cocci_menhir.mly"
+# 1273 "parser_cocci_menhir.mly"
( Ast0.DesignatorRange (P.clt2mcode "[" _1,_2,P.clt2mcode "..." _3,
_4,P.clt2mcode "]" _5) )
# 15159 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dexpr =
-# 1376 "parser_cocci_menhir.mly"
+# 1352 "parser_cocci_menhir.mly"
( _1 )
# 15183 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_disable =
-# 310 "parser_cocci_menhir.mly"
+# 286 "parser_cocci_menhir.mly"
( List.map P.id2name _2 )
# 15211 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_disj_ident =
-# 1890 "parser_cocci_menhir.mly"
+# 1866 "parser_cocci_menhir.mly"
( _1 )
# 15235 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 15266 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_midzero_list_disj_ident_disj_ident_ = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 15272 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_disj_ident =
-# 1892 "parser_cocci_menhir.mly"
+# 1868 "parser_cocci_menhir.mly"
( let (mids,code) = t in
Ast0.wrap
(Ast0.DisjId(P.clt2mcode "(" lp,code,mids, P.clt2mcode ")" rp)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15302 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dot_expressions =
-# 1385 "parser_cocci_menhir.mly"
+# 1361 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Edots(P.clt2mcode "..." _1,None)) )
# 15309 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dot_expressions =
-# 1386 "parser_cocci_menhir.mly"
+# 1362 "parser_cocci_menhir.mly"
( _1 )
# 15333 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_dparam =
-# 927 "parser_cocci_menhir.mly"
+# 903 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DParam _1) )
# 15357 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15378 "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_ =
-# 2212 "parser_cocci_menhir.mly"
+# 2188 "parser_cocci_menhir.mly"
( (d,None) )
# 15385 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_eexpr = Obj.magic w in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15424 "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_ =
-# 2213 "parser_cocci_menhir.mly"
+# 2189 "parser_cocci_menhir.mly"
( (d,Some w) )
# 15431 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15452 "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_ =
-# 2212 "parser_cocci_menhir.mly"
+# 2188 "parser_cocci_menhir.mly"
( (d,None) )
# 15459 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_enum_decl_one = Obj.magic w in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15498 "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_ =
-# 2213 "parser_cocci_menhir.mly"
+# 2189 "parser_cocci_menhir.mly"
( (d,Some w) )
# 15505 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15526 "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_ =
-# 2212 "parser_cocci_menhir.mly"
+# 2188 "parser_cocci_menhir.mly"
( (d,None) )
# 15533 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_initialize = Obj.magic w in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15572 "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_ =
-# 2213 "parser_cocci_menhir.mly"
+# 2189 "parser_cocci_menhir.mly"
( (d,Some w) )
# 15579 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15600 "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_ =
-# 2212 "parser_cocci_menhir.mly"
+# 2188 "parser_cocci_menhir.mly"
( (d,None) )
# 15607 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_struct_decl_one = Obj.magic w in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 15646 "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_ =
-# 2213 "parser_cocci_menhir.mly"
+# 2189 "parser_cocci_menhir.mly"
( (d,Some w) )
# 15653 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_eexpr =
-# 1374 "parser_cocci_menhir.mly"
+# 1350 "parser_cocci_menhir.mly"
( _1 )
# 15677 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_eexpr_list_option =
-# 2192 "parser_cocci_menhir.mly"
+# 2168 "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_ =
-# 1954 "parser_cocci_menhir.mly"
+# 1930 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15722 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_aexpr_TEllipsis_ =
-# 1955 "parser_cocci_menhir.mly"
+# 1931 "parser_cocci_menhir.mly"
( _1 )
# 15746 "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_ =
-# 1954 "parser_cocci_menhir.mly"
+# 1930 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15763 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_empty_list_start_dparam_TEllipsis_ =
-# 1955 "parser_cocci_menhir.mly"
+# 1931 "parser_cocci_menhir.mly"
( _1 )
# 15787 "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__ =
-# 1954 "parser_cocci_menhir.mly"
+# 1930 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15804 "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__ =
-# 1955 "parser_cocci_menhir.mly"
+# 1931 "parser_cocci_menhir.mly"
( _1 )
# 15828 "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_ =
-# 1954 "parser_cocci_menhir.mly"
+# 1930 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15845 "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_ =
-# 1955 "parser_cocci_menhir.mly"
+# 1931 "parser_cocci_menhir.mly"
( _1 )
# 15869 "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_ =
-# 1954 "parser_cocci_menhir.mly"
+# 1930 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [] )
# 15886 "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_ =
-# 1955 "parser_cocci_menhir.mly"
+# 1931 "parser_cocci_menhir.mly"
( _1 )
# 15910 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_decl_list =
-# 791 "parser_cocci_menhir.mly"
+# 767 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1 P.mkedots (fun c -> Ast0.EComma c))) )
# 15934 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_decl_one =
-# 762 "parser_cocci_menhir.mly"
+# 738 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 15958 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_enum_val = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 15990 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_enum_decl_one =
-# 764 "parser_cocci_menhir.mly"
+# 740 "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 =
-# 771 "parser_cocci_menhir.mly"
+# 747 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 16026 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16047 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 773 "parser_cocci_menhir.mly"
+# 749 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 16055 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 16076 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 775 "parser_cocci_menhir.mly"
+# 751 "parser_cocci_menhir.mly"
( tmeta_to_exp _1 )
# 16083 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 16104 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 777 "parser_cocci_menhir.mly"
+# 753 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 16134 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 781 "parser_cocci_menhir.mly"
+# 757 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 16164 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_enum_val =
-# 785 "parser_cocci_menhir.mly"
+# 761 "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 =
-# 313 "parser_cocci_menhir.mly"
+# 289 "parser_cocci_menhir.mly"
( Ast.Exists )
# 16195 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_exists =
-# 314 "parser_cocci_menhir.mly"
+# 290 "parser_cocci_menhir.mly"
( Ast.Forall )
# 16217 "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 =
-# 315 "parser_cocci_menhir.mly"
+# 291 "parser_cocci_menhir.mly"
( Ast.Undetermined )
# 16234 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_expr =
-# 1372 "parser_cocci_menhir.mly"
+# 1348 "parser_cocci_menhir.mly"
( _1 )
# 16258 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_r_ in
let _endpos = _endpos_r_ in
let _v : 'tv_expr_dots_TEllipsis_ =
-# 1609 "parser_cocci_menhir.mly"
+# 1585 "parser_cocci_menhir.mly"
( r )
# 16282 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 556 "parser_cocci_menhir.mly"
+# 532 "parser_cocci_menhir.mly"
( P.ty_pointerify Type_cocci.Unknown m )
# 16306 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 558 "parser_cocci_menhir.mly"
+# 534 "parser_cocci_menhir.mly"
( P.ty_pointerify (Type_cocci.EnumName Type_cocci.NoName) m )
# 16334 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 560 "parser_cocci_menhir.mly"
+# 536 "parser_cocci_menhir.mly"
( P.ty_pointerify
(Type_cocci.StructUnionName (Type_cocci.Struct,Type_cocci.NoName)) m )
# 16363 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_expression_type =
-# 563 "parser_cocci_menhir.mly"
+# 539 "parser_cocci_menhir.mly"
( P.ty_pointerify
(Type_cocci.StructUnionName (Type_cocci.Union,Type_cocci.NoName)) m )
# 16392 "parser_cocci_menhir.ml"
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_extends =
-# 286 "parser_cocci_menhir.mly"
+# 262 "parser_cocci_menhir.mly"
( () )
# 16409 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let parent : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 16434 "parser_cocci_menhir.ml"
) = Obj.magic parent in
let _startpos = _startpos__1_ in
let _endpos = _endpos_parent_ in
let _v : 'tv_extends =
-# 288 "parser_cocci_menhir.mly"
+# 264 "parser_cocci_menhir.mly"
( !Data.install_bindings (parent) )
# 16441 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 151 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16467 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 151 "parser_cocci_menhir.mly"
+# 127 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16472 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_filespec =
-# 828 "parser_cocci_menhir.mly"
+# 804 "parser_cocci_menhir.mly"
( [Ast0.wrap
(Ast0.FILEINFO(P.id2mcode _1,
P.id2mcode _2))] )
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_fn_ident =
-# 1867 "parser_cocci_menhir.mly"
+# 1843 "parser_cocci_menhir.mly"
( _1 )
# 16505 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 16526 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_fn_ident =
-# 1869 "parser_cocci_menhir.mly"
+# 1845 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaFunc(P.clt2mcode nm clt,constraints,pure)) )
# 16534 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 16555 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_fn_ident =
-# 1872 "parser_cocci_menhir.mly"
+# 1848 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap
(Ast0.MetaLocalFunc(P.clt2mcode nm clt,constraints,pure)) )
let _startpos = _menhir_env.MenhirLib.EngineTypes.lexbuf.Lexing.lex_start_p in
let _endpos = _startpos in
let _v : 'tv_fninfo =
-# 963 "parser_cocci_menhir.mly"
+# 939 "parser_cocci_menhir.mly"
( [] )
# 16581 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo =
-# 965 "parser_cocci_menhir.mly"
+# 941 "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 =
-# 970 "parser_cocci_menhir.mly"
+# 946 "parser_cocci_menhir.mly"
( (Ast0.FType(t))::r )
# 16645 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_fninfo = Obj.magic _2 in
let _1 : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 16672 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo =
-# 972 "parser_cocci_menhir.mly"
+# 948 "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 : (
-# 121 "parser_cocci_menhir.mly"
+# 97 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16709 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo =
-# 977 "parser_cocci_menhir.mly"
+# 953 "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 =
-# 983 "parser_cocci_menhir.mly"
+# 959 "parser_cocci_menhir.mly"
( [] )
# 16736 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo_nt =
-# 985 "parser_cocci_menhir.mly"
+# 961 "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 : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 16797 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo_nt =
-# 991 "parser_cocci_menhir.mly"
+# 967 "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 : (
-# 121 "parser_cocci_menhir.mly"
+# 97 "parser_cocci_menhir.mly"
(string * Data.clt)
# 16834 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fninfo_nt =
-# 996 "parser_cocci_menhir.mly"
+# 972 "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 =
-# 2125 "parser_cocci_menhir.mly"
+# 2101 "parser_cocci_menhir.mly"
([])
# 16861 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots =
-# 2126 "parser_cocci_menhir.mly"
+# 2102 "parser_cocci_menhir.mly"
(_2)
# 16889 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots =
-# 2127 "parser_cocci_menhir.mly"
+# 2103 "parser_cocci_menhir.mly"
(Ast0.wrap(Ast0.Exp(_1))::_2)
# 16919 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots =
-# 2128 "parser_cocci_menhir.mly"
+# 2104 "parser_cocci_menhir.mly"
(_1@_2)
# 16949 "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 =
-# 2135 "parser_cocci_menhir.mly"
+# 2111 "parser_cocci_menhir.mly"
([])
# 16966 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots_or =
-# 2136 "parser_cocci_menhir.mly"
+# 2112 "parser_cocci_menhir.mly"
(_2)
# 16994 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots_or =
-# 2137 "parser_cocci_menhir.mly"
+# 2113 "parser_cocci_menhir.mly"
(Ast0.wrap(Ast0.Exp(_1))::_2)
# 17024 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_dots_or =
-# 2138 "parser_cocci_menhir.mly"
+# 2114 "parser_cocci_menhir.mly"
(_1@_2)
# 17054 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_exp =
-# 2131 "parser_cocci_menhir.mly"
+# 2107 "parser_cocci_menhir.mly"
(_1::_2)
# 17084 "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 =
-# 2141 "parser_cocci_menhir.mly"
+# 2117 "parser_cocci_menhir.mly"
([])
# 17101 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_exp_or =
-# 2142 "parser_cocci_menhir.mly"
+# 2118 "parser_cocci_menhir.mly"
(_1::_2)
# 17131 "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 =
-# 2120 "parser_cocci_menhir.mly"
+# 2096 "parser_cocci_menhir.mly"
([])
# 17148 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_stm =
-# 2121 "parser_cocci_menhir.mly"
+# 2097 "parser_cocci_menhir.mly"
(_1::_2)
# 17178 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_fun_after_stm =
-# 2122 "parser_cocci_menhir.mly"
+# 2098 "parser_cocci_menhir.mly"
(_1@_2)
# 17208 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_fun_start =
-# 2117 "parser_cocci_menhir.mly"
+# 2093 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1)) )
# 17232 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1858 "parser_cocci_menhir.mly"
+# 1834 "parser_cocci_menhir.mly"
( _1 )
# 17256 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 17277 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1860 "parser_cocci_menhir.mly"
+# 1836 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaFunc(P.clt2mcode nm clt,constraints,pure)) )
# 17285 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 17306 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_func_ident =
-# 1863 "parser_cocci_menhir.mly"
+# 1839 "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 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 17375 "parser_cocci_menhir.ml"
) = Obj.magic rb in
let b : 'tv_fun_start = Obj.magic b in
let lb : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 17381 "parser_cocci_menhir.ml"
) = Obj.magic lb in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 17386 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let d : 'tv_decl_list_decl_ = Obj.magic d in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 17392 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_f_ in
let _endpos = _endpos_rb_ in
let _v : 'tv_fundecl =
-# 954 "parser_cocci_menhir.mly"
+# 930 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 17453 "parser_cocci_menhir.ml"
) = Obj.magic pt in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 17458 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 17464 "parser_cocci_menhir.ml"
) = Obj.magic lp in
in
-# 942 "parser_cocci_menhir.mly"
+# 918 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.UnInit
(s,
};
} = _menhir_stack in
let pt : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 17537 "parser_cocci_menhir.ml"
) = Obj.magic pt in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 17542 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 17548 "parser_cocci_menhir.ml"
) = Obj.magic lp in
in
-# 942 "parser_cocci_menhir.mly"
+# 918 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.UnInit
(s,
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_ident =
-# 1877 "parser_cocci_menhir.mly"
+# 1853 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 17596 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 17617 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_ident =
-# 1879 "parser_cocci_menhir.mly"
+# 1855 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 17625 "parser_cocci_menhir.ml"
let _startpos = _startpos_i_ in
let _endpos = _endpos_i_ in
let _v : 'tv_ident_or_const =
-# 1832 "parser_cocci_menhir.mly"
+# 1808 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(Ast0.wrap(Ast0.Id(P.id2mcode i)))) )
# 17649 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17670 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_ident_or_const =
-# 1834 "parser_cocci_menhir.mly"
+# 1810 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 17678 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 148 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17699 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_incl =
-# 326 "parser_cocci_menhir.mly"
+# 302 "parser_cocci_menhir.mly"
( let (x,_) = _1 in Data.Include(x) )
# 17706 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17731 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_incl =
-# 327 "parser_cocci_menhir.mly"
+# 303 "parser_cocci_menhir.mly"
( Data.Iso(Common.Left(P.id2name _2)) )
# 17738 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 147 "parser_cocci_menhir.mly"
+# 123 "parser_cocci_menhir.mly"
(string)
# 17763 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_incl =
-# 328 "parser_cocci_menhir.mly"
+# 304 "parser_cocci_menhir.mly"
( Data.Iso(Common.Right _2) )
# 17770 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_incl =
-# 330 "parser_cocci_menhir.mly"
+# 306 "parser_cocci_menhir.mly"
( let names = List.map P.id2name _2 in
Iteration.parsed_virtual_rules :=
Common.union_set names !Iteration.parsed_virtual_rules;
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 216 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Data.incl_iso list)
# 17833 "parser_cocci_menhir.ml"
) =
-# 322 "parser_cocci_menhir.mly"
+# 298 "parser_cocci_menhir.mly"
( _1 )
# 17837 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 216 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Data.incl_iso list)
# 17865 "parser_cocci_menhir.ml"
) =
-# 323 "parser_cocci_menhir.mly"
+# 299 "parser_cocci_menhir.mly"
( _1 )
# 17869 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 148 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17890 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_includes =
-# 834 "parser_cocci_menhir.mly"
+# 810 "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 : (
-# 148 "parser_cocci_menhir.mly"
+# 124 "parser_cocci_menhir.mly"
(string * Data.clt)
# 17927 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_includes =
-# 845 "parser_cocci_menhir.mly"
+# 821 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.Include(P.clt2mcode "#include"
(P.drop_pos (P.drop_aft (P.id2clt _1))),
};
} = _menhir_stack in
let _1 : (
-# 149 "parser_cocci_menhir.mly"
+# 125 "parser_cocci_menhir.mly"
(Data.clt * token)
# 17968 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_includes =
-# 856 "parser_cocci_menhir.mly"
+# 832 "parser_cocci_menhir.mly"
( let (clt,ident) = _1 in
Ast0.wrap
(Ast0.Undef
let _startpos = _startpos_d_ in
let _endpos = _endpos__2_ in
let _v : 'tv_includes =
-# 870 "parser_cocci_menhir.mly"
+# 846 "parser_cocci_menhir.mly"
( d (Ast0.wrap(Ast0.DOTS([]))) )
# 18015 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_d_ in
let _endpos = _endpos__3_ in
let _v : 'tv_includes =
-# 872 "parser_cocci_menhir.mly"
+# 848 "parser_cocci_menhir.mly"
( let ty = Ast0.wrap(Ast0.TopExp(Ast0.wrap(Ast0.TypeExp(t)))) in
d (Ast0.wrap(Ast0.DOTS([ty]))) )
# 18050 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_includes =
-# 875 "parser_cocci_menhir.mly"
+# 851 "parser_cocci_menhir.mly"
( let body =
match b with
[e] ->
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize =
-# 1262 "parser_cocci_menhir.mly"
+# 1238 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitExpr(_1)) )
# 18116 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 18147 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_initialize_list = Obj.magic _2 in
let _1 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 18153 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize =
-# 1264 "parser_cocci_menhir.mly"
+# 1240 "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 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 18186 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize =
-# 1271 "parser_cocci_menhir.mly"
+# 1247 "parser_cocci_menhir.mly"
(let (nm,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaInit(P.clt2mcode nm clt,pure)) )
# 18194 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize2 =
-# 1277 "parser_cocci_menhir.mly"
+# 1253 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitExpr(_1)) )
# 18218 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 18249 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_initialize_list = Obj.magic _2 in
let _1 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 18255 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize2 =
-# 1279 "parser_cocci_menhir.mly"
+# 1255 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 18299 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize2 =
-# 1287 "parser_cocci_menhir.mly"
+# 1263 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitGccExt(_1,P.clt2mcode "=" _2,_3)) )
# 18307 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_initialize2 = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 18339 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_initialize2 =
-# 1289 "parser_cocci_menhir.mly"
+# 1265 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.InitGccName(_1,P.clt2mcode ":" _2,_3)) )
# 18347 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_initialize_list =
-# 1302 "parser_cocci_menhir.mly"
+# 1278 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1 P.mkidots (fun c -> Ast0.IComma c))) )
# 18371 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_invalid =
-# 1382 "parser_cocci_menhir.mly"
+# 1358 "parser_cocci_menhir.mly"
( raise (Semantic_cocci.Semantic "not matchable") )
# 18393 "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 =
-# 318 "parser_cocci_menhir.mly"
+# 294 "parser_cocci_menhir.mly"
( false )
# 18410 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_is_expression =
-# 319 "parser_cocci_menhir.mly"
+# 295 "parser_cocci_menhir.mly"
( true )
# 18432 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_ctype_ =
-# 2268 "parser_cocci_menhir.mly"
+# 2244 "parser_cocci_menhir.mly"
( Common.Left t )
# 18460 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_ctype_ =
-# 2269 "parser_cocci_menhir.mly"
+# 2245 "parser_cocci_menhir.mly"
( Common.Right t )
# 18488 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_decl_var_ =
-# 2268 "parser_cocci_menhir.mly"
+# 2244 "parser_cocci_menhir.mly"
( Common.Left t )
# 18516 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_decl_var_ =
-# 2269 "parser_cocci_menhir.mly"
+# 2245 "parser_cocci_menhir.mly"
( Common.Right t )
# 18544 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_eexpr_ =
-# 2268 "parser_cocci_menhir.mly"
+# 2244 "parser_cocci_menhir.mly"
( Common.Left t )
# 18572 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_eexpr_ =
-# 2269 "parser_cocci_menhir.mly"
+# 2245 "parser_cocci_menhir.mly"
( Common.Right t )
# 18600 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_nest_start_ =
-# 2268 "parser_cocci_menhir.mly"
+# 2244 "parser_cocci_menhir.mly"
( Common.Left t )
# 18628 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_nest_start_ =
-# 2269 "parser_cocci_menhir.mly"
+# 2245 "parser_cocci_menhir.mly"
( Common.Right t )
# 18656 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_single_statement_ =
-# 2268 "parser_cocci_menhir.mly"
+# 2244 "parser_cocci_menhir.mly"
( Common.Left t )
# 18684 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_t_ in
let _v : 'tv_iso_single_statement_ =
-# 2269 "parser_cocci_menhir.mly"
+# 2245 "parser_cocci_menhir.mly"
( Common.Right t )
# 18712 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18750 "parser_cocci_menhir.ml"
) =
-# 2236 "parser_cocci_menhir.mly"
+# 2212 "parser_cocci_menhir.mly"
( let fn x = Ast0.ExprTag x in P.iso_adjust fn fn e1 el )
# 18754 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18792 "parser_cocci_menhir.ml"
) =
-# 2238 "parser_cocci_menhir.mly"
+# 2214 "parser_cocci_menhir.mly"
( let fn x = Ast0.ArgExprTag x in P.iso_adjust fn fn e1 el )
# 18796 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18834 "parser_cocci_menhir.ml"
) =
-# 2240 "parser_cocci_menhir.mly"
+# 2216 "parser_cocci_menhir.mly"
( let fn x = Ast0.TestExprTag x in P.iso_adjust fn fn e1 el )
# 18838 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18876 "parser_cocci_menhir.ml"
) =
-# 2242 "parser_cocci_menhir.mly"
+# 2218 "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 : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18920 "parser_cocci_menhir.ml"
) =
-# 2246 "parser_cocci_menhir.mly"
+# 2222 "parser_cocci_menhir.mly"
( let fn x = Ast0.StmtTag x in P.iso_adjust fn fn s1 sl )
# 18924 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 18962 "parser_cocci_menhir.ml"
) =
-# 2248 "parser_cocci_menhir.mly"
+# 2224 "parser_cocci_menhir.mly"
( let fn x = Ast0.TypeCTag x in P.iso_adjust fn fn t1 tl )
# 18966 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 19004 "parser_cocci_menhir.ml"
) =
-# 2250 "parser_cocci_menhir.mly"
+# 2226 "parser_cocci_menhir.mly"
( let fn x = Ast0.DotsStmtTag x in P.iso_adjust fn fn e1 el )
# 19008 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__4_ in
let _v : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 19046 "parser_cocci_menhir.ml"
) =
-# 2252 "parser_cocci_menhir.mly"
+# 2228 "parser_cocci_menhir.mly"
( let check_one = function
[x] -> x
| _ ->
let _startpos = _startpos_m_ in
let _endpos = _endpos_m_ in
let _v : (
-# 235 "parser_cocci_menhir.mly"
+# 211 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 19087 "parser_cocci_menhir.ml"
) =
-# 252 "parser_cocci_menhir.mly"
+# 228 "parser_cocci_menhir.mly"
( m "" )
# 19091 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_nm_ in
let _endpos = _endpos__2_ in
let _v : (
-# 219 "parser_cocci_menhir.mly"
+# 195 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 19119 "parser_cocci_menhir.ml"
) =
-# 267 "parser_cocci_menhir.mly"
+# 243 "parser_cocci_menhir.mly"
( P.make_iso_rule_name_result (P.id2name nm) )
# 19123 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 19144 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_iter_ident =
-# 1909 "parser_cocci_menhir.mly"
+# 1885 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 19151 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 129 "parser_cocci_menhir.mly"
+# 105 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 19172 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_iter_ident =
-# 1911 "parser_cocci_menhir.mly"
+# 1887 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 19180 "parser_cocci_menhir.ml"
} = _menhir_stack in
let xs : 'tv_list_TMul_ = Obj.magic xs in
let x : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 19224 "parser_cocci_menhir.ml"
) = Obj.magic x in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_list_len =
-# 409 "parser_cocci_menhir.mly"
+# 385 "parser_cocci_menhir.mly"
( Common.Left _1 )
# 20210 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 20231 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_list_len =
-# 410 "parser_cocci_menhir.mly"
+# 386 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in Common.Right (int_of_string x) )
# 20238 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 20505 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_mctype =
-# 699 "parser_cocci_menhir.mly"
+# 675 "parser_cocci_menhir.mly"
( tmeta_to_type _1 )
# 20512 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_mctype =
-# 700 "parser_cocci_menhir.mly"
+# 676 "parser_cocci_menhir.mly"
(_1)
# 20536 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos_t_ in
let _v : 'tv_meta_exp_type =
-# 599 "parser_cocci_menhir.mly"
+# 575 "parser_cocci_menhir.mly"
( [Ast0_cocci.ast0_type_to_type t] )
# 20560 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_t_ in
let _endpos = _endpos__3_ in
let _v : 'tv_meta_exp_type =
-# 601 "parser_cocci_menhir.mly"
+# 577 "parser_cocci_menhir.mly"
( [Type_cocci.Array (Ast0_cocci.ast0_type_to_type t)] )
# 20592 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_m_ in
let _v : 'tv_meta_exp_type =
-# 603 "parser_cocci_menhir.mly"
+# 579 "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 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 20663 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_meta_ident =
-# 1647 "parser_cocci_menhir.mly"
+# 1623 "parser_cocci_menhir.mly"
( (Some _1,P.id2name _3) )
# 20670 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_pure_ident_kwd = Obj.magic _3 in
let _1 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 20701 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_meta_ident =
-# 1648 "parser_cocci_menhir.mly"
+# 1624 "parser_cocci_menhir.mly"
( (Some _1,_3) )
# 20708 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos_m_ in
let _v : (
-# 227 "parser_cocci_menhir.mly"
+# 203 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 20732 "parser_cocci_menhir.ml"
) =
-# 251 "parser_cocci_menhir.mly"
+# 227 "parser_cocci_menhir.mly"
( m (!Ast0.rule_name) )
# 20736 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 421 "parser_cocci_menhir.mly"
+# 397 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let tok = check_meta(Ast.MetaMetaDecl(arity,name)) in
!Data.add_meta_meta name pure; tok) )
in
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20789 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 425 "parser_cocci_menhir.mly"
+# 401 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20842 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 429 "parser_cocci_menhir.mly"
+# 405 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20900 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 434 "parser_cocci_menhir.mly"
+# 410 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 20958 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 439 "parser_cocci_menhir.mly"
+# 415 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21011 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 443 "parser_cocci_menhir.mly"
+# 419 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21064 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 447 "parser_cocci_menhir.mly"
+# 423 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21117 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 451 "parser_cocci_menhir.mly"
+# 427 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21170 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 455 "parser_cocci_menhir.mly"
+# 431 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21223 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 459 "parser_cocci_menhir.mly"
+# 435 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta ->
let len = Ast.AnyLen in
let tok = check_meta(Ast.MetaFieldListDecl(arity,name,len)) in
in
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21281 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 464 "parser_cocci_menhir.mly"
+# 440 "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
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21338 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 468 "parser_cocci_menhir.mly"
+# 444 "parser_cocci_menhir.mly"
( (fun arity (_,name) pure check_meta ->
if arity = Ast.NONE && pure = Ast0.Impure
then (!Data.add_type_name name; [])
in
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21392 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 473 "parser_cocci_menhir.mly"
+# 449 "parser_cocci_menhir.mly"
( (fun arity (_,name) pure check_meta ->
if arity = Ast.NONE && pure = Ast0.Impure
then (!Data.add_declarer_name name; [])
in
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21450 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 478 "parser_cocci_menhir.mly"
+# 454 "parser_cocci_menhir.mly"
( (fun arity (_,name) pure check_meta ->
if arity = Ast.NONE && pure = Ast0.Impure
then (!Data.add_iterator_name name; [])
in
-# 342 "parser_cocci_menhir.mly"
+# 318 "parser_cocci_menhir.mly"
( P.create_metadec ar ispure kindfn ids )
# 21508 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__4_ in
let _v : 'tv_metadec = let kindfn =
-# 414 "parser_cocci_menhir.mly"
+# 390 "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
-# 345 "parser_cocci_menhir.mly"
+# 321 "parser_cocci_menhir.mly"
( P.create_fresh_metadec kindfn ids )
# 21553 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 485 "parser_cocci_menhir.mly"
+# 461 "parser_cocci_menhir.mly"
(
let idfn arity name pure check_meta constraints =
let tok = check_meta(Ast.MetaIdDecl(arity,name)) in
in
-# 351 "parser_cocci_menhir.mly"
+# 327 "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 =
-# 504 "parser_cocci_menhir.mly"
+# 480 "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
-# 360 "parser_cocci_menhir.mly"
+# 336 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21676 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__6_ in
let _v : 'tv_metadec = let kindfn =
-# 508 "parser_cocci_menhir.mly"
+# 484 "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
-# 360 "parser_cocci_menhir.mly"
+# 336 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21734 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 513 "parser_cocci_menhir.mly"
+# 489 "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
-# 360 "parser_cocci_menhir.mly"
+# 336 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21787 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 517 "parser_cocci_menhir.mly"
+# 493 "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
-# 360 "parser_cocci_menhir.mly"
+# 336 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21840 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 523 "parser_cocci_menhir.mly"
+# 499 "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
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21893 "parser_cocci_menhir.ml"
in
in
-# 527 "parser_cocci_menhir.mly"
+# 503 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
match l with
None ->
in
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 21965 "parser_cocci_menhir.ml"
in
in
-# 527 "parser_cocci_menhir.mly"
+# 503 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
match l with
None ->
in
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22045 "parser_cocci_menhir.ml"
in
let m = m0 in
let l = l0 in
-# 536 "parser_cocci_menhir.mly"
+# 512 "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
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22118 "parser_cocci_menhir.ml"
in
let _v : 'tv_metadec = let kindfn =
let ty = ty0 in
-# 546 "parser_cocci_menhir.mly"
+# 522 "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
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22179 "parser_cocci_menhir.ml"
in
in
-# 551 "parser_cocci_menhir.mly"
+# 527 "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
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22239 "parser_cocci_menhir.ml"
in
in
-# 551 "parser_cocci_menhir.mly"
+# 527 "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
-# 365 "parser_cocci_menhir.mly"
+# 341 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22307 "parser_cocci_menhir.ml"
in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec = let kindfn =
-# 568 "parser_cocci_menhir.mly"
+# 544 "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
-# 370 "parser_cocci_menhir.mly"
+# 346 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22360 "parser_cocci_menhir.ml"
in
let _v : 'tv_metadec = let kindfn =
let vl = vl0 in
-# 572 "parser_cocci_menhir.mly"
+# 548 "parser_cocci_menhir.mly"
( (fun arity name pure check_meta constraints ->
let ty = Some vl in
(match constraints with
in
-# 370 "parser_cocci_menhir.mly"
+# 346 "parser_cocci_menhir.mly"
( P.create_metadec_with_constraints ar ispure kindfn ids )
# 22437 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_ar_ in
let _endpos = _endpos__5_ in
let _v : 'tv_metadec =
-# 376 "parser_cocci_menhir.mly"
+# 352 "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 =
-# 386 "parser_cocci_menhir.mly"
+# 362 "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 =
-# 394 "parser_cocci_menhir.mly"
+# 370 "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_ar_ in
let _endpos = _endpos__9_ in
let _v : 'tv_metadec =
-# 402 "parser_cocci_menhir.mly"
+# 378 "parser_cocci_menhir.mly"
( P.create_len_metadec ar ispure
(fun lenname arity name pure check_meta ->
let tok = check_meta(Ast.MetaFieldListDecl(arity,name,lenname)) in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_mident =
-# 1883 "parser_cocci_menhir.mly"
+# 1859 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 22709 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 22730 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_mident =
-# 1884 "parser_cocci_menhir.mly"
+# 1860 "parser_cocci_menhir.mly"
( tmeta_to_ident _1 )
# 22737 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 22758 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_mident =
-# 1886 "parser_cocci_menhir.mly"
+# 1862 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaId(P.clt2mcode nm clt,constraints,pure)) )
# 22766 "parser_cocci_menhir.ml"
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_ctype_ctype_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22796 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_disj_ident_disj_ident_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22826 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_eexpr_eexpr_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22856 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_expr_eexpr_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22886 "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_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22916 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_fun_start_fun_start_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22946 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_mctype_mctype_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 22976 "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_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 23006 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_midzero_list_statement_statement_ =
-# 2206 "parser_cocci_menhir.mly"
+# 2182 "parser_cocci_menhir.mly"
( let (mids,code) = List.split b in (mids,(a::code)) )
# 23036 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_minus_body =
-# 802 "parser_cocci_menhir.mly"
+# 778 "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 =
-# 816 "parser_cocci_menhir.mly"
+# 792 "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 : (
-# 207 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 23128 "parser_cocci_menhir.ml"
) =
-# 247 "parser_cocci_menhir.mly"
+# 223 "parser_cocci_menhir.mly"
( _1 )
# 23132 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 207 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 23160 "parser_cocci_menhir.ml"
) =
-# 247 "parser_cocci_menhir.mly"
+# 223 "parser_cocci_menhir.mly"
( m )
# 23164 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 207 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 23192 "parser_cocci_menhir.ml"
) =
-# 248 "parser_cocci_menhir.mly"
+# 224 "parser_cocci_menhir.mly"
( m )
# 23196 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 204 "parser_cocci_menhir.mly"
+# 180 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 23224 "parser_cocci_menhir.ml"
) =
-# 243 "parser_cocci_menhir.mly"
+# 219 "parser_cocci_menhir.mly"
( _1 )
# 23228 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 204 "parser_cocci_menhir.mly"
+# 180 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 23256 "parser_cocci_menhir.ml"
) =
-# 243 "parser_cocci_menhir.mly"
+# 219 "parser_cocci_menhir.mly"
( m )
# 23260 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_m_ in
let _endpos = _endpos__2_ in
let _v : (
-# 204 "parser_cocci_menhir.mly"
+# 180 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 23288 "parser_cocci_menhir.ml"
) =
-# 244 "parser_cocci_menhir.mly"
+# 220 "parser_cocci_menhir.mly"
( m )
# 23292 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 2031 "parser_cocci_menhir.mly"
+# 2007 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.DECL(_1))] )
# 23316 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 2032 "parser_cocci_menhir.mly"
+# 2008 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Ty(_1))))] )
# 23340 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 2033 "parser_cocci_menhir.mly"
+# 2009 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.TopInit(_1))))] )
# 23364 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_minus_start =
-# 2035 "parser_cocci_menhir.mly"
+# 2011 "parser_cocci_menhir.mly"
( List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1 )
# 23388 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_ctype = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23415 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_ctype_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23422 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_disj_ident = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23449 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_disj_ident_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23456 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_eexpr = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23483 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_eexpr_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23490 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_fun_after_dots_or = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23517 "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_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23524 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_fun_start = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23551 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_fun_start_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23558 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_mctype = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23585 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_mctype_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23592 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_rule_elem_statement = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23619 "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_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23626 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_statement = Obj.magic b in
let a : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23653 "parser_cocci_menhir.ml"
) = Obj.magic a in
let _startpos = _startpos_a_ in
let _endpos = _endpos_b_ in
let _v : 'tv_mzl_statement_ =
-# 2209 "parser_cocci_menhir.mly"
+# 2185 "parser_cocci_menhir.mly"
( (P.clt2mcode "|" a, b) )
# 23660 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_name_opt_decl =
-# 1024 "parser_cocci_menhir.mly"
+# 1000 "parser_cocci_menhir.mly"
( _1 )
# 23684 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23735 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_decl_list_name_opt_decl_ = Obj.magic d in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 23741 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 23746 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let s : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 23751 "parser_cocci_menhir.ml"
) = Obj.magic s in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 23756 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_t_ in
let _endpos = _endpos_rp1_ in
let _v : 'tv_name_opt_decl =
-# 1027 "parser_cocci_menhir.mly"
+# 1003 "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 =
-# 2151 "parser_cocci_menhir.mly"
+# 2127 "parser_cocci_menhir.mly"
(_1@_2)
# 23799 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_dots =
-# 2152 "parser_cocci_menhir.mly"
+# 2128 "parser_cocci_menhir.mly"
(_2)
# 23827 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_dots =
-# 2153 "parser_cocci_menhir.mly"
+# 2129 "parser_cocci_menhir.mly"
((Ast0.wrap(Ast0.Exp(_1)))::_2)
# 23857 "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 =
-# 2161 "parser_cocci_menhir.mly"
+# 2137 "parser_cocci_menhir.mly"
([])
# 23874 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_exp =
-# 2162 "parser_cocci_menhir.mly"
+# 2138 "parser_cocci_menhir.mly"
(_1::_2)
# 23904 "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 =
-# 2156 "parser_cocci_menhir.mly"
+# 2132 "parser_cocci_menhir.mly"
([])
# 23921 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_stm =
-# 2157 "parser_cocci_menhir.mly"
+# 2133 "parser_cocci_menhir.mly"
(_1::_2)
# 23951 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_nest_after_stm =
-# 2158 "parser_cocci_menhir.mly"
+# 2134 "parser_cocci_menhir.mly"
(_1@_2)
# 23981 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24012 "parser_cocci_menhir.ml"
) = Obj.magic c in
let e : 'tv_expr_dots_TEllipsis_ = Obj.magic e in
let _1 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24018 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_nest_expressions =
-# 1391 "parser_cocci_menhir.mly"
+# 1367 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24058 "parser_cocci_menhir.ml"
) = Obj.magic c in
let e : 'tv_expr_dots_TEllipsis_ = Obj.magic e in
let _1 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24064 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_nest_expressions =
-# 1395 "parser_cocci_menhir.mly"
+# 1371 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.NestExpr(P.clt2mcode "<+..." _1,
Ast0.wrap(Ast0.DOTS(e (P.mkedots "..."))),
P.clt2mcode "...+>" c, None, true)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 24094 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nest_expressions =
-# 1398 "parser_cocci_menhir.mly"
+# 1374 "parser_cocci_menhir.mly"
( tmeta_to_exp _1 )
# 24101 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_nest_start =
-# 2148 "parser_cocci_menhir.mly"
+# 2124 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1)) )
# 24125 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : (
-# 238 "parser_cocci_menhir.mly"
+# 214 "parser_cocci_menhir.mly"
(unit)
# 24147 "parser_cocci_menhir.ml"
) =
-# 2276 "parser_cocci_menhir.mly"
+# 2252 "parser_cocci_menhir.mly"
( () )
# 24151 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 238 "parser_cocci_menhir.mly"
+# 214 "parser_cocci_menhir.mly"
(unit)
# 24177 "parser_cocci_menhir.ml"
) =
-# 2277 "parser_cocci_menhir.mly"
+# 2253 "parser_cocci_menhir.mly"
( () )
# 24181 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : (
-# 238 "parser_cocci_menhir.mly"
+# 214 "parser_cocci_menhir.mly"
(unit)
# 24203 "parser_cocci_menhir.ml"
) =
-# 2278 "parser_cocci_menhir.mly"
+# 2254 "parser_cocci_menhir.mly"
( () )
# 24207 "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__ =
-# 1614 "parser_cocci_menhir.mly"
+# 1590 "parser_cocci_menhir.mly"
( function dot_builder ->
g :: (List.concat(List.map (function (d,g) -> [dot_builder d;g]) dg)) )
# 24238 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let x : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 24259 "parser_cocci_menhir.ml"
) = Obj.magic x in
} = _menhir_stack in
let xs : 'tv_nonempty_list_TMul_ = Obj.magic xs in
let x : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 24293 "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_ =
-# 1958 "parser_cocci_menhir.mly"
+# 1934 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 24324 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24350 "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_ =
-# 1960 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24359 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_aexpr_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24391 "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_ =
-# 1963 "parser_cocci_menhir.mly"
+# 1939 "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_ =
-# 1966 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( _2 )
# 24429 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24450 "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_ =
-# 1967 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 24457 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24483 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24488 "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_ =
-# 1969 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24496 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_aexpr_TEllipsis_ = Obj.magic r in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24528 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24533 "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_ =
-# 1972 "parser_cocci_menhir.mly"
+# 1948 "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_ =
-# 1958 "parser_cocci_menhir.mly"
+# 1934 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 24567 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24593 "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_ =
-# 1960 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24602 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_dparam_TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24634 "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_ =
-# 1963 "parser_cocci_menhir.mly"
+# 1939 "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_ =
-# 1966 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( _2 )
# 24672 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24693 "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_ =
-# 1967 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 24700 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24726 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24731 "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_ =
-# 1969 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24739 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_dparam_TEllipsis_ = Obj.magic r in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24771 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 24776 "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_ =
-# 1972 "parser_cocci_menhir.mly"
+# 1948 "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__ =
-# 1958 "parser_cocci_menhir.mly"
+# 1934 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 24810 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24836 "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__ =
-# 1960 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24845 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24877 "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__ =
-# 1963 "parser_cocci_menhir.mly"
+# 1939 "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__ =
-# 1966 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( _2 )
# 24915 "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__ =
-# 1967 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 24939 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 24965 "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__ =
-# 1969 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 24974 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25006 "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__ =
-# 1972 "parser_cocci_menhir.mly"
+# 1948 "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__ =
-# 1958 "parser_cocci_menhir.mly"
+# 1934 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 25041 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25067 "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__ =
-# 1960 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 25076 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_initialize2_edots_when_TEllipsis_initialize__ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25108 "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__ =
-# 1963 "parser_cocci_menhir.mly"
+# 1939 "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__ =
-# 1966 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( _2 )
# 25146 "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__ =
-# 1967 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 25170 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25196 "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__ =
-# 1969 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 25205 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_initialize2_edots_when_TEllipsis_initialize__ = Obj.magic r in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25237 "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__ =
-# 1972 "parser_cocci_menhir.mly"
+# 1948 "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_ =
-# 1958 "parser_cocci_menhir.mly"
+# 1934 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 25272 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25298 "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_ =
-# 1960 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 25307 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_nonempty_list_start_one_dec_decl__TEllipsis_ = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25339 "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_ =
-# 1963 "parser_cocci_menhir.mly"
+# 1939 "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_ =
-# 1966 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( _2 )
# 25377 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 25398 "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_ =
-# 1967 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 25405 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25431 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 25436 "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_ =
-# 1969 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 25444 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_one_dec_decl__TEllipsis_ = Obj.magic r in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25476 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 25481 "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_ =
-# 1972 "parser_cocci_menhir.mly"
+# 1948 "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_ =
-# 1958 "parser_cocci_menhir.mly"
+# 1934 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [_1] )
# 25515 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25541 "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_ =
-# 1960 "parser_cocci_menhir.mly"
+# 1936 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
_1::[Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 25550 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25582 "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_ =
-# 1963 "parser_cocci_menhir.mly"
+# 1939 "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_ =
-# 1966 "parser_cocci_menhir.mly"
+# 1942 "parser_cocci_menhir.mly"
( _2 )
# 25620 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 25641 "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_ =
-# 1967 "parser_cocci_menhir.mly"
+# 1943 "parser_cocci_menhir.mly"
( fun build_dots build_comma -> [(build_dots "..." d)] )
# 25648 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25674 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 25679 "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_ =
-# 1969 "parser_cocci_menhir.mly"
+# 1945 "parser_cocci_menhir.mly"
( fun build_dots build_comma ->
[(build_dots "..." d);Ast0.wrap(build_comma(P.clt2mcode "," _2))] )
# 25687 "parser_cocci_menhir.ml"
} = _menhir_stack in
let r : 'tv_continue_list_one_dec_name_opt_decl__TEllipsis_ = Obj.magic r in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 25719 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let d : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 25724 "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_ =
-# 1972 "parser_cocci_menhir.mly"
+# 1948 "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 =
-# 1795 "parser_cocci_menhir.mly"
+# 1771 "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 =
-# 1801 "parser_cocci_menhir.mly"
+# 1777 "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 =
-# 1771 "parser_cocci_menhir.mly"
+# 1747 "parser_cocci_menhir.mly"
(Ast0.NotExpCstrt ceq)
# 25830 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_not_ceq_or_sub =
-# 1772 "parser_cocci_menhir.mly"
+# 1748 "parser_cocci_menhir.mly"
(Ast0.SubExpCstrt s)
# 25854 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_not_eqe =
-# 1776 "parser_cocci_menhir.mly"
+# 1752 "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 =
-# 1783 "parser_cocci_menhir.mly"
+# 1759 "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 =
-# 1733 "parser_cocci_menhir.mly"
+# 1709 "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 =
-# 1747 "parser_cocci_menhir.mly"
+# 1723 "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 =
-# 1839 "parser_cocci_menhir.mly"
+# 1815 "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 =
-# 1848 "parser_cocci_menhir.mly"
+# 1824 "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_ =
-# 1933 "parser_cocci_menhir.mly"
+# 1909 "parser_cocci_menhir.mly"
( _1 )
# 26126 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 133 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 26147 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_dec_decl_ =
-# 1935 "parser_cocci_menhir.mly"
+# 1911 "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_ =
-# 1933 "parser_cocci_menhir.mly"
+# 1909 "parser_cocci_menhir.mly"
( _1 )
# 26185 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 133 "parser_cocci_menhir.mly"
+# 109 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 26206 "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_ =
-# 1935 "parser_cocci_menhir.mly"
+# 1911 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26246 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_one_decl_var =
-# 1204 "parser_cocci_menhir.mly"
+# 1180 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TyDecl(t,P.clt2mcode ";" pv)) )
# 26254 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 26275 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_one_decl_var =
-# 1205 "parser_cocci_menhir.mly"
+# 1181 "parser_cocci_menhir.mly"
( P.meta_decl _1 )
# 26282 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26313 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1207 "parser_cocci_menhir.mly"
+# 1183 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.UnInit(s,fn t,id,P.clt2mcode ";" pv)) )
# 26330 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26366 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1207 "parser_cocci_menhir.mly"
+# 1183 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.UnInit(s,fn t,id,P.clt2mcode ";" pv)) )
# 26385 "parser_cocci_menhir.ml"
let _startpos = _startpos_f_ in
let _endpos = _endpos_f_ in
let _v : 'tv_one_decl_var =
-# 1209 "parser_cocci_menhir.mly"
+# 1185 "parser_cocci_menhir.mly"
( f )
# 26409 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26450 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26456 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1211 "parser_cocci_menhir.mly"
+# 1187 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv)) )
# 26473 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26519 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26525 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1211 "parser_cocci_menhir.mly"
+# 1187 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.Init(s,fn t,id,P.clt2mcode "=" q,e,P.clt2mcode ";" pv)) )
# 26544 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26575 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1216 "parser_cocci_menhir.mly"
+# 1192 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26636 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1216 "parser_cocci_menhir.mly"
+# 1192 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26699 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1216 "parser_cocci_menhir.mly"
+# 1192 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26767 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 1216 "parser_cocci_menhir.mly"
+# 1192 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26837 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26843 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1221 "parser_cocci_menhir.mly"
+# 1197 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26916 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26922 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1221 "parser_cocci_menhir.mly"
+# 1197 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 26997 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27003 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1221 "parser_cocci_menhir.mly"
+# 1197 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27083 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27089 "parser_cocci_menhir.ml"
) = Obj.magic q in
in
-# 1221 "parser_cocci_menhir.mly"
+# 1197 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27181 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27186 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27192 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27197 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 27203 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27208 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1231 "parser_cocci_menhir.mly"
+# 1207 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27295 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27300 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27306 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27311 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 27317 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27322 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1231 "parser_cocci_menhir.mly"
+# 1207 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let _5 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27386 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27391 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27397 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_one_decl_var =
-# 1239 "parser_cocci_menhir.mly"
+# 1215 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.MacroDecl(_1,P.clt2mcode "(" _2,_3,
P.clt2mcode ")" _4,P.clt2mcode ";" _5)) )
# 27406 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27477 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27483 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27488 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27494 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27499 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 27505 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27510 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1245 "parser_cocci_menhir.mly"
+# 1221 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27607 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let e : 'tv_initialize = Obj.magic e in
let q : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 27613 "parser_cocci_menhir.ml"
) = Obj.magic q in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27618 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27624 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 27629 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 27635 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 27640 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
in
-# 1245 "parser_cocci_menhir.mly"
+# 1221 "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 =
-# 2098 "parser_cocci_menhir.mly"
+# 2074 "parser_cocci_menhir.mly"
([])
# 27926 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 2099 "parser_cocci_menhir.mly"
+# 2075 "parser_cocci_menhir.mly"
(_2)
# 27954 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 2101 "parser_cocci_menhir.mly"
+# 2077 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Exp(_1)))))::_2 )
# 27984 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 2102 "parser_cocci_menhir.mly"
+# 2078 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DECL(_1))::_2 )
# 28014 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_dots =
-# 2104 "parser_cocci_menhir.mly"
+# 2080 "parser_cocci_menhir.mly"
( (List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1)@_2 )
# 28044 "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 =
-# 2094 "parser_cocci_menhir.mly"
+# 2070 "parser_cocci_menhir.mly"
([])
# 28061 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_exp =
-# 2095 "parser_cocci_menhir.mly"
+# 2071 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(_1)))::_2 )
# 28091 "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 =
-# 2107 "parser_cocci_menhir.mly"
+# 2083 "parser_cocci_menhir.mly"
([])
# 28108 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_stm =
-# 2108 "parser_cocci_menhir.mly"
+# 2084 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(_1)))::_2 )
# 28138 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_stm =
-# 2109 "parser_cocci_menhir.mly"
+# 2085 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DECL(_1))::_2 )
# 28168 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_after_stm =
-# 2111 "parser_cocci_menhir.mly"
+# 2087 "parser_cocci_menhir.mly"
( (List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1)@_2 )
# 28198 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_plus_body =
-# 810 "parser_cocci_menhir.mly"
+# 786 "parser_cocci_menhir.mly"
( Top_level.top_level (f@b(*@ew*)) )
# 28228 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_f_ in
let _endpos = _endpos_b_ in
let _v : 'tv_plus_exp_body =
-# 824 "parser_cocci_menhir.mly"
+# 800 "parser_cocci_menhir.mly"
( Top_level.top_level (f@[b](*@ew*)) )
# 28258 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 213 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 28286 "parser_cocci_menhir.ml"
) =
-# 249 "parser_cocci_menhir.mly"
+# 225 "parser_cocci_menhir.mly"
( _1 )
# 28290 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 213 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 28318 "parser_cocci_menhir.ml"
) =
-# 249 "parser_cocci_menhir.mly"
+# 225 "parser_cocci_menhir.mly"
( p )
# 28322 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 213 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 28350 "parser_cocci_menhir.ml"
) =
-# 250 "parser_cocci_menhir.mly"
+# 226 "parser_cocci_menhir.mly"
( p )
# 28354 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : (
-# 210 "parser_cocci_menhir.mly"
+# 186 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 28382 "parser_cocci_menhir.ml"
) =
-# 245 "parser_cocci_menhir.mly"
+# 221 "parser_cocci_menhir.mly"
( _1 )
# 28386 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 210 "parser_cocci_menhir.mly"
+# 186 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 28414 "parser_cocci_menhir.ml"
) =
-# 245 "parser_cocci_menhir.mly"
+# 221 "parser_cocci_menhir.mly"
( p )
# 28418 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_p_ in
let _endpos = _endpos__2_ in
let _v : (
-# 210 "parser_cocci_menhir.mly"
+# 186 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 28446 "parser_cocci_menhir.ml"
) =
-# 246 "parser_cocci_menhir.mly"
+# 222 "parser_cocci_menhir.mly"
( p )
# 28450 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_plus_start =
-# 2083 "parser_cocci_menhir.mly"
+# 2059 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Ty(_1))))] )
# 28474 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_plus_start =
-# 2084 "parser_cocci_menhir.mly"
+# 2060 "parser_cocci_menhir.mly"
( [Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.TopInit(_1))))] )
# 28498 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 2086 "parser_cocci_menhir.mly"
+# 2062 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(_1)))::_2 )
# 28528 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 2088 "parser_cocci_menhir.mly"
+# 2064 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Exp(_1)))))::_2 )
# 28558 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 2089 "parser_cocci_menhir.mly"
+# 2065 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DECL(_1))::_2 )
# 28588 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_plus_start =
-# 2091 "parser_cocci_menhir.mly"
+# 2067 "parser_cocci_menhir.mly"
( (List.map (function x -> Ast0.wrap(Ast0.OTHER(x))) _1)@_2 )
# 28618 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 28639 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pnrule =
-# 300 "parser_cocci_menhir.mly"
+# 276 "parser_cocci_menhir.mly"
( Ast.Dep _1 )
# 28646 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 28671 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pnrule =
-# 301 "parser_cocci_menhir.mly"
+# 277 "parser_cocci_menhir.mly"
( Ast.AntiDep _2 )
# 28678 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 28703 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pnrule =
-# 302 "parser_cocci_menhir.mly"
+# 278 "parser_cocci_menhir.mly"
( Ast.EverDep _2 )
# 28710 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 28735 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pnrule =
-# 303 "parser_cocci_menhir.mly"
+# 279 "parser_cocci_menhir.mly"
( Ast.NeverDep _2 )
# 28742 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_pnrule =
-# 304 "parser_cocci_menhir.mly"
+# 280 "parser_cocci_menhir.mly"
( _2 )
# 28774 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_postfix_expr_eexpr_dot_expressions_ =
-# 1547 "parser_cocci_menhir.mly"
+# 1523 "parser_cocci_menhir.mly"
( _1 )
# 28798 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 28834 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 28840 "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_ =
-# 1549 "parser_cocci_menhir.mly"
+# 1525 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 28849 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 28881 "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_ =
-# 1552 "parser_cocci_menhir.mly"
+# 1528 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 28889 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 172 "parser_cocci_menhir.mly"
+# 148 "parser_cocci_menhir.mly"
(Data.clt)
# 28921 "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_ =
-# 1554 "parser_cocci_menhir.mly"
+# 1530 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 28930 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 28956 "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_ =
-# 1557 "parser_cocci_menhir.mly"
+# 1533 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 28964 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 28990 "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_ =
-# 1559 "parser_cocci_menhir.mly"
+# 1535 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 28998 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 29034 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 29040 "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_ =
-# 1561 "parser_cocci_menhir.mly"
+# 1537 "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_ =
-# 1547 "parser_cocci_menhir.mly"
+# 1523 "parser_cocci_menhir.mly"
( _1 )
# 29074 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 29110 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 29116 "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_ =
-# 1549 "parser_cocci_menhir.mly"
+# 1525 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 29125 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 29157 "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_ =
-# 1552 "parser_cocci_menhir.mly"
+# 1528 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 29165 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 172 "parser_cocci_menhir.mly"
+# 148 "parser_cocci_menhir.mly"
(Data.clt)
# 29197 "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_ =
-# 1554 "parser_cocci_menhir.mly"
+# 1530 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 29206 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 29232 "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_ =
-# 1557 "parser_cocci_menhir.mly"
+# 1533 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 29240 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 29266 "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_ =
-# 1559 "parser_cocci_menhir.mly"
+# 1535 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 29274 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 29310 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 29316 "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_ =
-# 1561 "parser_cocci_menhir.mly"
+# 1537 "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_ =
-# 1547 "parser_cocci_menhir.mly"
+# 1523 "parser_cocci_menhir.mly"
( _1 )
# 29350 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 29386 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 29392 "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_ =
-# 1549 "parser_cocci_menhir.mly"
+# 1525 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 29401 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 29433 "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_ =
-# 1552 "parser_cocci_menhir.mly"
+# 1528 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 29441 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 172 "parser_cocci_menhir.mly"
+# 148 "parser_cocci_menhir.mly"
(Data.clt)
# 29473 "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_ =
-# 1554 "parser_cocci_menhir.mly"
+# 1530 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 29482 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 29508 "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_ =
-# 1557 "parser_cocci_menhir.mly"
+# 1533 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 29516 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 29542 "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_ =
-# 1559 "parser_cocci_menhir.mly"
+# 1535 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 29550 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 29586 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 29592 "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_ =
-# 1561 "parser_cocci_menhir.mly"
+# 1537 "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_ =
-# 1547 "parser_cocci_menhir.mly"
+# 1523 "parser_cocci_menhir.mly"
( _1 )
# 29626 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 29662 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 170 "parser_cocci_menhir.mly"
+# 146 "parser_cocci_menhir.mly"
(Data.clt)
# 29668 "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_ =
-# 1549 "parser_cocci_menhir.mly"
+# 1525 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.ArrayAccess (_1,P.clt2mcode "[" _2,_3,
P.clt2mcode "]" _4)) )
# 29677 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 29709 "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_ =
-# 1552 "parser_cocci_menhir.mly"
+# 1528 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordAccess(_1, P.clt2mcode "." _2, _3)) )
# 29717 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_disj_ident = Obj.magic _3 in
let _2 : (
-# 172 "parser_cocci_menhir.mly"
+# 148 "parser_cocci_menhir.mly"
(Data.clt)
# 29749 "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_ =
-# 1554 "parser_cocci_menhir.mly"
+# 1530 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.RecordPtAccess(_1, P.clt2mcode "->" _2,
_3)) )
# 29758 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 29784 "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_ =
-# 1557 "parser_cocci_menhir.mly"
+# 1533 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Inc _2)) )
# 29792 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 29818 "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_ =
-# 1559 "parser_cocci_menhir.mly"
+# 1535 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Postfix (_1, P.clt2mcode Ast.Dec _2)) )
# 29826 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 29862 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 29868 "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_ =
-# 1561 "parser_cocci_menhir.mly"
+# 1537 "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_ =
-# 1566 "parser_cocci_menhir.mly"
+# 1542 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 29902 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29923 "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_ =
-# 1568 "parser_cocci_menhir.mly"
+# 1544 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 29931 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29952 "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_ =
-# 1571 "parser_cocci_menhir.mly"
+# 1547 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 29960 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 29981 "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_ =
-# 1574 "parser_cocci_menhir.mly"
+# 1550 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 29989 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30010 "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_ =
-# 1577 "parser_cocci_menhir.mly"
+# 1553 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 30018 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30039 "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_ =
-# 1580 "parser_cocci_menhir.mly"
+# 1556 "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 : (
-# 130 "parser_cocci_menhir.mly"
+# 106 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 30069 "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_ =
-# 1584 "parser_cocci_menhir.mly"
+# 1560 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 30077 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30098 "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_ =
-# 1587 "parser_cocci_menhir.mly"
+# 1563 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30128 "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_ =
-# 1591 "parser_cocci_menhir.mly"
+# 1567 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30158 "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_ =
-# 1595 "parser_cocci_menhir.mly"
+# 1571 "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 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 30198 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 30204 "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_ =
-# 1599 "parser_cocci_menhir.mly"
+# 1575 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 30212 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 30243 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_eexpr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 30249 "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_ =
-# 1602 "parser_cocci_menhir.mly"
+# 1578 "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_ =
-# 1606 "parser_cocci_menhir.mly"
+# 1582 "parser_cocci_menhir.mly"
( _1 )
# 30283 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_invalid_ =
-# 1566 "parser_cocci_menhir.mly"
+# 1542 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 30307 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30328 "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_ =
-# 1568 "parser_cocci_menhir.mly"
+# 1544 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 30336 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30357 "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_ =
-# 1571 "parser_cocci_menhir.mly"
+# 1547 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 30365 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30386 "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_ =
-# 1574 "parser_cocci_menhir.mly"
+# 1550 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 30394 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30415 "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_ =
-# 1577 "parser_cocci_menhir.mly"
+# 1553 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 30423 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30444 "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_ =
-# 1580 "parser_cocci_menhir.mly"
+# 1556 "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 : (
-# 130 "parser_cocci_menhir.mly"
+# 106 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 30474 "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_ =
-# 1584 "parser_cocci_menhir.mly"
+# 1560 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 30482 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30503 "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_ =
-# 1587 "parser_cocci_menhir.mly"
+# 1563 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30533 "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_ =
-# 1591 "parser_cocci_menhir.mly"
+# 1567 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30563 "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_ =
-# 1595 "parser_cocci_menhir.mly"
+# 1571 "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 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 30603 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 30609 "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_ =
-# 1599 "parser_cocci_menhir.mly"
+# 1575 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 30617 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 30648 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_eexpr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 30654 "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_ =
-# 1602 "parser_cocci_menhir.mly"
+# 1578 "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_ =
-# 1606 "parser_cocci_menhir.mly"
+# 1582 "parser_cocci_menhir.mly"
( _1 )
# 30688 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_eexpr_nest_expressions_ =
-# 1566 "parser_cocci_menhir.mly"
+# 1542 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 30712 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30733 "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_ =
-# 1568 "parser_cocci_menhir.mly"
+# 1544 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 30741 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30762 "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_ =
-# 1571 "parser_cocci_menhir.mly"
+# 1547 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 30770 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30791 "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_ =
-# 1574 "parser_cocci_menhir.mly"
+# 1550 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 30799 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 30820 "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_ =
-# 1577 "parser_cocci_menhir.mly"
+# 1553 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 30828 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30849 "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_ =
-# 1580 "parser_cocci_menhir.mly"
+# 1556 "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 : (
-# 130 "parser_cocci_menhir.mly"
+# 106 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 30879 "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_ =
-# 1584 "parser_cocci_menhir.mly"
+# 1560 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 30887 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30908 "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_ =
-# 1587 "parser_cocci_menhir.mly"
+# 1563 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30938 "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_ =
-# 1591 "parser_cocci_menhir.mly"
+# 1567 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 30968 "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_ =
-# 1595 "parser_cocci_menhir.mly"
+# 1571 "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 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 31008 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 31014 "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_ =
-# 1599 "parser_cocci_menhir.mly"
+# 1575 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 31022 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 31053 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_eexpr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 31059 "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_ =
-# 1602 "parser_cocci_menhir.mly"
+# 1578 "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_ =
-# 1606 "parser_cocci_menhir.mly"
+# 1582 "parser_cocci_menhir.mly"
( _1 )
# 31093 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_primary_expr_expr_invalid_ =
-# 1566 "parser_cocci_menhir.mly"
+# 1542 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Ident(_1)) )
# 31117 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31138 "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_ =
-# 1568 "parser_cocci_menhir.mly"
+# 1544 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Int x) clt)) )
# 31146 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31167 "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_ =
-# 1571 "parser_cocci_menhir.mly"
+# 1547 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Float x) clt)) )
# 31175 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31196 "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_ =
-# 1574 "parser_cocci_menhir.mly"
+# 1550 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.String x) clt)) )
# 31204 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31225 "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_ =
-# 1577 "parser_cocci_menhir.mly"
+# 1553 "parser_cocci_menhir.mly"
( let (x,clt) = _1 in
Ast0.wrap(Ast0.Constant (P.clt2mcode (Ast.Char x) clt)) )
# 31233 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 31254 "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_ =
-# 1580 "parser_cocci_menhir.mly"
+# 1556 "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 : (
-# 130 "parser_cocci_menhir.mly"
+# 106 "parser_cocci_menhir.mly"
(Parse_aux.expinfo)
# 31284 "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_ =
-# 1584 "parser_cocci_menhir.mly"
+# 1560 "parser_cocci_menhir.mly"
( let (nm,constraints,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaErr(P.clt2mcode nm clt,constraints,pure)) )
# 31292 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 31313 "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_ =
-# 1587 "parser_cocci_menhir.mly"
+# 1563 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 31343 "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_ =
-# 1591 "parser_cocci_menhir.mly"
+# 1567 "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 : (
-# 135 "parser_cocci_menhir.mly"
+# 111 "parser_cocci_menhir.mly"
(Parse_aux.typed_expinfo)
# 31373 "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_ =
-# 1595 "parser_cocci_menhir.mly"
+# 1571 "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 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 31413 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 31419 "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_ =
-# 1599 "parser_cocci_menhir.mly"
+# 1575 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Paren(P.clt2mcode "(" _1,_2,
P.clt2mcode ")" _3)) )
# 31427 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 31458 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_expr_eexpr_ = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 31464 "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_ =
-# 1602 "parser_cocci_menhir.mly"
+# 1578 "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_ =
-# 1606 "parser_cocci_menhir.mly"
+# 1582 "parser_cocci_menhir.mly"
( _1 )
# 31498 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure =
-# 260 "parser_cocci_menhir.mly"
+# 236 "parser_cocci_menhir.mly"
( Ast0.Pure )
# 31520 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure =
-# 261 "parser_cocci_menhir.mly"
+# 237 "parser_cocci_menhir.mly"
( Ast0.Context )
# 31542 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pure =
-# 262 "parser_cocci_menhir.mly"
+# 238 "parser_cocci_menhir.mly"
( Ast0.PureContext )
# 31568 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_pure =
-# 263 "parser_cocci_menhir.mly"
+# 239 "parser_cocci_menhir.mly"
( Ast0.PureContext )
# 31594 "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 =
-# 264 "parser_cocci_menhir.mly"
+# 240 "parser_cocci_menhir.mly"
( Ast0.Impure )
# 31611 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 31632 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident =
-# 1620 "parser_cocci_menhir.mly"
+# 1596 "parser_cocci_menhir.mly"
( _1 )
# 31639 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1623 "parser_cocci_menhir.mly"
+# 1599 "parser_cocci_menhir.mly"
( "identifier" )
# 31661 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1624 "parser_cocci_menhir.mly"
+# 1600 "parser_cocci_menhir.mly"
( "expression" )
# 31683 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1625 "parser_cocci_menhir.mly"
+# 1601 "parser_cocci_menhir.mly"
( "statement" )
# 31705 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1626 "parser_cocci_menhir.mly"
+# 1602 "parser_cocci_menhir.mly"
( "function" )
# 31727 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1627 "parser_cocci_menhir.mly"
+# 1603 "parser_cocci_menhir.mly"
( "local" )
# 31749 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1628 "parser_cocci_menhir.mly"
+# 1604 "parser_cocci_menhir.mly"
( "type" )
# 31771 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1629 "parser_cocci_menhir.mly"
+# 1605 "parser_cocci_menhir.mly"
( "parameter" )
# 31793 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1630 "parser_cocci_menhir.mly"
+# 1606 "parser_cocci_menhir.mly"
( "idexpression" )
# 31815 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1631 "parser_cocci_menhir.mly"
+# 1607 "parser_cocci_menhir.mly"
( "initialiser" )
# 31837 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1632 "parser_cocci_menhir.mly"
+# 1608 "parser_cocci_menhir.mly"
( "list" )
# 31859 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1633 "parser_cocci_menhir.mly"
+# 1609 "parser_cocci_menhir.mly"
( "fresh" )
# 31881 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1634 "parser_cocci_menhir.mly"
+# 1610 "parser_cocci_menhir.mly"
( "constant" )
# 31903 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1635 "parser_cocci_menhir.mly"
+# 1611 "parser_cocci_menhir.mly"
( "error" )
# 31925 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1636 "parser_cocci_menhir.mly"
+# 1612 "parser_cocci_menhir.mly"
( "words" )
# 31947 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1637 "parser_cocci_menhir.mly"
+# 1613 "parser_cocci_menhir.mly"
( "pure" )
# 31969 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1638 "parser_cocci_menhir.mly"
+# 1614 "parser_cocci_menhir.mly"
( "context" )
# 31991 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1639 "parser_cocci_menhir.mly"
+# 1615 "parser_cocci_menhir.mly"
( "generated" )
# 32013 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1640 "parser_cocci_menhir.mly"
+# 1616 "parser_cocci_menhir.mly"
( "typedef" )
# 32035 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1641 "parser_cocci_menhir.mly"
+# 1617 "parser_cocci_menhir.mly"
( "declarer" )
# 32057 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1642 "parser_cocci_menhir.mly"
+# 1618 "parser_cocci_menhir.mly"
( "iterator" )
# 32079 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1643 "parser_cocci_menhir.mly"
+# 1619 "parser_cocci_menhir.mly"
( "name" )
# 32101 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_kwd =
-# 1644 "parser_cocci_menhir.mly"
+# 1620 "parser_cocci_menhir.mly"
( "position" )
# 32123 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident =
-# 1651 "parser_cocci_menhir.mly"
+# 1627 "parser_cocci_menhir.mly"
( (None,P.id2name _1) )
# 32147 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident =
-# 1652 "parser_cocci_menhir.mly"
+# 1628 "parser_cocci_menhir.mly"
( (None,_1) )
# 32171 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident =
-# 1653 "parser_cocci_menhir.mly"
+# 1629 "parser_cocci_menhir.mly"
( _1 )
# 32195 "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_ =
-# 1680 "parser_cocci_menhir.mly"
+# 1656 "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_ =
-# 1680 "parser_cocci_menhir.mly"
+# 1656 "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_ =
-# 1705 "parser_cocci_menhir.mly"
+# 1681 "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_ =
-# 1688 "parser_cocci_menhir.mly"
+# 1664 "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_ =
-# 1695 "parser_cocci_menhir.mly"
+# 1671 "parser_cocci_menhir.mly"
(
let nm = P.id2name _3 in
Iteration.parsed_virtual_identifiers :=
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_pure_ident_or_meta_ident_with_seed =
-# 1656 "parser_cocci_menhir.mly"
+# 1632 "parser_cocci_menhir.mly"
( (_1,Ast.NoVal) )
# 32394 "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 =
-# 1659 "parser_cocci_menhir.mly"
+# 1635 "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_ =
-# 1674 "parser_cocci_menhir.mly"
+# 1650 "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 =
-# 1766 "parser_cocci_menhir.mly"
+# 1742 "parser_cocci_menhir.mly"
(Ast0.NotIdCstrt re)
# 32486 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_ne_ in
let _endpos = _endpos_ne_ in
let _v : 'tv_re_or_not_eqe_or_sub =
-# 1767 "parser_cocci_menhir.mly"
+# 1743 "parser_cocci_menhir.mly"
(Ast0.NotExpCstrt ne)
# 32510 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_re_or_not_eqe_or_sub =
-# 1768 "parser_cocci_menhir.mly"
+# 1744 "parser_cocci_menhir.mly"
(Ast0.SubExpCstrt s)
# 32534 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_re_ in
let _endpos = _endpos_re_ in
let _v : 'tv_re_or_not_eqid =
-# 1712 "parser_cocci_menhir.mly"
+# 1688 "parser_cocci_menhir.mly"
(Ast.IdRegExpConstraint re)
# 32558 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_ne_ in
let _endpos = _endpos_ne_ in
let _v : 'tv_re_or_not_eqid =
-# 1713 "parser_cocci_menhir.mly"
+# 1689 "parser_cocci_menhir.mly"
(ne)
# 32582 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let re : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 32607 "parser_cocci_menhir.ml"
) = Obj.magic re in
let _startpos = _startpos__1_ in
let _endpos = _endpos_re_ in
let _v : 'tv_regexp_eqid =
-# 1717 "parser_cocci_menhir.mly"
+# 1693 "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 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 32644 "parser_cocci_menhir.ml"
) = Obj.magic re in
let _startpos = _startpos__1_ in
let _endpos = _endpos_re_ in
let _v : 'tv_regexp_eqid =
-# 1724 "parser_cocci_menhir.mly"
+# 1700 "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 : (
-# 201 "parser_cocci_menhir.mly"
+# 177 "parser_cocci_menhir.mly"
(unit)
# 32673 "parser_cocci_menhir.ml"
) =
-# 242 "parser_cocci_menhir.mly"
+# 218 "parser_cocci_menhir.mly"
( )
# 32677 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_rule_elem_statement =
-# 1100 "parser_cocci_menhir.mly"
+# 1076 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Decl((Ast0.default_info(),Ast0.context_befaft()),_1)) )
# 32701 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 32727 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 1101 "parser_cocci_menhir.mly"
+# 1077 "parser_cocci_menhir.mly"
( P.exp_stm _1 _2 )
# 32735 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 32766 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 32772 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_rule_elem_statement =
-# 1102 "parser_cocci_menhir.mly"
+# 1078 "parser_cocci_menhir.mly"
( P.ret_exp _1 _2 _3 )
# 32779 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 32805 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 32810 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 1103 "parser_cocci_menhir.mly"
+# 1079 "parser_cocci_menhir.mly"
( P.ret _1 _2 )
# 32817 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 32843 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 32848 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 1104 "parser_cocci_menhir.mly"
+# 1080 "parser_cocci_menhir.mly"
( P.break _1 _2 )
# 32855 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 32881 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 32886 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_rule_elem_statement =
-# 1105 "parser_cocci_menhir.mly"
+# 1081 "parser_cocci_menhir.mly"
( P.cont _1 _2 )
# 32893 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 32924 "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 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 32930 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_rule_elem_statement =
-# 1107 "parser_cocci_menhir.mly"
+# 1083 "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 : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 32997 "parser_cocci_menhir.ml"
) = let nm =
in
-# 272 "parser_cocci_menhir.mly"
+# 248 "parser_cocci_menhir.mly"
( P.make_cocci_rule_name_result nm d i a e ee )
# 33008 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_x0_ in
let _endpos = _endpos__8_ in
let _v : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 33070 "parser_cocci_menhir.ml"
) = let nm =
in
-# 272 "parser_cocci_menhir.mly"
+# 248 "parser_cocci_menhir.mly"
( P.make_cocci_rule_name_result nm d i a e ee )
# 33082 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__8_ in
let _v : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 33142 "parser_cocci_menhir.ml"
) =
-# 277 "parser_cocci_menhir.mly"
+# 253 "parser_cocci_menhir.mly"
( P.make_generated_rule_name_result None d i a e ee )
# 33146 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 33188 "parser_cocci_menhir.ml"
) = let nm =
in
-# 279 "parser_cocci_menhir.mly"
+# 255 "parser_cocci_menhir.mly"
( P.make_script_rule_name_result lang nm d )
# 33199 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__6_ in
let _v : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 33247 "parser_cocci_menhir.ml"
) = let nm =
in
-# 279 "parser_cocci_menhir.mly"
+# 255 "parser_cocci_menhir.mly"
( P.make_script_rule_name_result lang nm d )
# 33259 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 33301 "parser_cocci_menhir.ml"
) =
-# 281 "parser_cocci_menhir.mly"
+# 257 "parser_cocci_menhir.mly"
( P.make_initial_script_rule_name_result lang d )
# 33305 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 33347 "parser_cocci_menhir.ml"
) =
-# 283 "parser_cocci_menhir.mly"
+# 259 "parser_cocci_menhir.mly"
( P.make_final_script_rule_name_result lang d )
# 33351 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_py_ in
let _endpos = _endpos__2_ in
let _v : (
-# 229 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 33379 "parser_cocci_menhir.ml"
) =
-# 2282 "parser_cocci_menhir.mly"
+# 2258 "parser_cocci_menhir.mly"
( ((Some (P.id2name py), None), None) )
# 33383 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_py_ in
let _endpos = _endpos__3_ in
let _v : (
-# 229 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 33417 "parser_cocci_menhir.ml"
) =
-# 2284 "parser_cocci_menhir.mly"
+# 2260 "parser_cocci_menhir.mly"
( ((Some (P.id2name py), None), Some _2) )
# 33421 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 229 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 33471 "parser_cocci_menhir.ml"
) =
-# 2286 "parser_cocci_menhir.mly"
+# 2262 "parser_cocci_menhir.mly"
( ((None, Some (P.id2name ast)), Some _6) )
# 33475 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 229 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 33525 "parser_cocci_menhir.ml"
) =
-# 2288 "parser_cocci_menhir.mly"
+# 2264 "parser_cocci_menhir.mly"
( ((Some (P.id2name str), None), Some _6) )
# 33529 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : (
-# 229 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 33581 "parser_cocci_menhir.ml"
) =
-# 2290 "parser_cocci_menhir.mly"
+# 2266 "parser_cocci_menhir.mly"
( ((Some (P.id2name str), Some (P.id2name ast)), Some _6) )
# 33585 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let cocci : 'tv_pure_ident = Obj.magic cocci in
let _2 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 33620 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_cocci_ in
let _v : 'tv_script_name_decl =
-# 2294 "parser_cocci_menhir.mly"
+# 2270 "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 =
-# 2298 "parser_cocci_menhir.mly"
+# 2274 "parser_cocci_menhir.mly"
( let nm = P.id2name cocci in
Iteration.parsed_virtual_identifiers :=
Common.union_set [nm]
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 33692 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_seed_elem =
-# 1664 "parser_cocci_menhir.mly"
+# 1640 "parser_cocci_menhir.mly"
( let (x,_) = _1 in Ast.SeedString x )
# 33699 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 128 "parser_cocci_menhir.mly"
+# 104 "parser_cocci_menhir.mly"
(Parse_aux.idinfo)
# 33720 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_seed_elem =
-# 1665 "parser_cocci_menhir.mly"
+# 1641 "parser_cocci_menhir.mly"
( let (x,_,_,_) = _1 in Ast.SeedId x )
# 33727 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_seed_elem =
-# 1666 "parser_cocci_menhir.mly"
+# 1642 "parser_cocci_menhir.mly"
(failwith "tmeta")
# 33749 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _3 : 'tv_pure_ident = Obj.magic _3 in
let _1 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 33780 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_seed_elem =
-# 1668 "parser_cocci_menhir.mly"
+# 1644 "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 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 33810 "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 : (
-# 155 "parser_cocci_menhir.mly"
+# 131 "parser_cocci_menhir.mly"
(string * Data.clt)
# 33848 "parser_cocci_menhir.ml"
) = Obj.magic x in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_single_statement =
-# 1115 "parser_cocci_menhir.mly"
+# 1091 "parser_cocci_menhir.mly"
( _1 )
# 34749 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 34780 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_midzero_list_statement_statement_ = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 34786 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_single_statement =
-# 1119 "parser_cocci_menhir.mly"
+# 1095 "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 =
-# 1041 "parser_cocci_menhir.mly"
+# 1017 "parser_cocci_menhir.mly"
( _1 )
# 34821 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 34842 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_statement =
-# 1042 "parser_cocci_menhir.mly"
+# 1018 "parser_cocci_menhir.mly"
( tmeta_to_statement _1)
# 34849 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 34870 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_statement =
-# 1044 "parser_cocci_menhir.mly"
+# 1020 "parser_cocci_menhir.mly"
( P.meta_stm _1 )
# 34877 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 34903 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 1046 "parser_cocci_menhir.mly"
+# 1022 "parser_cocci_menhir.mly"
( P.exp_stm _1 _2 )
# 34911 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 34953 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 34959 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 34964 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_statement =
-# 1048 "parser_cocci_menhir.mly"
+# 1024 "parser_cocci_menhir.mly"
( P.ifthen _1 _2 _3 _4 _5 )
# 34971 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _7 : 'tv_single_statement = Obj.magic _7 in
let _6 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35023 "parser_cocci_menhir.ml"
) = Obj.magic _6 in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 35029 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35035 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35040 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : 'tv_statement =
-# 1050 "parser_cocci_menhir.mly"
+# 1026 "parser_cocci_menhir.mly"
( P.ifthenelse _1 _2 _3 _4 _5 _6 _7 )
# 35047 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _9 : 'tv_single_statement = Obj.magic _9 in
let _8 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 35109 "parser_cocci_menhir.ml"
) = Obj.magic _8 in
let _7 : 'tv_option_eexpr_ = Obj.magic _7 in
let _6 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35115 "parser_cocci_menhir.ml"
) = Obj.magic _6 in
let _5 : 'tv_option_eexpr_ = Obj.magic _5 in
let _4 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35121 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_option_eexpr_ = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35127 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35132 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__9_ in
let _v : 'tv_statement =
-# 1053 "parser_cocci_menhir.mly"
+# 1029 "parser_cocci_menhir.mly"
( P.forloop _1 _2 _3 _4 _5 _6 _7 _8 _9 )
# 35139 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 35181 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35187 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35192 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_statement =
-# 1055 "parser_cocci_menhir.mly"
+# 1031 "parser_cocci_menhir.mly"
( P.whileloop _1 _2 _3 _4 _5 )
# 35199 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _7 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35250 "parser_cocci_menhir.ml"
) = Obj.magic _7 in
let _6 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 35255 "parser_cocci_menhir.ml"
) = Obj.magic _6 in
let _5 : 'tv_eexpr = Obj.magic _5 in
let _4 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35261 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35266 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_single_statement = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35272 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__7_ in
let _v : 'tv_statement =
-# 1057 "parser_cocci_menhir.mly"
+# 1033 "parser_cocci_menhir.mly"
( P.doloop _1 _2 _3 _4 _5 _6 _7 )
# 35279 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _5 : 'tv_single_statement = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 35321 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr_list_option = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35327 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__5_ in
let _v : 'tv_statement =
-# 1059 "parser_cocci_menhir.mly"
+# 1035 "parser_cocci_menhir.mly"
( P.iterator _1 _2 _3 _4 _5 )
# 35335 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _8 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 35391 "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 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 35398 "parser_cocci_menhir.ml"
) = Obj.magic _5 in
let _4 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 35403 "parser_cocci_menhir.ml"
) = Obj.magic _4 in
let _3 : 'tv_eexpr = Obj.magic _3 in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35409 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35414 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__8_ in
let _v : 'tv_statement =
-# 1061 "parser_cocci_menhir.mly"
+# 1037 "parser_cocci_menhir.mly"
( P.switch _1 _2 _3 _4 _5 (List.concat _6) _7 _8 )
# 35421 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35452 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_eexpr = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35458 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_statement =
-# 1062 "parser_cocci_menhir.mly"
+# 1038 "parser_cocci_menhir.mly"
( P.ret_exp _1 _2 _3 )
# 35465 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35491 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 123 "parser_cocci_menhir.mly"
+# 99 "parser_cocci_menhir.mly"
(Data.clt)
# 35496 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 1063 "parser_cocci_menhir.mly"
+# 1039 "parser_cocci_menhir.mly"
( P.ret _1 _2 )
# 35503 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35529 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 35534 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 1064 "parser_cocci_menhir.mly"
+# 1040 "parser_cocci_menhir.mly"
( P.break _1 _2 )
# 35541 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35567 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 35572 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 1065 "parser_cocci_menhir.mly"
+# 1041 "parser_cocci_menhir.mly"
( P.cont _1 _2 )
# 35579 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 35605 "parser_cocci_menhir.ml"
) = Obj.magic _2 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_statement =
-# 1066 "parser_cocci_menhir.mly"
+# 1042 "parser_cocci_menhir.mly"
( P.label _1 _2 )
# 35613 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 35644 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_disj_ident = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 35650 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_statement =
-# 1067 "parser_cocci_menhir.mly"
+# 1043 "parser_cocci_menhir.mly"
( P.goto _1 _2 _3 )
# 35657 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 35688 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_fun_start = Obj.magic _2 in
let _1 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 35694 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_statement =
-# 1069 "parser_cocci_menhir.mly"
+# 1045 "parser_cocci_menhir.mly"
( P.seq _1 _2 _3 )
# 35701 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let w : 'tv_list_whenppdecs_ = Obj.magic w in
let _1 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 35728 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_w_ in
let _v : 'tv_stm_dots =
-# 1073 "parser_cocci_menhir.mly"
+# 1049 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Dots(P.clt2mcode "..." _1, List.concat w)) )
# 35735 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 35771 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 35778 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_stm_dots =
-# 1075 "parser_cocci_menhir.mly"
+# 1051 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<..." _1, b,
P.clt2mcode "...>" c, List.concat w, false)) )
# 35786 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let c : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 35822 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 35829 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos_c_ in
let _v : 'tv_stm_dots =
-# 1078 "parser_cocci_menhir.mly"
+# 1054 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<+..." _1, b,
P.clt2mcode "...+>" c, List.concat w, true)) )
# 35837 "parser_cocci_menhir.ml"
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 35858 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 1002 "parser_cocci_menhir.mly"
+# 978 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Static s )
# 35865 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 35886 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 1003 "parser_cocci_menhir.mly"
+# 979 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Auto s )
# 35893 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 35914 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 1004 "parser_cocci_menhir.mly"
+# 980 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Register s )
# 35921 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let s : (
-# 119 "parser_cocci_menhir.mly"
+# 95 "parser_cocci_menhir.mly"
(Data.clt)
# 35942 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_storage =
-# 1005 "parser_cocci_menhir.mly"
+# 981 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Extern s )
# 35949 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl =
-# 719 "parser_cocci_menhir.mly"
+# 695 "parser_cocci_menhir.mly"
( [] )
# 35971 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl =
-# 720 "parser_cocci_menhir.mly"
+# 696 "parser_cocci_menhir.mly"
( [_1] )
# 35995 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_list =
-# 744 "parser_cocci_menhir.mly"
+# 720 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1)) )
# 36019 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_list_start =
-# 747 "parser_cocci_menhir.mly"
+# 723 "parser_cocci_menhir.mly"
( _1 )
# 36043 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_struct_decl_list_start =
-# 748 "parser_cocci_menhir.mly"
+# 724 "parser_cocci_menhir.mly"
( _1@_2 )
# 36073 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_d_ in
let _endpos = _endpos_r_ in
let _v : 'tv_struct_decl_list_start =
-# 750 "parser_cocci_menhir.mly"
+# 726 "parser_cocci_menhir.mly"
( (P.mkddots_one "..." d)::r )
# 36103 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 36124 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_one =
-# 723 "parser_cocci_menhir.mly"
+# 699 "parser_cocci_menhir.mly"
( P.meta_field _1 )
# 36131 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 134 "parser_cocci_menhir.mly"
+# 110 "parser_cocci_menhir.mly"
(Parse_aux.list_info)
# 36152 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_one =
-# 724 "parser_cocci_menhir.mly"
+# 700 "parser_cocci_menhir.mly"
( P.meta_field_list _1 )
# 36159 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 36180 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_struct_decl_one =
-# 725 "parser_cocci_menhir.mly"
+# 701 "parser_cocci_menhir.mly"
( tmeta_to_field _1 )
# 36187 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 36218 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_struct_decl_one =
-# 727 "parser_cocci_menhir.mly"
+# 703 "parser_cocci_menhir.mly"
( let (id,fn) = d in
Ast0.wrap(Ast0.UnInit(None,fn t,id,P.clt2mcode ";" pv)) )
# 36228 "parser_cocci_menhir.ml"
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 36289 "parser_cocci_menhir.ml"
) = Obj.magic pv in
let rp2 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 36294 "parser_cocci_menhir.ml"
) = Obj.magic rp2 in
let p : 'tv_decl_list_name_opt_decl_ = Obj.magic p in
let lp2 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 36300 "parser_cocci_menhir.ml"
) = Obj.magic lp2 in
let rp1 : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 36305 "parser_cocci_menhir.ml"
) = Obj.magic rp1 in
let d : 'tv_d_ident = Obj.magic d in
let st : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 36311 "parser_cocci_menhir.ml"
) = Obj.magic st in
let lp1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 36316 "parser_cocci_menhir.ml"
) = Obj.magic lp1 in
let _startpos = _startpos_t_ in
let _endpos = _endpos_pv_ in
let _v : 'tv_struct_decl_one =
-# 731 "parser_cocci_menhir.mly"
+# 707 "parser_cocci_menhir.mly"
( let (id,fn) = d in
let t =
Ast0.wrap
};
} = _menhir_stack in
let pv : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 36361 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 739 "parser_cocci_menhir.mly"
+# 715 "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 : (
-# 175 "parser_cocci_menhir.mly"
+# 151 "parser_cocci_menhir.mly"
(Data.clt)
# 36415 "parser_cocci_menhir.ml"
) = Obj.magic pv in
in
-# 739 "parser_cocci_menhir.mly"
+# 715 "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 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 36456 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_s_ in
let _v : 'tv_struct_or_union =
-# 715 "parser_cocci_menhir.mly"
+# 691 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Struct s )
# 36463 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let u : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 36484 "parser_cocci_menhir.ml"
) = Obj.magic u in
let _startpos = _startpos_u_ in
let _endpos = _endpos_u_ in
let _v : 'tv_struct_or_union =
-# 716 "parser_cocci_menhir.mly"
+# 692 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Union u )
# 36491 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos_i_ in
let _v : 'tv_sub =
-# 1812 "parser_cocci_menhir.mly"
+# 1788 "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 =
-# 1821 "parser_cocci_menhir.mly"
+# 1797 "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 =
-# 1379 "parser_cocci_menhir.mly"
+# 1355 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.OTHER(Ast0.wrap(Ast0.Exp(_1)))) )
# 36594 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let _3 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 36625 "parser_cocci_menhir.ml"
) = Obj.magic _3 in
let _2 : 'tv_initialize_list = Obj.magic _2 in
let _1 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 36631 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__3_ in
let _v : 'tv_top_init =
-# 2071 "parser_cocci_menhir.mly"
+# 2047 "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 =
-# 2059 "parser_cocci_menhir.mly"
+# 2035 "parser_cocci_menhir.mly"
([])
# 36660 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots =
-# 2060 "parser_cocci_menhir.mly"
+# 2036 "parser_cocci_menhir.mly"
(_2)
# 36688 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots =
-# 2061 "parser_cocci_menhir.mly"
+# 2037 "parser_cocci_menhir.mly"
((Ast0.wrap(Ast0.Exp(_1)))::_2)
# 36718 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots =
-# 2062 "parser_cocci_menhir.mly"
+# 2038 "parser_cocci_menhir.mly"
(_1@_2)
# 36748 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots_init =
-# 2050 "parser_cocci_menhir.mly"
+# 2026 "parser_cocci_menhir.mly"
(_2)
# 36776 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots_init =
-# 2051 "parser_cocci_menhir.mly"
+# 2027 "parser_cocci_menhir.mly"
((Ast0.wrap(Ast0.Exp(_1)))::_2)
# 36806 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_dots_init =
-# 2052 "parser_cocci_menhir.mly"
+# 2028 "parser_cocci_menhir.mly"
(_1@_2)
# 36836 "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 =
-# 2055 "parser_cocci_menhir.mly"
+# 2031 "parser_cocci_menhir.mly"
([])
# 36853 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_exp =
-# 2056 "parser_cocci_menhir.mly"
+# 2032 "parser_cocci_menhir.mly"
(_1::_2)
# 36883 "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 =
-# 2065 "parser_cocci_menhir.mly"
+# 2041 "parser_cocci_menhir.mly"
([])
# 36900 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_stm =
-# 2066 "parser_cocci_menhir.mly"
+# 2042 "parser_cocci_menhir.mly"
(_1::_2)
# 36930 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_after_stm =
-# 2067 "parser_cocci_menhir.mly"
+# 2043 "parser_cocci_menhir.mly"
(_1@_2)
# 36960 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_start_toplevel_after_dots_ =
-# 2045 "parser_cocci_menhir.mly"
+# 2021 "parser_cocci_menhir.mly"
( _1::_2 )
# 36990 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_start_toplevel_after_dots_ =
-# 2046 "parser_cocci_menhir.mly"
+# 2022 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.Exp(_1)))::_2 )
# 37020 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_toplevel_seq_start_toplevel_after_dots_ =
-# 2047 "parser_cocci_menhir.mly"
+# 2023 "parser_cocci_menhir.mly"
( _1@_2 )
# 37050 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37083 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 1083 "parser_cocci_menhir.mly"
+# 1059 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Dots(P.clt2mcode "..." a, List.concat w)) )
# 37093 "parser_cocci_menhir.ml"
in
-# 2038 "parser_cocci_menhir.mly"
+# 2014 "parser_cocci_menhir.mly"
( a::b )
# 37099 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_toplevel_after_dots_init = Obj.magic b in
let c0 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37141 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37148 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 1087 "parser_cocci_menhir.mly"
+# 1063 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<..." a, b,
P.clt2mcode "...>" c, List.concat w, false)) )
# 37161 "parser_cocci_menhir.ml"
in
-# 2039 "parser_cocci_menhir.mly"
+# 2015 "parser_cocci_menhir.mly"
( a::b )
# 37167 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let b : 'tv_toplevel_after_dots_init = Obj.magic b in
let c0 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37209 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37216 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 1090 "parser_cocci_menhir.mly"
+# 1066 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<+..." a, b,
P.clt2mcode "...+>" c, List.concat w, true)) )
# 37229 "parser_cocci_menhir.ml"
in
-# 2039 "parser_cocci_menhir.mly"
+# 2015 "parser_cocci_menhir.mly"
( a::b )
# 37235 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c0 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37271 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37278 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 1087 "parser_cocci_menhir.mly"
+# 1063 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<..." a, b,
P.clt2mcode "...>" c, List.concat w, false)) )
# 37291 "parser_cocci_menhir.ml"
in
-# 2040 "parser_cocci_menhir.mly"
+# 2016 "parser_cocci_menhir.mly"
( [a] )
# 37297 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let c0 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37333 "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 : (
-# 141 "parser_cocci_menhir.mly"
+# 117 "parser_cocci_menhir.mly"
(Data.clt)
# 37340 "parser_cocci_menhir.ml"
) = Obj.magic a0 in
let w = w0 in
let a = a0 in
-# 1090 "parser_cocci_menhir.mly"
+# 1066 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Nest(P.clt2mcode "<+..." a, b,
P.clt2mcode "...+>" c, List.concat w, true)) )
# 37353 "parser_cocci_menhir.ml"
in
-# 2040 "parser_cocci_menhir.mly"
+# 2016 "parser_cocci_menhir.mly"
( [a] )
# 37359 "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_ =
-# 2041 "parser_cocci_menhir.mly"
+# 2017 "parser_cocci_menhir.mly"
( (Ast0.wrap(Ast0.Exp(_1)))::_2 )
# 37389 "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_ =
-# 2042 "parser_cocci_menhir.mly"
+# 2018 "parser_cocci_menhir.mly"
( _1@_2 )
# 37419 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_type_ident =
-# 1896 "parser_cocci_menhir.mly"
+# 1872 "parser_cocci_menhir.mly"
( _1 )
# 37443 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 37464 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_type_ident =
-# 1898 "parser_cocci_menhir.mly"
+# 1874 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Id(P.id2mcode _1)) )
# 37471 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 37503 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37508 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 37520 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37526 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37539 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 37571 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37576 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 37588 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37594 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37607 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 37639 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37644 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 37656 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37662 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37675 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 37707 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37712 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 37725 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37731 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37744 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 37785 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 37790 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37795 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37820 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37833 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 37865 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37870 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 37882 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37888 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37901 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 37938 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 37943 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 37948 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 37971 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 37984 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38016 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38021 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 38033 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38039 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38052 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38084 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38089 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 38101 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38107 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38120 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38152 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38157 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 38169 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38175 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38188 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 38220 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38225 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 38238 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38244 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38257 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 38298 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 38303 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38308 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38333 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38346 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38378 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38383 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 38395 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38401 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38414 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38451 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38456 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 38461 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 38484 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38497 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38524 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 38535 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38541 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38554 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38581 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 38592 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38598 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38611 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38638 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 38649 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38655 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38668 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 38695 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 38707 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38713 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38726 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 38762 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 38767 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38791 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38804 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38831 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 38842 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38848 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38861 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38893 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 38898 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 38920 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38933 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 38960 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 643 "parser_cocci_menhir.mly"
+# 619 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 38971 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 38977 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 38990 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 39017 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 645 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 39028 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39034 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39047 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 39074 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 647 "parser_cocci_menhir.mly"
+# 623 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 39085 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39091 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39104 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 39131 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 649 "parser_cocci_menhir.mly"
+# 625 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 39142 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39148 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39161 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 39188 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 651 "parser_cocci_menhir.mly"
+# 627 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 39199 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39205 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39218 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 39245 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 653 "parser_cocci_menhir.mly"
+# 629 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 39256 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39262 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39275 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 39308 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 655 "parser_cocci_menhir.mly"
+# 631 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 39321 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39327 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39340 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39382 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39388 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 39393 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39426 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39439 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39486 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39492 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 39498 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39534 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39547 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 662 "parser_cocci_menhir.mly"
+# 638 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 39589 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39595 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39608 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39650 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39656 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39691 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39704 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39751 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39757 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39796 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39809 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39851 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 39857 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 39862 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 671 "parser_cocci_menhir.mly"
+# 647 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39887 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39900 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 39927 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 675 "parser_cocci_menhir.mly"
+# 651 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 39938 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 39944 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 39957 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 39994 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 39999 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 40012 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40018 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40032 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40069 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40074 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 40087 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40093 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40107 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40144 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40149 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 40162 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40168 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40182 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 40219 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40224 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 40238 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40244 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40258 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 40304 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 40309 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40314 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40340 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40354 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40391 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40396 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 40409 "parser_cocci_menhir.ml"
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40415 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40429 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40471 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40476 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40481 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 680 "parser_cocci_menhir.mly"
+# 656 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Signed r,Some ty)) )
# 40505 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40519 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40556 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40561 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 40574 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 40580 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40594 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40631 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40636 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 40649 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 40655 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40669 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40706 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40711 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 40724 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 40730 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40744 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 40781 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40786 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 40800 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 40806 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "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 p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 40866 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 40871 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let r1 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40876 "parser_cocci_menhir.ml"
) = Obj.magic r1 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 40902 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40916 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 40953 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 40958 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 40971 "parser_cocci_menhir.ml"
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 40977 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 40991 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41033 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41038 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let r0 : (
-# 117 "parser_cocci_menhir.mly"
+# 93 "parser_cocci_menhir.mly"
(Data.clt)
# 41043 "parser_cocci_menhir.ml"
) = Obj.magic r0 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 682 "parser_cocci_menhir.mly"
+# 658 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Signed(P.clt2mcode Ast.Unsigned r,Some ty)) )
# 41067 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41081 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41113 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 617 "parser_cocci_menhir.mly"
+# 593 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.CharType,[P.clt2mcode "char" ty])) )
# 41125 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41131 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41145 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41177 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 619 "parser_cocci_menhir.mly"
+# 595 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.ShortType,[P.clt2mcode "short" ty])) )
# 41189 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41195 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41209 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41241 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 621 "parser_cocci_menhir.mly"
+# 597 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.IntType,[P.clt2mcode "int" ty])) )
# 41253 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41259 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41273 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 41305 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 623 "parser_cocci_menhir.mly"
+# 599 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = p in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 41318 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41324 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41338 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 41379 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let r00 : (
-# 112 "parser_cocci_menhir.mly"
+# 88 "parser_cocci_menhir.mly"
(string)
# 41384 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let p = p0 in
let r = r0 in
-# 626 "parser_cocci_menhir.mly"
+# 602 "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
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41409 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41423 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41455 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 633 "parser_cocci_menhir.mly"
+# 609 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.LongType,[P.clt2mcode "long" ty])) )
# 41467 "parser_cocci_menhir.ml"
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41473 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41487 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty200 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41524 "parser_cocci_menhir.ml"
) = Obj.magic ty200 in
let ty100 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41529 "parser_cocci_menhir.ml"
) = Obj.magic ty100 in
let ty2 = ty20 in
let ty1 = ty10 in
-# 635 "parser_cocci_menhir.mly"
+# 611 "parser_cocci_menhir.mly"
( Ast0.wrap
(Ast0.BaseType
(Ast.LongLongType,
in
-# 683 "parser_cocci_menhir.mly"
+# 659 "parser_cocci_menhir.mly"
( ty )
# 41552 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41566 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 41598 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 643 "parser_cocci_menhir.mly"
+# 619 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.VoidType,[P.clt2mcode "void" ty])) )
# 41610 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 41616 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41630 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41662 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 645 "parser_cocci_menhir.mly"
+# 621 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.DoubleType,[P.clt2mcode "double" ty])) )
# 41674 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 41680 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41694 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 114 "parser_cocci_menhir.mly"
+# 90 "parser_cocci_menhir.mly"
(Data.clt)
# 41726 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 647 "parser_cocci_menhir.mly"
+# 623 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.FloatType,[P.clt2mcode "float" ty])) )
# 41738 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 41744 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41758 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 41790 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 649 "parser_cocci_menhir.mly"
+# 625 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SizeType,[P.clt2mcode "size_t" ty])) )
# 41802 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 41808 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41822 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 41854 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 651 "parser_cocci_menhir.mly"
+# 627 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.SSizeType,[P.clt2mcode "ssize_t" ty])) )
# 41866 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 41872 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41886 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let ty00 : (
-# 115 "parser_cocci_menhir.mly"
+# 91 "parser_cocci_menhir.mly"
(Data.clt)
# 41918 "parser_cocci_menhir.ml"
) = Obj.magic ty00 in
let ty =
let ty = ty0 in
-# 653 "parser_cocci_menhir.mly"
+# 629 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.BaseType(Ast.PtrDiffType,[P.clt2mcode "ptrdiff_t" ty])) )
# 41930 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 41936 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 41950 "parser_cocci_menhir.ml"
in
let m : 'tv_list_TMul_ = Obj.magic m in
let i00 : 'tv_ident = Obj.magic i00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 41988 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let i = i0 in
let s = s0 in
-# 655 "parser_cocci_menhir.mly"
+# 631 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.EnumName(P.clt2mcode "enum" s, Some i)) )
# 42002 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42008 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42022 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42069 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42075 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 42080 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42114 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42128 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42180 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let ids00 : 'tv_enum_decl_list = Obj.magic ids00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42186 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let x000 : 'tv_ident = Obj.magic x000 in
let s00 : (
-# 116 "parser_cocci_menhir.mly"
+# 92 "parser_cocci_menhir.mly"
(Data.clt)
# 42192 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
in
-# 657 "parser_cocci_menhir.mly"
+# 633 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42229 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42243 "parser_cocci_menhir.ml"
in
let i = i0 in
let s = s0 in
-# 662 "parser_cocci_menhir.mly"
+# 638 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.StructUnionName(s, Some i)) )
# 42291 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42297 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42311 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42358 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42364 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42400 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42414 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42466 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42472 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
in
-# 665 "parser_cocci_menhir.mly"
+# 641 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42512 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42526 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let r00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42573 "parser_cocci_menhir.ml"
) = Obj.magic r00 in
let d00 : 'tv_struct_decl_list = Obj.magic d00 in
let l00 : (
-# 169 "parser_cocci_menhir.mly"
+# 145 "parser_cocci_menhir.mly"
(Data.clt)
# 42579 "parser_cocci_menhir.ml"
) = Obj.magic l00 in
let s00 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 42584 "parser_cocci_menhir.ml"
) = Obj.magic s00 in
let l = l0 in
let s = s0 in
-# 671 "parser_cocci_menhir.mly"
+# 647 "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
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42610 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42624 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let m : 'tv_list_TMul_ = Obj.magic m in
let p00 : (
-# 125 "parser_cocci_menhir.mly"
+# 101 "parser_cocci_menhir.mly"
(string * Data.clt)
# 42656 "parser_cocci_menhir.ml"
) = Obj.magic p00 in
let ty =
let p = p0 in
-# 675 "parser_cocci_menhir.mly"
+# 651 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode p)) )
# 42668 "parser_cocci_menhir.ml"
in
-# 684 "parser_cocci_menhir.mly"
+# 660 "parser_cocci_menhir.mly"
( ty )
# 42674 "parser_cocci_menhir.ml"
in
-# 705 "parser_cocci_menhir.mly"
+# 681 "parser_cocci_menhir.mly"
( P.pointerify (P.make_cv cv ty) m )
# 42688 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 42719 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_midzero_list_mctype_mctype_ = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 42725 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let _startpos = _startpos_lp_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_typedef_ctype =
-# 707 "parser_cocci_menhir.mly"
+# 683 "parser_cocci_menhir.mly"
( let (mids,code) = t in
Ast0.wrap
(Ast0.DisjType(P.clt2mcode "(" lp,code,mids, P.clt2mcode ")" rp)) )
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 42755 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_typedef_ctype =
-# 710 "parser_cocci_menhir.mly"
+# 686 "parser_cocci_menhir.mly"
( tmeta_to_type _1 )
# 42762 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_typedef_ident =
-# 1916 "parser_cocci_menhir.mly"
+# 1892 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.TypeName(P.id2mcode _1)) )
# 42786 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 132 "parser_cocci_menhir.mly"
+# 108 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 42807 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_typedef_ident =
-# 1917 "parser_cocci_menhir.mly"
+# 1893 "parser_cocci_menhir.mly"
( tmeta_to_type _1 )
# 42814 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 131 "parser_cocci_menhir.mly"
+# 107 "parser_cocci_menhir.mly"
(Parse_aux.info)
# 42835 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_typedef_ident =
-# 1919 "parser_cocci_menhir.mly"
+# 1895 "parser_cocci_menhir.mly"
( let (nm,pure,clt) = _1 in
Ast0.wrap(Ast0.MetaType(P.clt2mcode nm clt,pure)) )
# 42843 "parser_cocci_menhir.ml"
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1504 "parser_cocci_menhir.mly"
+# 1480 "parser_cocci_menhir.mly"
( _1 )
# 42867 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 42894 "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_ =
-# 1506 "parser_cocci_menhir.mly"
+# 1482 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 42901 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 42928 "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_ =
-# 1508 "parser_cocci_menhir.mly"
+# 1484 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 42935 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_dot_expressions_ =
-# 1510 "parser_cocci_menhir.mly"
+# 1486 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 42965 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 42992 "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_ =
-# 1512 "parser_cocci_menhir.mly"
+# 1488 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43000 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43027 "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_ =
-# 1515 "parser_cocci_menhir.mly"
+# 1491 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 43034 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 43070 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43076 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43081 "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_ =
-# 1517 "parser_cocci_menhir.mly"
+# 1493 "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_ =
-# 1504 "parser_cocci_menhir.mly"
+# 1480 "parser_cocci_menhir.mly"
( _1 )
# 43114 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43141 "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_ =
-# 1506 "parser_cocci_menhir.mly"
+# 1482 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 43148 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43175 "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_ =
-# 1508 "parser_cocci_menhir.mly"
+# 1484 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 43182 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_invalid_ =
-# 1510 "parser_cocci_menhir.mly"
+# 1486 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43212 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43239 "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_ =
-# 1512 "parser_cocci_menhir.mly"
+# 1488 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43247 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43274 "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_ =
-# 1515 "parser_cocci_menhir.mly"
+# 1491 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 43281 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 43317 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43323 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43328 "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_ =
-# 1517 "parser_cocci_menhir.mly"
+# 1493 "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_ =
-# 1504 "parser_cocci_menhir.mly"
+# 1480 "parser_cocci_menhir.mly"
( _1 )
# 43361 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43388 "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_ =
-# 1506 "parser_cocci_menhir.mly"
+# 1482 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 43395 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43422 "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_ =
-# 1508 "parser_cocci_menhir.mly"
+# 1484 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 43429 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_eexpr_nest_expressions_ =
-# 1510 "parser_cocci_menhir.mly"
+# 1486 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43459 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43486 "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_ =
-# 1512 "parser_cocci_menhir.mly"
+# 1488 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43494 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43521 "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_ =
-# 1515 "parser_cocci_menhir.mly"
+# 1491 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 43528 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 43564 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43570 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43575 "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_ =
-# 1517 "parser_cocci_menhir.mly"
+# 1493 "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_ =
-# 1504 "parser_cocci_menhir.mly"
+# 1480 "parser_cocci_menhir.mly"
( _1 )
# 43608 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43635 "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_ =
-# 1506 "parser_cocci_menhir.mly"
+# 1482 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 43642 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43669 "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_ =
-# 1508 "parser_cocci_menhir.mly"
+# 1484 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 43676 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_expr_invalid_ =
-# 1510 "parser_cocci_menhir.mly"
+# 1486 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43706 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43733 "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_ =
-# 1512 "parser_cocci_menhir.mly"
+# 1488 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43741 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43768 "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_ =
-# 1515 "parser_cocci_menhir.mly"
+# 1491 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 43775 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 43811 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43817 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 43822 "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_ =
-# 1517 "parser_cocci_menhir.mly"
+# 1493 "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_bis =
-# 1523 "parser_cocci_menhir.mly"
+# 1499 "parser_cocci_menhir.mly"
( _1 )
# 43855 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43882 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_bis =
-# 1525 "parser_cocci_menhir.mly"
+# 1501 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Inc _1)) )
# 43889 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 153 "parser_cocci_menhir.mly"
+# 129 "parser_cocci_menhir.mly"
(Data.clt)
# 43916 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_bis =
-# 1527 "parser_cocci_menhir.mly"
+# 1503 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.Infix (_2, P.clt2mcode Ast.Dec _1)) )
# 43923 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_bis =
-# 1529 "parser_cocci_menhir.mly"
+# 1505 "parser_cocci_menhir.mly"
( let mcode = _1 in Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43953 "parser_cocci_menhir.ml"
in
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 43980 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_bis =
-# 1531 "parser_cocci_menhir.mly"
+# 1507 "parser_cocci_menhir.mly"
( let mcode = P.clt2mcode Ast.Not _1 in
Ast0.wrap(Ast0.Unary(_2, mcode)) )
# 43988 "parser_cocci_menhir.ml"
} = _menhir_stack in
let _2 : 'tv_unary_expr_bis = Obj.magic _2 in
let _1 : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 44015 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_unary_expr_bis =
-# 1534 "parser_cocci_menhir.mly"
+# 1510 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.SizeOfExpr (P.clt2mcode "sizeof" _1, _2)) )
# 44022 "parser_cocci_menhir.ml"
in
};
} = _menhir_stack in
let rp : (
-# 145 "parser_cocci_menhir.mly"
+# 121 "parser_cocci_menhir.mly"
(Data.clt)
# 44058 "parser_cocci_menhir.ml"
) = Obj.magic rp in
let t : 'tv_ctype = Obj.magic t in
let lp : (
-# 144 "parser_cocci_menhir.mly"
+# 120 "parser_cocci_menhir.mly"
(Data.clt)
# 44064 "parser_cocci_menhir.ml"
) = Obj.magic lp in
let s : (
-# 124 "parser_cocci_menhir.mly"
+# 100 "parser_cocci_menhir.mly"
(Data.clt)
# 44069 "parser_cocci_menhir.ml"
) = Obj.magic s in
let _startpos = _startpos_s_ in
let _endpos = _endpos_rp_ in
let _v : 'tv_unary_expr_bis =
-# 1536 "parser_cocci_menhir.mly"
+# 1512 "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 : (
-# 161 "parser_cocci_menhir.mly"
+# 137 "parser_cocci_menhir.mly"
(Data.clt)
# 44099 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1540 "parser_cocci_menhir.mly"
+# 1516 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.GetRef _1 )
# 44106 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 44127 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1541 "parser_cocci_menhir.mly"
+# 1517 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.DeRef _1 )
# 44134 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 44155 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1542 "parser_cocci_menhir.mly"
+# 1518 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.UnPlus _1 )
# 44162 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 166 "parser_cocci_menhir.mly"
+# 142 "parser_cocci_menhir.mly"
(Data.clt)
# 44183 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1543 "parser_cocci_menhir.mly"
+# 1519 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.UnMinus _1 )
# 44190 "parser_cocci_menhir.ml"
in
MenhirLib.EngineTypes.next = _menhir_stack;
} = _menhir_stack in
let _1 : (
-# 167 "parser_cocci_menhir.mly"
+# 143 "parser_cocci_menhir.mly"
(Data.clt)
# 44211 "parser_cocci_menhir.ml"
) = Obj.magic _1 in
let _startpos = _startpos__1_ in
let _endpos = _endpos__1_ in
let _v : 'tv_unary_op =
-# 1544 "parser_cocci_menhir.mly"
+# 1520 "parser_cocci_menhir.mly"
( P.clt2mcode Ast.Tilde _1 )
# 44218 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_when_start =
-# 2169 "parser_cocci_menhir.mly"
+# 2145 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS((Ast0.wrap(Ast0.Exp(_1)))::_2)) )
# 44248 "parser_cocci_menhir.ml"
in
let _startpos = _startpos__1_ in
let _endpos = _endpos__2_ in
let _v : 'tv_when_start =
-# 2171 "parser_cocci_menhir.mly"
+# 2147 "parser_cocci_menhir.mly"
( Ast0.wrap(Ast0.DOTS(_1@_2)) )
# 44278 "parser_cocci_menhir.ml"
in
let _startpos = _startpos_w_ in
let _endpos = _endpos_w_ in
let _v : 'tv_whenppdecs =
-# 1094 "parser_cocci_menhir.mly"
+# 1070 "parser_cocci_menhir.mly"
( w )
# 44302 "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_ =
-# 2216 "parser_cocci_menhir.mly"
+# 2192 "parser_cocci_menhir.mly"
( [Ast0.WhenNot w] )
# 44338 "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_ =
-# 2217 "parser_cocci_menhir.mly"
+# 2193 "parser_cocci_menhir.mly"
( [Ast0.WhenAlways w] )
# 44374 "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_ =
-# 2219 "parser_cocci_menhir.mly"
+# 2195 "parser_cocci_menhir.mly"
( List.map (function x -> Ast0.WhenModifier(x)) _2 )
# 44406 "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_ =
-# 2220 "parser_cocci_menhir.mly"
+# 2196 "parser_cocci_menhir.mly"
( [Ast0.WhenNotTrue e] )
# 44442 "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_ =
-# 2221 "parser_cocci_menhir.mly"
+# 2197 "parser_cocci_menhir.mly"
( [Ast0.WhenNotFalse e] )
# 44478 "parser_cocci_menhir.ml"
in
let rec script_meta_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 2038 lexer lexbuf) : (
-# 229 "parser_cocci_menhir.mly"
+# 205 "parser_cocci_menhir.mly"
((string option (*string*) * string option (*ast*)) * (Ast_cocci.meta_name * Ast_cocci.metavar) option)
# 44502 "parser_cocci_menhir.ml"
))
and rule_name =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1963 lexer lexbuf) : (
-# 223 "parser_cocci_menhir.mly"
+# 199 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 44510 "parser_cocci_menhir.ml"
))
and reinit =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1961 lexer lexbuf) : (
-# 201 "parser_cocci_menhir.mly"
+# 177 "parser_cocci_menhir.mly"
(unit)
# 44518 "parser_cocci_menhir.ml"
))
and plus_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1925 lexer lexbuf) : (
-# 210 "parser_cocci_menhir.mly"
+# 186 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 44526 "parser_cocci_menhir.ml"
))
and plus_exp_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1917 lexer lexbuf) : (
-# 213 "parser_cocci_menhir.mly"
+# 189 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 44534 "parser_cocci_menhir.ml"
))
and never_used =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1911 lexer lexbuf) : (
-# 238 "parser_cocci_menhir.mly"
+# 214 "parser_cocci_menhir.mly"
(unit)
# 44542 "parser_cocci_menhir.ml"
))
and minus_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1826 lexer lexbuf) : (
-# 204 "parser_cocci_menhir.mly"
+# 180 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 44550 "parser_cocci_menhir.ml"
))
and minus_exp_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1814 lexer lexbuf) : (
-# 207 "parser_cocci_menhir.mly"
+# 183 "parser_cocci_menhir.mly"
(Ast0_cocci.rule)
# 44558 "parser_cocci_menhir.ml"
))
and meta_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1811 lexer lexbuf) : (
-# 227 "parser_cocci_menhir.mly"
+# 203 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 44566 "parser_cocci_menhir.ml"
))
and iso_rule_name =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1807 lexer lexbuf) : (
-# 219 "parser_cocci_menhir.mly"
+# 195 "parser_cocci_menhir.mly"
(Ast_cocci.rulename)
# 44574 "parser_cocci_menhir.ml"
))
and iso_meta_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 1528 lexer lexbuf) : (
-# 235 "parser_cocci_menhir.mly"
+# 211 "parser_cocci_menhir.mly"
((Ast_cocci.metavar,Ast_cocci.metavar) Common.either list)
# 44582 "parser_cocci_menhir.ml"
))
and iso_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 18 lexer lexbuf) : (
-# 232 "parser_cocci_menhir.mly"
+# 208 "parser_cocci_menhir.mly"
(Ast0_cocci.anything list list)
# 44590 "parser_cocci_menhir.ml"
))
and include_main =
fun lexer lexbuf ->
(Obj.magic (MenhirInterpreter.entry 0 lexer lexbuf) : (
-# 216 "parser_cocci_menhir.mly"
+# 192 "parser_cocci_menhir.mly"
(Data.incl_iso list)
# 44598 "parser_cocci_menhir.ml"
))