Changeset 12822 for src/Pugs/Run
- Timestamp:
- 08/28/06 23:17:44 (2 years ago)
- Files:
-
- 1 modified
-
src/Pugs/Run/Perl5.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Run/Perl5.hs
r12324 r12822 77 77 _ -> Val sub 78 78 val <- runEvalIO env $ 79 evalExp (Ann (Cxt (cxtEnum cxt)) $ App subExp (fmap Val inv) (map Val args)) 79 evalExp (Ann (Cxt (cxtEnum cxt)) $ 80 App subExp (fmap Val inv) (map Val args)) 80 81 newSVval val 81 82
