Changeset 16437
- Timestamp:
- 05/18/07 22:18:14 (18 months ago)
- Files:
-
- 1 modified
-
src/Pugs/Parser.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Parser.hs
r16436 r16437 2109 2109 pos <- getPosition 2110 2110 when (sourceName pos /= "-e") $ do 2111 fail $ " Global symbol \"" ++ show var ++ "\" requiresexplicit package name"2111 fail $ "Variable " ++ show var ++ " requires predeclaraton or explicit package name" 2112 2112 return (Var $ toGlobalVar var) 2113 2113 -- put state{ s_freeVars = Set.insert (var, lexPads) freeVars }
