[svn] r6103: nemerle/trunk: macros/Nemerle.n ncc/testsuite/positive/lazy.n

[nazgul]

Log:
Allow lazy literals

Author: nazgul
Date: Tue Jan 31 18:14:15 2006
New Revision: 6103

Modified:
   nemerle/trunk/macros/Nemerle.n
   nemerle/trunk/ncc/testsuite/positive/lazy.n

Modified: nemerle/trunk/macros/Nemerle.n
==============================================================================
--- nemerle/trunk/macros/Nemerle.n	(original)
+++ nemerle/trunk/macros/Nemerle.n	Tue Jan 31 18:14:15 2006
@@ -45,7 +45,7 @@
   
   macro lazy (val) {
     match (val) {
-      | PT.PExpr.Literal => <[ Utility.Internal.Lazy.FromValue ($val) ]>
+      | PT.PExpr.Literal => <[ LazyValue.FromValue ($val) ]>
       | _ => <[ Nemerle.LazyValue (fun () { $val }) ]>
     }
   }

Modified: nemerle/trunk/ncc/testsuite/positive/lazy.n
==============================================================================
--- nemerle/trunk/ncc/testsuite/positive/lazy.n	(original)
+++ nemerle/trunk/ncc/testsuite/positive/lazy.n	Tue Jan 31 18:14:15 2006
@@ -27,6 +27,13 @@
     }
   }
   
+  static LazyLiteral () : LazyValue [double]
+  {
+    def x = lazy (7.0);
+    assert (x == 7.0);
+    x
+  }
+  
   public static Main() : void
   {
     def laz = lazy (SideEffect + 1);
@@ -49,6 +56,8 @@
       inflist = inflist.Next;
     }
     IO.printf ("\n");
+    
+    _ = LazyLiteral ();
   }
 }