[svn] r6272: nemerle/trunk/ncc/testsuite: example.res positive/resource.n

[malekith]

Log:
Test resources (doesn't work on mono).

Author: malekith
Date: Sun May 14 17:16:12 2006
New Revision: 6272

Added:
   nemerle/trunk/ncc/testsuite/example.res
Modified:
   nemerle/trunk/ncc/testsuite/positive/resource.n

Added: nemerle/trunk/ncc/testsuite/example.res
==============================================================================
--- (empty file)
+++ nemerle/trunk/ncc/testsuite/example.res	Sun May 14 17:16:12 2006
@@ -0,0 +1 @@
+Hello world!

Modified: nemerle/trunk/ncc/testsuite/positive/resource.n
==============================================================================
--- nemerle/trunk/ncc/testsuite/positive/resource.n	(original)
+++ nemerle/trunk/ncc/testsuite/positive/resource.n	Sun May 14 17:16:12 2006
@@ -1,4 +1,5 @@
 // OPTIONS:  -res:README
+// OPTIONS:  -res:example.res
 // OPTIONS:  -linkres:test.n
 
 using System.Reflection;
@@ -8,7 +9,13 @@
 assert (System.Array.IndexOf (res, "README") != -1);
 assert (System.Array.IndexOf (res, "test.n") != -1);
 
+def str = Assembly.GetExecutingAssembly ().GetManifestResourceStream("example.res");
+def tr = System.IO.StreamReader (str);
+System.Console.WriteLine (tr.ReadToEnd ());
+
 /*
 BEGIN-OUTPUT
+Hello world!
+
 END-OUTPUT
 */