Changeset 13614 for src/Pugs/Compile.hs

Timestamp:

09/25/06 13:11:43 (2 years ago)

Author:

audreyt

Message:

* The main package is now ::Main, not ::main.

Files:

• src/Pugs/Compile.hs (modified) (1 diff)

src/Pugs/Compile.hs

@@ -100 +100 @@
                 initL   = "__init_" ++ (render $ varText name)
                 name' | ':' `elem` name = name
-                      | otherwise = "main::" ++ name -- XXX wrong
+                      | otherwise = "Main::" ++ name -- XXX wrong
             return [PSub initL SubPrim [] False False bodyC]
         canCompile _ = return []