Commit bd68ab08 by Zachary Snow

faster parsing of very long files

parent c03dba09
...@@ -643,8 +643,8 @@ Direction :: { Direction } ...@@ -643,8 +643,8 @@ Direction :: { Direction }
ModuleItems :: { [ModuleItem] } ModuleItems :: { [ModuleItem] }
: {- empty -} { [] } : {- empty -} { [] }
| ModuleItems MITrace ModuleItem { $1 ++ [$2] ++ $3 } | ";" ModuleItems { $2 }
| ModuleItems ";" { $1 } | MITrace ModuleItem ModuleItems { $1 : $2 ++ $3 }
ModuleItem :: { [ModuleItem] } ModuleItem :: { [ModuleItem] }
: NonGenerateModuleItem { $1 } : NonGenerateModuleItem { $1 }
...@@ -777,8 +777,8 @@ LHSAsgn :: { (LHS, Expr) } ...@@ -777,8 +777,8 @@ LHSAsgn :: { (LHS, Expr) }
PackageItems :: { [PackageItem] } PackageItems :: { [PackageItem] }
: {- empty -} { [] } : {- empty -} { [] }
| PackageItems ";" { $1 } | ";" PackageItems { $2 }
| PackageItems PITrace PackageItem { $1 ++ [$2] ++ $3 } | PITrace PackageItem PackageItems { $1 : $2 ++ $3 }
PackageItem :: { [PackageItem] } PackageItem :: { [PackageItem] }
: DeclTokens(";") { map Decl $ parseDTsAsDecls $1 } : DeclTokens(";") { map Decl $ parseDTsAsDecls $1 }
| ParameterDecl(";") { map Decl $1 } | ParameterDecl(";") { map Decl $1 }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment