[svn]
r6344: nemerle/trunk/ncc/testsuite/completion-playground/compl2.n
trupill
svnadmin at nemerle.org
Sat May 27 22:41:49 CEST 2006
Log:
Change completion testcases to the new compiler mechanism
Author: trupill
Date: Sat May 27 22:41:48 2006
New Revision: 6344
Modified:
nemerle/trunk/ncc/testsuite/completion-playground/compl2.n
Modified: nemerle/trunk/ncc/testsuite/completion-playground/compl2.n
==============================================================================
--- nemerle/trunk/ncc/testsuite/completion-playground/compl2.n (original)
+++ nemerle/trunk/ncc/testsuite/completion-playground/compl2.n Sat May 27 22:41:48 2006
@@ -4,6 +4,7 @@
using System.IO;
using System.Console;
+def engine = Engine ();
def files = Hashtable ();
def rawArgs = List.FromArray (System.Environment.GetCommandLineArgs ());
def (progName, args) = rawArgs.Head::rawArgs.Tail;
@@ -17,13 +18,13 @@
foreach (arg in args) {
using (sr = StreamReader (arg)) {
def str = sr.ReadToEnd ();
- Engine.Sources.Add (arg, str);
+ engine.Sources.Add (arg, str);
files [arg] = str;
}
}
-def type_tree = Engine.GetTypeTree ();
-def _second_tree = Engine.GetTypeTree ();
+def type_tree = engine.GetTypeTree ();
+def _second_tree = engine.GetTypeTree ();
mutable the_method = null;
System.Console.WriteLine ("FOUND TYPES\n===========");
@@ -41,7 +42,7 @@
def try_completion (body) {
System.Console.WriteLine ("\nTrying to complete:");
System.Console.WriteLine (body);
- def info = Engine.RunCompletionEngine (the_method, body);
+ def info = engine.RunCompletionEngine (the_method, body);
if (info == null) {
System.Console.WriteLine ("NO MEMBER FOUND");
}
More information about the svn
mailing list