Changeset 10853 for src/Pugs/CodeGen

Timestamp:

06/23/06 16:15:48 (2 years ago)

Author:

audreyt

Message:

* CodeGen?.PIR: DebolazX++ reported that our new OUTER:: resolution

doesn't play well with PIR codegen yet. before we figure out a
good outer_sub call in PIR, just pretend there's no shadowing.

Files:

• src/Pugs/CodeGen/PIR.hs (modified) (1 diff)

src/Pugs/CodeGen/PIR.hs

@@ -179 +179 @@
         tell [StmtRaw (text "errorson .PARROT_ERRORS_GLOBALS_FLAG")]
         return pmc
+    -- XXX - hack to erase OUTER before we have proper pad uplevel support
+    trans (PVar name)
+        | Just (package, name') <- breakOnGlue "::" name
+        , Just (sig, "") <- breakOnGlue "OUTER" package
+        = trans $ PVar (sig ++ name')
     trans (PVar name) = do
         pmc     <- genScalar "lex"