Allowed pragmas at the top-level of an occam file

2009-03-24 02:15:23 +00:00 · 2009-03-24 02:15:23 +00:00 · 030e06f173
commit 030e06f173
parent b100b828e1
1 changed files with 1 additions and 0 deletions
--- a/frontends/ParseOccam.hs
+++ b/frontends/ParseOccam.hs
@ -1812,6 +1812,7 @@ topLevelItem :: OccParser A.AST
 topLevelItem
    =   handleSpecs (allocation <|> specification) topLevelItem
                    (\m s inner -> A.Spec m s inner)
+    <|> (pragma >> topLevelItem)
    <|> do m <- md
           eof
           -- Stash the current locals so that we can either restore them