Changeset 32 for src/Internals.hs

Timestamp:

02/16/05 18:48:28 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

1041

Message:

* Code literals -- "sub", "pointy" and "bare" variants all works
* Lexical subroutine declarations via "my sub"
* Global subroutine and variables work again, via the envGlobal pad
* The "say", "exit", "die" primitives
* Bool.perl now prints correct literals (lwall)
* Blocks under void contexts now evaluates automatically
* The "..." (dotdotdot) literal

Files:

• src/Internals.hs (modified) (1 diff)

src/Internals.hs

@@ -78 +78 @@
     show = show . hashUnique
 instance Show (a -> b) where
-    show f = "sub { ... }"
+    show f = "(->)"
 instance Eq (a -> b) where
     _ == _ = False