Changeset 16448

Timestamp:

05/19/07 00:33:28 (18 months ago)

Author:

audreyt

Message:

* Allow params to refer to themselves in their initializing

expressions, for example:

sub f ($x = sub { $x }) { ... }
my $x = sub { $x }

Files:

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

src/Pugs/Parser.hs

@@ -519 +519 @@
 
     -- XXX - RIGHT HERE, add this one to CompPad?
+    modify $ \state -> state
+        { s_knownVars = Map.insert (cast name) (fromJust . envCompPad $ s_env state) (s_knownVars state) }
 
     rv <- case opt of