perl.cvs.parrot
[Top] [All Lists]

[svn:parrot] r33862 - trunk/languages/dotnet/t

Subject: [svn:parrot] r33862 - trunk/languages/dotnet/t
From:
Date: Sat, 13 Dec 2008 11:46:22 -0800 PST
Newsgroups: perl.cvs.parrot

Author: fperrad
Date: Sat Dec 13 11:46:19 2008
New Revision: 33862

Modified:
   trunk/languages/dotnet/t/args.t
   trunk/languages/dotnet/t/array.t
   trunk/languages/dotnet/t/bitwise.t
   trunk/languages/dotnet/t/box.t
   trunk/languages/dotnet/t/branch.t
   trunk/languages/dotnet/t/calling.t
   trunk/languages/dotnet/t/callvirt.t
   trunk/languages/dotnet/t/castclass.t
   trunk/languages/dotnet/t/compare.t
   trunk/languages/dotnet/t/conditional.t
   trunk/languages/dotnet/t/constants.t
   trunk/languages/dotnet/t/constructor.t
   trunk/languages/dotnet/t/conv.t
   trunk/languages/dotnet/t/convovf.t
   trunk/languages/dotnet/t/enum.t
   trunk/languages/dotnet/t/exceptions.t
   trunk/languages/dotnet/t/external.t
   trunk/languages/dotnet/t/field.t
   trunk/languages/dotnet/t/finally.t
   trunk/languages/dotnet/t/floatarray.t
   trunk/languages/dotnet/t/hierachy.t
   trunk/languages/dotnet/t/i8.t
   trunk/languages/dotnet/t/inheritance.t
   trunk/languages/dotnet/t/initializer.t
   trunk/languages/dotnet/t/intarray.t
   trunk/languages/dotnet/t/interface.t
   trunk/languages/dotnet/t/isinst.t
   trunk/languages/dotnet/t/locals.t
   trunk/languages/dotnet/t/loop.t
   trunk/languages/dotnet/t/math.t
   trunk/languages/dotnet/t/mathovf.t
   trunk/languages/dotnet/t/mp.t
   trunk/languages/dotnet/t/mp_pmc.t
   trunk/languages/dotnet/t/null.t
   trunk/languages/dotnet/t/overloading.t
   trunk/languages/dotnet/t/overloadprimitives.t
   trunk/languages/dotnet/t/recursion.t
   trunk/languages/dotnet/t/staticfield.t
   trunk/languages/dotnet/t/staticmethod.t
   trunk/languages/dotnet/t/string.t
   trunk/languages/dotnet/t/switch.t
   trunk/languages/dotnet/t/unsigned.t
   trunk/languages/dotnet/t/valuetypes.t

Log:
[dotnet]
- update PIR syntax (Bareword method name)

Modified: trunk/languages/dotnet/t/args.t
==============================================================================
--- trunk/languages/dotnet/t/args.t     (original)
+++ trunk/languages/dotnet/t/args.t     Sat Dec 13 11:46:19 2008
@@ -50,7 +50,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.no_args()
+       $I0 = obj."no_args"()
        print $I0
        print "\n"
 .end
@@ -64,11 +64,11 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
        $I0 = 42
-       $I1 = obj.one_arg($I0)
+       $I1 = obj."one_arg"($I0)
        print $I1
        print "\n"
        $I0 = 7
-       $I1 = obj.one_arg($I0)
+       $I1 = obj."one_arg"($I0)
        print $I1
        print "\n"
 .end
@@ -82,7 +82,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.three_args(1,2,3)
+       $I0 = obj."three_args"(1,2,3)
        print $I0
        print "\n"
 .end
@@ -95,7 +95,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.ten_args(1,2,3,4,5,6,7,8,9,10)
+       $I0 = obj."ten_args"(1,2,3,4,5,6,7,8,9,10)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/array.t
==============================================================================
--- trunk/languages/dotnet/t/array.t    (original)
+++ trunk/languages/dotnet/t/array.t    Sat Dec 13 11:46:19 2008
@@ -67,7 +67,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.create_array()
+       $P0 = obj."create_array"()
        print $P0
        print "\n"
 .end
@@ -80,8 +80,8 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.create_array()
-       $I1 = obj.array_length($P0)
+       $P0 = obj."create_array"()
+       $I1 = obj."array_length"($P0)
        print $I1
        print "\n"
 .end
@@ -94,7 +94,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.create_and_length()
+       $I0 = obj."create_and_length"()
        print $I0
        print "\n"
 .end
@@ -107,7 +107,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.loadstore_test()
+       $I0 = obj."loadstore_test"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/bitwise.t
==============================================================================
--- trunk/languages/dotnet/t/bitwise.t  (original)
+++ trunk/languages/dotnet/t/bitwise.t  Sat Dec 13 11:46:19 2008
@@ -59,7 +59,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.and(65, 1088)
+       $I0 = obj."and"(65, 1088)
        print $I0
        print "\n"
 .end
@@ -72,7 +72,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.or(65, 1024)
+       $I0 = obj."or"(65, 1024)
        print $I0
        print "\n"
 .end
@@ -85,7 +85,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.xor(0xF0, 0x77)
+       $I0 = obj."xor"(0xF0, 0x77)
        print $I0
        print "\n"
 .end
@@ -98,7 +98,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.not(0xFFFFFFF0)
+       $I0 = obj."not"(0xFFFFFFF0)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/box.t
==============================================================================
--- trunk/languages/dotnet/t/box.t      (original)
+++ trunk/languages/dotnet/t/box.t      Sat Dec 13 11:46:19 2008
@@ -58,7 +58,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.box_1()
+       $I0 = obj."box_1"()
        print $I0
     print "\n"
 .end
@@ -71,7 +71,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.box_2()
+       $I0 = obj."box_2"()
        print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/branch.t
==============================================================================
--- trunk/languages/dotnet/t/branch.t   (original)
+++ trunk/languages/dotnet/t/branch.t   Sat Dec 13 11:46:19 2008
@@ -47,7 +47,7 @@
                                return 1;
                        else
                                return 0;
-        }              
+        }
     }
 }
 CSHARP
@@ -61,19 +61,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.lt(5,7)
+       $I0 = obj."lt"(5,7)
        print $I0
        print "\n"
-       $I0 = obj.lt(400,8)
+       $I0 = obj."lt"(400,8)
        print $I0
        print "\n"
-       $I0 = obj.lt(5,-7)
+       $I0 = obj."lt"(5,-7)
        print $I0
        print "\n"
-       $I0 = obj.lt(-400,8123)
+       $I0 = obj."lt"(-400,8123)
        print $I0
        print "\n"
-       $I0 = obj.lt(4,4)
+       $I0 = obj."lt"(4,4)
        print $I0
        print "\n"
 .end
@@ -90,19 +90,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.le(5,7)
+       $I0 = obj."le"(5,7)
        print $I0
        print "\n"
-       $I0 = obj.le(400,8)
+       $I0 = obj."le"(400,8)
        print $I0
        print "\n"
-       $I0 = obj.le(5,-7)
+       $I0 = obj."le"(5,-7)
        print $I0
        print "\n"
-       $I0 = obj.le(-400,8123)
+       $I0 = obj."le"(-400,8123)
        print $I0
        print "\n"
-       $I0 = obj.le(4,4)
+       $I0 = obj."le"(4,4)
        print $I0
        print "\n"
 .end
@@ -119,19 +119,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.gt(5,7)
+       $I0 = obj."gt"(5,7)
        print $I0
        print "\n"
-       $I0 = obj.gt(400,8)
+       $I0 = obj."gt"(400,8)
        print $I0
        print "\n"
-       $I0 = obj.gt(5,-7)
+       $I0 = obj."gt"(5,-7)
        print $I0
        print "\n"
-       $I0 = obj.gt(-400,8123)
+       $I0 = obj."gt"(-400,8123)
        print $I0
        print "\n"
-       $I0 = obj.gt(4,4)
+       $I0 = obj."gt"(4,4)
        print $I0
        print "\n"
 .end
@@ -148,19 +148,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.ge(5,7)
+       $I0 = obj."ge"(5,7)
        print $I0
        print "\n"
-       $I0 = obj.ge(400,8)
+       $I0 = obj."ge"(400,8)
        print $I0
        print "\n"
-       $I0 = obj.ge(5,-7)
+       $I0 = obj."ge"(5,-7)
        print $I0
        print "\n"
-       $I0 = obj.ge(-400,8123)
+       $I0 = obj."ge"(-400,8123)
        print $I0
        print "\n"
-       $I0 = obj.ge(4,4)
+       $I0 = obj."ge"(4,4)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/calling.t
==============================================================================
--- trunk/languages/dotnet/t/calling.t  (original)
+++ trunk/languages/dotnet/t/calling.t  Sat Dec 13 11:46:19 2008
@@ -71,7 +71,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.call_no_args(29)
+       $I0 = obj."call_no_args"(29)
     print $I0
     print "\n"
 .end
@@ -84,7 +84,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.call_one_arg()
+       $I0 = obj."call_one_arg"()
     print $I0
     print "\n"
 .end
@@ -97,7 +97,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.call_many_args(2, 3)
+       $I0 = obj."call_many_args"(2, 3)
     print $I0
     print "\n"
 .end
@@ -110,7 +110,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.call_void()
+       $I0 = obj."call_void"()
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/callvirt.t
==============================================================================
--- trunk/languages/dotnet/t/callvirt.t (original)
+++ trunk/languages/dotnet/t/callvirt.t Sat Dec 13 11:46:19 2008
@@ -53,7 +53,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "mummy" ]
-       $I0 = obj1.test_call(obj2)
+       $I0 = obj1."test_call"(obj2)
     print $I0
     print "\n"
 .end
@@ -67,7 +67,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "baby" ]
-       $I0 = obj1.test_call(obj2)
+       $I0 = obj1."test_call"(obj2)
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/castclass.t
==============================================================================
--- trunk/languages/dotnet/t/castclass.t        (original)
+++ trunk/languages/dotnet/t/castclass.t        Sat Dec 13 11:46:19 2008
@@ -56,7 +56,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.pos()
+       $I0 = obj."pos"()
     print $I0
     print "\n"
 .end
@@ -70,7 +70,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh caught
-       $I0 = obj.neg()
+       $I0 = obj."neg"()
     print "not "
 caught:
     print "ok\n"

Modified: trunk/languages/dotnet/t/compare.t
==============================================================================
--- trunk/languages/dotnet/t/compare.t  (original)
+++ trunk/languages/dotnet/t/compare.t  Sat Dec 13 11:46:19 2008
@@ -60,16 +60,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.is_same(0, 0)
+       $I0 = obj."is_same"(0, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_same(0, 1)
+    $I0 = obj."is_same"(0, 1)
        print $I0
        print "\n"
-    $I0 = obj.is_same(1, 0)
+    $I0 = obj."is_same"(1, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_same(42, 42)
+    $I0 = obj."is_same"(42, 42)
        print $I0
        print "\n"
 .end
@@ -85,16 +85,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.is_lt(0, 0)
+       $I0 = obj."is_lt"(0, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_lt(0, 1)
+    $I0 = obj."is_lt"(0, 1)
        print $I0
        print "\n"
-    $I0 = obj.is_lt(1, 0)
+    $I0 = obj."is_lt"(1, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_lt(42, 42)
+    $I0 = obj."is_lt"(42, 42)
        print $I0
        print "\n"
 .end
@@ -110,16 +110,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.is_lt_un(0, 0)
+       $I0 = obj."is_lt_un"(0, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_lt_un(0, 1)
+    $I0 = obj."is_lt_un"(0, 1)
        print $I0
        print "\n"
-    $I0 = obj.is_lt_un(1, 0)
+    $I0 = obj."is_lt_un"(1, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_lt_un(42, 42)
+    $I0 = obj."is_lt_un"(42, 42)
        print $I0
        print "\n"
 .end
@@ -135,16 +135,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.is_gt(0, 0)
+       $I0 = obj."is_gt"(0, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_gt(0, 1)
+    $I0 = obj."is_gt"(0, 1)
        print $I0
        print "\n"
-    $I0 = obj.is_gt(1, 0)
+    $I0 = obj."is_gt"(1, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_gt(42, 42)
+    $I0 = obj."is_gt"(42, 42)
        print $I0
        print "\n"
 .end
@@ -160,16 +160,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.is_gt_un(0, 0)
+       $I0 = obj."is_gt_un"(0, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_gt_un(0, 1)
+    $I0 = obj."is_gt_un"(0, 1)
        print $I0
        print "\n"
-    $I0 = obj.is_gt_un(1, 0)
+    $I0 = obj."is_gt_un"(1, 0)
        print $I0
        print "\n"
-    $I0 = obj.is_gt_un(42, 42)
+    $I0 = obj."is_gt_un"(42, 42)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/conditional.t
==============================================================================
--- trunk/languages/dotnet/t/conditional.t      (original)
+++ trunk/languages/dotnet/t/conditional.t      Sat Dec 13 11:46:19 2008
@@ -58,19 +58,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.clip(0)
+       $I0 = obj."clip"(0)
        print $I0
        print "\n"
-       $I0 = obj.clip(1)
+       $I0 = obj."clip"(1)
        print $I0
        print "\n"
-       $I0 = obj.clip(-1)
+       $I0 = obj."clip"(-1)
        print $I0
        print "\n"
-       $I0 = obj.clip(-500)
+       $I0 = obj."clip"(-500)
        print $I0
        print "\n"
-       $I0 = obj.clip(42)
+       $I0 = obj."clip"(42)
        print $I0
        print "\n"
 .end
@@ -87,22 +87,22 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.band_pass(1)
+       $I0 = obj."band_pass"(1)
        print $I0
        print "\n"
-       $I0 = obj.band_pass(2)
+       $I0 = obj."band_pass"(2)
        print $I0
        print "\n"
-       $I0 = obj.band_pass(3)
+       $I0 = obj."band_pass"(3)
        print $I0
        print "\n"
-       $I0 = obj.band_pass(4)
+       $I0 = obj."band_pass"(4)
        print $I0
        print "\n"
-       $I0 = obj.band_pass(5)
+       $I0 = obj."band_pass"(5)
        print $I0
        print "\n"
-       $I0 = obj.band_pass(6)
+       $I0 = obj."band_pass"(6)
        print $I0
        print "\n"
 .end
@@ -120,16 +120,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.is_42(99)
+       $I0 = obj."is_42"(99)
        print $I0
        print "\n"
-       $I0 = obj.is_42(-2)
+       $I0 = obj."is_42"(-2)
        print $I0
        print "\n"
-       $I0 = obj.is_42(42)
+       $I0 = obj."is_42"(42)
        print $I0
        print "\n"
-       $I0 = obj.is_42(-42)
+       $I0 = obj."is_42"(-42)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/constants.t
==============================================================================
--- trunk/languages/dotnet/t/constants.t        (original)
+++ trunk/languages/dotnet/t/constants.t        Sat Dec 13 11:46:19 2008
@@ -57,7 +57,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.zero2eight()
+       $I0 = obj."zero2eight"()
        print $I0
        print "\n"
 .end
@@ -70,7 +70,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m1()
+       $I0 = obj."m1"()
        print $I0
        print "\n"
 .end
@@ -83,7 +83,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.bigger_consts()
+       $I0 = obj."bigger_consts"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/constructor.t
==============================================================================
--- trunk/languages/dotnet/t/constructor.t      (original)
+++ trunk/languages/dotnet/t/constructor.t      Sat Dec 13 11:46:19 2008
@@ -77,7 +77,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.cc_no_args()
+       $I0 = obj."cc_no_args"()
     print $I0
     print "\n"
 .end
@@ -90,7 +90,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.cc_args(10, 2.45)
+       $N0 = obj."cc_args"(10, 2.45)
     print $N0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/conv.t
==============================================================================
--- trunk/languages/dotnet/t/conv.t     (original)
+++ trunk/languages/dotnet/t/conv.t     Sat Dec 13 11:46:19 2008
@@ -22,7 +22,7 @@
                {
                        return (sbyte) x;
                }
-               
+
                public sbyte conv_i1_f(float x)
                {
                        return (sbyte) x;
@@ -32,7 +32,7 @@
                {
                        return (byte) x;
                }
-               
+
                public byte conv_u1_f(float x)
                {
                        return (byte) x;
@@ -42,7 +42,7 @@
                {
                        return (short) x;
                }
-               
+
                public short conv_i2_f(float x)
                {
                        return (short) x;
@@ -52,7 +52,7 @@
                {
                        return (ushort) x;
                }
-               
+
                public ushort conv_u2_f(float x)
                {
                        return (ushort) x;
@@ -62,7 +62,7 @@
                {
                        return (int) x;
                }
-               
+
                public uint conv_u4_f(float x)
                {
                        return (uint) x;
@@ -90,16 +90,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_i1_i(42)
+       $I0 = obj."conv_i1_i"(42)
        print $I0
        print "\n"
-       $I0 = obj.conv_i1_i(-42)
+       $I0 = obj."conv_i1_i"(-42)
        print $I0
        print "\n"
-       $I0 = obj.conv_i1_i(258)
+       $I0 = obj."conv_i1_i"(258)
        print $I0
        print "\n"
-       $I0 = obj.conv_i1_i(-258)
+       $I0 = obj."conv_i1_i"(-258)
        print $I0
        print "\n"
 .end
@@ -115,16 +115,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_i1_f(42.0)
+       $I0 = obj."conv_i1_f"(42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i1_f(-42.0)
+       $I0 = obj."conv_i1_f"(-42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i1_f(258.0)
+       $I0 = obj."conv_i1_f"(258.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i1_f(-258.0)
+       $I0 = obj."conv_i1_f"(-258.0)
        print $I0
        print "\n"
 .end
@@ -140,10 +140,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_u1_i(42)
+       $I0 = obj."conv_u1_i"(42)
        print $I0
        print "\n"
-       $I0 = obj.conv_u1_i(258)
+       $I0 = obj."conv_u1_i"(258)
        print $I0
        print "\n"
 .end
@@ -157,10 +157,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_u1_f(42.0)
+       $I0 = obj."conv_u1_f"(42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_u1_f(258.0)
+       $I0 = obj."conv_u1_f"(258.0)
        print $I0
        print "\n"
 .end
@@ -174,16 +174,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_i2_i(42)
+       $I0 = obj."conv_i2_i"(42)
        print $I0
        print "\n"
-       $I0 = obj.conv_i2_i(-42)
+       $I0 = obj."conv_i2_i"(-42)
        print $I0
        print "\n"
-       $I0 = obj.conv_i2_i(70000)
+       $I0 = obj."conv_i2_i"(70000)
        print $I0
        print "\n"
-       $I0 = obj.conv_i2_i(-70000)
+       $I0 = obj."conv_i2_i"(-70000)
        print $I0
        print "\n"
 .end
@@ -199,16 +199,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_i2_f(42.0)
+       $I0 = obj."conv_i2_f"(42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i2_f(-42.0)
+       $I0 = obj."conv_i2_f"(-42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i2_f(70000.0)
+       $I0 = obj."conv_i2_f"(70000.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i2_f(-70000.0)
+       $I0 = obj."conv_i2_f"(-70000.0)
        print $I0
        print "\n"
 .end
@@ -224,10 +224,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_u2_i(42)
+       $I0 = obj."conv_u2_i"(42)
        print $I0
        print "\n"
-       $I0 = obj.conv_u2_i(70000)
+       $I0 = obj."conv_u2_i"(70000)
        print $I0
        print "\n"
 .end
@@ -241,10 +241,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_u2_f(42.0)
+       $I0 = obj."conv_u2_f"(42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_u2_f(70000.0)
+       $I0 = obj."conv_u2_f"(70000.0)
        print $I0
        print "\n"
 .end
@@ -258,10 +258,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_i4_f(42.0)
+       $I0 = obj."conv_i4_f"(42.0)
        print $I0
        print "\n"
-       $I0 = obj.conv_i4_f(-42.0)
+       $I0 = obj."conv_i4_f"(-42.0)
        print $I0
        print "\n"
 .end
@@ -275,7 +275,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.conv_u4_f(42.0)
+       $I0 = obj."conv_u4_f"(42.0)
        print $I0
        print "\n"
 .end
@@ -288,10 +288,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.conv_r4_i(42)
+       $N0 = obj."conv_r4_i"(42)
        print $N0
        print "\n"
-       $N0 = obj.conv_r4_i(-42)
+       $N0 = obj."conv_r4_i"(-42)
        print $N0
        print "\n"
 .end
@@ -305,10 +305,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.conv_r8_i(42)
+       $N0 = obj."conv_r8_i"(42)
        print $N0
        print "\n"
-       $N0 = obj.conv_r8_i(-42)
+       $N0 = obj."conv_r8_i"(-42)
        print $N0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/convovf.t
==============================================================================
--- trunk/languages/dotnet/t/convovf.t  (original)
+++ trunk/languages/dotnet/t/convovf.t  Sat Dec 13 11:46:19 2008
@@ -105,7 +105,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.u1(200)
+       $I0 = obj."u1"(200)
        print $I0
        print "\n"
 .end
@@ -119,7 +119,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u1(300)
+       $I0 = obj."u1"(300)
        print "failed\n"
     end
 handler:
@@ -136,7 +136,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u1(-5)
+       $I0 = obj."u1"(-5)
        print "failed\n"
     end
 handler:
@@ -152,7 +152,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i1(100)
+       $I0 = obj."i1"(100)
        print $I0
        print "\n"
 .end
@@ -165,7 +165,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i1(-5)
+       $I0 = obj."i1"(-5)
        print $I0
     print "\n"
     end
@@ -180,7 +180,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i1(128)
+       $I0 = obj."i1"(128)
        print "failed\n"
     end
 handler:
@@ -197,7 +197,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i1(-129)
+       $I0 = obj."i1"(-129)
        print "failed\n"
     end
 handler:
@@ -213,7 +213,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.u2(33000)
+       $I0 = obj."u2"(33000)
        print $I0
        print "\n"
 .end
@@ -227,7 +227,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u2(68000)
+       $I0 = obj."u2"(68000)
        print "failed\n"
     end
 handler:
@@ -244,7 +244,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u2(-5)
+       $I0 = obj."u2"(-5)
        print "failed\n"
     end
 handler:
@@ -260,7 +260,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i2(10000)
+       $I0 = obj."i2"(10000)
        print $I0
        print "\n"
 .end
@@ -273,7 +273,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i2(-5)
+       $I0 = obj."i2"(-5)
        print $I0
     print "\n"
     end
@@ -288,7 +288,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i2(32768)
+       $I0 = obj."i2"(32768)
        print "failed\n"
     end
 handler:
@@ -305,7 +305,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i2(-32769)
+       $I0 = obj."i2"(-32769)
        print "failed\n"
     end
 handler:
@@ -321,7 +321,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.u4(5000000)
+       $I0 = obj."u4"(5000000)
        print $I0
        print "\n"
 .end
@@ -335,7 +335,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u4(-5)
+       $I0 = obj."u4"(-5)
        print "failed\n"
     end
 handler:
@@ -351,7 +351,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.u1_un(200)
+       $I0 = obj."u1_un"(200)
        print $I0
        print "\n"
 .end
@@ -365,7 +365,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u1_un(300)
+       $I0 = obj."u1_un"(300)
        print "failed\n"
     end
 handler:
@@ -381,7 +381,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i1_un(100)
+       $I0 = obj."i1_un"(100)
        print $I0
        print "\n"
 .end
@@ -395,7 +395,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i1_un(128)
+       $I0 = obj."i1_un"(128)
        print "failed\n"
     end
 handler:
@@ -412,7 +412,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i1_un(-1)
+       $I0 = obj."i1_un"(-1)
        print "failed\n"
     end
 handler:
@@ -428,7 +428,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.u2_un(33000)
+       $I0 = obj."u2_un"(33000)
        print $I0
        print "\n"
 .end
@@ -442,7 +442,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.u2_un(68000)
+       $I0 = obj."u2_un"(68000)
        print "failed\n"
     end
 handler:
@@ -458,7 +458,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i2_un(10000)
+       $I0 = obj."i2_un"(10000)
        print $I0
        print "\n"
 .end
@@ -472,7 +472,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i2_un(32768)
+       $I0 = obj."i2_un"(32768)
        print "failed\n"
     end
 handler:
@@ -489,7 +489,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i2_un(-1)
+       $I0 = obj."i2_un"(-1)
        print "failed\n"
     end
 handler:
@@ -505,7 +505,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.i4_un(5000000)
+       $I0 = obj."i4_un"(5000000)
        print $I0
        print "\n"
 .end
@@ -519,7 +519,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.i4_un(-5)
+       $I0 = obj."i4_un"(-5)
        print "failed\n"
     end
 handler:
@@ -535,7 +535,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.u1_f(200.0)
+       $N0 = obj."u1_f"(200.0)
        print $N0
        print "\n"
 .end
@@ -549,7 +549,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.u1_f(300.0)
+       $N0 = obj."u1_f"(300.0)
        print "failed\n"
     end
 handler:
@@ -566,7 +566,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.u1_f(-5.0)
+       $N0 = obj."u1_f"(-5.0)
        print "failed\n"
     end
 handler:
@@ -582,7 +582,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.i1_f(100.0)
+       $N0 = obj."i1_f"(100.0)
        print $N0
        print "\n"
 .end
@@ -595,7 +595,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.i1_f(-5.0)
+       $N0 = obj."i1_f"(-5.0)
        print $N0
     print "\n"
     end
@@ -610,7 +610,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.i1_f(128.0)
+       $N0 = obj."i1_f"(128.0)
        print "failed\n"
     end
 handler:
@@ -627,7 +627,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.i1_f(-129.0)
+       $N0 = obj."i1_f"(-129.0)
        print "failed\n"
     end
 handler:
@@ -643,7 +643,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.u2_f(33000.0)
+       $N0 = obj."u2_f"(33000.0)
        print $N0
        print "\n"
 .end
@@ -657,7 +657,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.u2_f(68000.0)
+       $N0 = obj."u2_f"(68000.0)
        print "failed\n"
     end
 handler:
@@ -674,7 +674,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.u2_f(-5.0)
+       $N0 = obj."u2_f"(-5.0)
        print "failed\n"
     end
 handler:
@@ -690,7 +690,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.i2_f(10000.0)
+       $N0 = obj."i2_f"(10000.0)
        print $N0
        print "\n"
 .end
@@ -703,7 +703,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.i2_f(-5.0)
+       $N0 = obj."i2_f"(-5.0)
        print $N0
     print "\n"
     end
@@ -718,7 +718,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.i2_f(32768.0)
+       $N0 = obj."i2_f"(32768.0)
        print "failed\n"
     end
 handler:
@@ -735,7 +735,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $N0 = obj.i2_f(-32769.0)
+       $N0 = obj."i2_f"(-32769.0)
        print "failed\n"
     end
 handler:

Modified: trunk/languages/dotnet/t/enum.t
==============================================================================
--- trunk/languages/dotnet/t/enum.t     (original)
+++ trunk/languages/dotnet/t/enum.t     Sat Dec 13 11:46:19 2008
@@ -97,7 +97,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.value()
+       $I0 = obj."value"()
        print $I0
     print "\n"
 .end
@@ -110,7 +110,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.or()
+       $I0 = obj."or"()
        print $I0
     print "\n"
 .end
@@ -123,7 +123,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.or_int()
+       $I0 = obj."or_int"()
        print $I0
     print "\n"
 .end
@@ -136,10 +136,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.cond_1(0)
+       $I0 = obj."cond_1"(0)
        print $I0
     print "\n"
-    $I0 = obj.cond_1(42)
+    $I0 = obj."cond_1"(42)
        print $I0
     print "\n"
 .end
@@ -153,10 +153,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.cond_2(2)
+       $I0 = obj."cond_2"(2)
        print $I0
     print "\n"
-    $I0 = obj.cond_2(0)
+    $I0 = obj."cond_2"(0)
        print $I0
     print "\n"
 .end
@@ -170,10 +170,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.argument(1)
+       $I0 = obj."argument"(1)
        print $I0
     print "\n"
-    $I0 = obj.argument(0)
+    $I0 = obj."argument"(0)
        print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/exceptions.t
==============================================================================
--- trunk/languages/dotnet/t/exceptions.t       (original)
+++ trunk/languages/dotnet/t/exceptions.t       Sat Dec 13 11:46:19 2008
@@ -182,7 +182,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.simple(0)
+       $I0 = obj."simple"(0)
     print $I0
     print "\n"
 .end
@@ -195,7 +195,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.simple(1)
+       $I0 = obj."simple"(1)
     print $I0
     print "\n"
 .end
@@ -208,10 +208,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.typed(1)
+       $I0 = obj."typed"(1)
     print $I0
     print "\n"
-    $I0 = obj.typed(0)
+    $I0 = obj."typed"(0)
     print $I0
     print "\n"
 .end
@@ -225,10 +225,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested1(0)
+       $I0 = obj."nested1"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested1(1)
+    $I0 = obj."nested1"(1)
     print $I0
     print "\n"
 .end
@@ -242,10 +242,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested2(0)
+       $I0 = obj."nested2"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested2(1)
+    $I0 = obj."nested2"(1)
     print $I0
     print "\n"
 .end
@@ -259,10 +259,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested3(0)
+       $I0 = obj."nested3"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested3(1)
+    $I0 = obj."nested3"(1)
     print $I0
     print "\n"
 .end
@@ -276,10 +276,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested4(0)
+       $I0 = obj."nested4"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested4(1)
+    $I0 = obj."nested4"(1)
     print $I0
     print "\n"
 .end
@@ -293,10 +293,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested5(0)
+       $I0 = obj."nested5"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested5(1)
+    $I0 = obj."nested5"(1)
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/external.t
==============================================================================
--- trunk/languages/dotnet/t/external.t (original)
+++ trunk/languages/dotnet/t/external.t Sat Dec 13 11:46:19 2008
@@ -68,7 +68,7 @@
     load_bytecode "external.pbc"
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.create_monkey()
+       $P0 = obj."create_monkey"()
     unless null $P0 goto IS_OK
     print "busted\n"
 IS_OK:
@@ -84,8 +84,8 @@
     load_bytecode "external.pbc"
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.create_monkey()
-    $I0 = obj.monkey_age_doubled($P0)
+       $P0 = "obj.create_monkey"()
+    $I0 = obj."monkey_age_doubled"($P0)
     print $I0
     print "\n"
 .end
@@ -99,8 +99,8 @@
     load_bytecode "external.pbc"
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.create_monkey()
-    $S0 = obj.monkey_talk($P0)
+       $P0 = obj."create_monkey"()
+    $S0 = obj."monkey_talk"($P0)
     print $S0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/field.t
==============================================================================
--- trunk/languages/dotnet/t/field.t    (original)
+++ trunk/languages/dotnet/t/field.t    Sat Dec 13 11:46:19 2008
@@ -48,7 +48,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.set_x(28)
+       obj."set_x"(28)
     $P0 = new 'Integer'
     $P0 = getattribute obj, "x"
        print $P0
@@ -63,7 +63,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.set_y(14)
+       obj."set_y"(14)
     $P0 = new 'Integer'
     $P0 = getattribute obj, "y"
        print $P0
@@ -78,8 +78,8 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.set_x(28)
-       obj.set_y(14)
+       obj."set_x"(28)
+       obj."set_y"(14)
     $I0 = obj.add()
        print $I0
        print "\n"

Modified: trunk/languages/dotnet/t/finally.t
==============================================================================
--- trunk/languages/dotnet/t/finally.t  (original)
+++ trunk/languages/dotnet/t/finally.t  Sat Dec 13 11:46:19 2008
@@ -184,7 +184,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.unwind_over()
+       $I0 = obj."unwind_over"()
     print $I0
     print "\n"
 .end
@@ -197,7 +197,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.unwind_over_2()
+       $I0 = obj."unwind_over_2"()
     print $I0
     print "\n"
 .end
@@ -210,7 +210,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.try_finally()
+       $I0 = obj."try_finally"()
     print $I0
     print "\n"
 .end
@@ -223,7 +223,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.mixed()
+       $I0 = obj."mixed"()
     print $I0
     print "\n"
 .end
@@ -236,10 +236,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested_1(0)
+       $I0 = obj."nested_1"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested_1(1)
+    $I0 = obj."nested_1"(1)
     print $I0
     print "\n"
 .end
@@ -253,10 +253,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.nested_2(0)
+       $I0 = obj."nested_2"(0)
     print $I0
     print "\n"
-    $I0 = obj.nested_2(1)
+    $I0 = obj."nested_2"(1)
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/floatarray.t
==============================================================================
--- trunk/languages/dotnet/t/floatarray.t       (original)
+++ trunk/languages/dotnet/t/floatarray.t       Sat Dec 13 11:46:19 2008
@@ -54,7 +54,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.test_float()
+       $N0 = obj."test_float"()
        print $N0
        print "\n"
 .end
@@ -67,7 +67,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.test_double()
+       $N0 = obj."test_double"()
        print $N0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/hierachy.t
==============================================================================
--- trunk/languages/dotnet/t/hierachy.t (original)
+++ trunk/languages/dotnet/t/hierachy.t Sat Dec 13 11:46:19 2008
@@ -61,7 +61,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-    $I0 = obj.check_it_works()
+    $I0 = obj."check_it_works"()
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/i8.t
==============================================================================
--- trunk/languages/dotnet/t/i8.t       (original)
+++ trunk/languages/dotnet/t/i8.t       Sat Dec 13 11:46:19 2008
@@ -36,11 +36,11 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.set_long()
-    $I0 = $P0.get_high_bits()
+       $P0 = obj."set_long"()
+    $I0 = $P0."get_high_bits"()
        print $I0
        print "\n"
-    $I0 = $P0.get_low_bits()
+    $I0 = $P0."get_low_bits"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/inheritance.t
==============================================================================
--- trunk/languages/dotnet/t/inheritance.t      (original)
+++ trunk/languages/dotnet/t/inheritance.t      Sat Dec 13 11:46:19 2008
@@ -92,7 +92,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "baby" ]
-       $I0 = obj1.test_2_up(obj2)
+       $I0 = obj1."test_2_up"(obj2)
     print $I0
     print "\n"
 .end
@@ -106,7 +106,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "baby" ]
-       $I0 = obj1.test_1_up(obj2)
+       $I0 = obj1."test_1_up"(obj2)
     print $I0
     print "\n"
 .end
@@ -120,7 +120,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "baby" ]
-       $I0 = obj1.test_cur(obj2)
+       $I0 = obj1."test_cur"(obj2)
     print $I0
     print "\n"
 .end
@@ -134,7 +134,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "mummy" ]
-       $I0 = obj1.test(obj2)
+       $I0 = obj1."test"(obj2)
     print $I0
     print "\n"
 .end
@@ -148,7 +148,7 @@
        load_bytecode "t.pbc"
        obj1 = new [ "Testing" ; "Test" ]
     obj2 = new [ "Testing" ; "baby" ]
-       $I0 = obj1.test(obj2)
+       $I0 = obj1."test"(obj2)
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/initializer.t
==============================================================================
--- trunk/languages/dotnet/t/initializer.t      (original)
+++ trunk/languages/dotnet/t/initializer.t      Sat Dec 13 11:46:19 2008
@@ -42,7 +42,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.get_x()
+       $I0 = obj."get_x"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/intarray.t
==============================================================================
--- trunk/languages/dotnet/t/intarray.t (original)
+++ trunk/languages/dotnet/t/intarray.t Sat Dec 13 11:46:19 2008
@@ -90,7 +90,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_sbyte()
+       $I0 = obj."test_sbyte"()
        print $I0
        print "\n"
 .end
@@ -103,7 +103,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_byte()
+       $I0 = obj."test_byte"()
        print $I0
        print "\n"
 .end
@@ -116,7 +116,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_short()
+       $I0 = obj."test_short"()
        print $I0
        print "\n"
 .end
@@ -129,7 +129,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_ushort()
+       $I0 = obj."test_ushort"()
        print $I0
        print "\n"
 .end
@@ -142,7 +142,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_int()
+       $I0 = obj."test_int"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/interface.t
==============================================================================
--- trunk/languages/dotnet/t/interface.t        (original)
+++ trunk/languages/dotnet/t/interface.t        Sat Dec 13 11:46:19 2008
@@ -130,7 +130,7 @@
     addparent cls, prt
        obj = new "badness"
     push_eh handler
-    obj.kick()
+    obj."kick"()
     print "not "
 handler:
     print "ok\n"
@@ -144,9 +144,9 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-    obj.setup()
-    obj.kick_da_brother(10)
-    $I0 = obj.ready_to_sell()
+    obj."setup"()
+    obj."kick_da_brother"(10)
+    $I0 = obj."ready_to_sell"()
     print $I0
     print "\n"
 .end
@@ -159,9 +159,9 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-    obj.setup()
-    obj.kick_da_brother(1000) # ouch!
-    $I0 = obj.ready_to_sell()
+    obj."setup"()
+    obj."kick_da_brother"(1000) # ouch!
+    $I0 = obj."ready_to_sell"()
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/isinst.t
==============================================================================
--- trunk/languages/dotnet/t/isinst.t   (original)
+++ trunk/languages/dotnet/t/isinst.t   Sat Dec 13 11:46:19 2008
@@ -59,7 +59,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.pos()
+       $I0 = obj."pos"()
     print $I0
     print "\n"
 .end
@@ -72,7 +72,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.neg()
+       $I0 = obj."neg"()
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/locals.t
==============================================================================
--- trunk/languages/dotnet/t/locals.t   (original)
+++ trunk/languages/dotnet/t/locals.t   Sat Dec 13 11:46:19 2008
@@ -67,7 +67,7 @@
         .local pmc obj
         load_bytecode "t.pbc"
         obj = new [ "Testing" ; "Test" ]
-        $I0 = obj.no_locals()
+        $I0 = obj."no_locals"()
         print $I0
         print "\n"
 .end
@@ -80,7 +80,7 @@
         .local pmc obj
         load_bytecode "t.pbc"
         obj = new [ "Testing" ; "Test" ]
-        $I0 = obj.few_locals()
+        $I0 = obj."few_locals"()
         print $I0
         print "\n"
 .end
@@ -93,7 +93,7 @@
         .local pmc obj
         load_bytecode "t.pbc"
         obj = new [ "Testing" ; "Test" ]
-        $I0 = obj.fib_locals()
+        $I0 = obj."fib_locals"()
         print $I0
         print "\n"
 .end
@@ -106,7 +106,7 @@
         .local pmc obj
         load_bytecode "t.pbc"
         obj = new [ "Testing" ; "Test" ]
-        $I0 = obj.locals_with_args(2,3)
+        $I0 = obj."locals_with_args"(2,3)
         print $I0
         print "\n"
 .end

Modified: trunk/languages/dotnet/t/loop.t
==============================================================================
--- trunk/languages/dotnet/t/loop.t     (original)
+++ trunk/languages/dotnet/t/loop.t     Sat Dec 13 11:46:19 2008
@@ -57,19 +57,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.add_hundred(0)
+       $I0 = obj."add_hundred"(0)
        print $I0
        print "\n"
-       $I0 = obj.add_hundred(21)
+       $I0 = obj."add_hundred"(21)
        print $I0
        print "\n"
-       $I0 = obj.add_hundred(-1)
+       $I0 = obj."add_hundred"(-1)
        print $I0
        print "\n"
-       $I0 = obj.add_hundred(-500)
+       $I0 = obj."add_hundred"(-500)
        print $I0
        print "\n"
-       $I0 = obj.add_hundred(42)
+       $I0 = obj."add_hundred"(42)
        print $I0
        print "\n"
 .end
@@ -86,16 +86,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.multiply(4,5)
+       $I0 = obj."multiply"(4,5)
        print $I0
        print "\n"
-       $I0 = obj.multiply(6,3)
+       $I0 = obj."multiply"(6,3)
        print $I0
        print "\n"
-       $I0 = obj.multiply(0,1)
+       $I0 = obj."multiply"(0,1)
        print $I0
        print "\n"
-       $I0 = obj.multiply(9,0)
+       $I0 = obj."multiply"(9,0)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/math.t
==============================================================================
--- trunk/languages/dotnet/t/math.t     (original)
+++ trunk/languages/dotnet/t/math.t     Sat Dec 13 11:46:19 2008
@@ -37,7 +37,7 @@
         {
             return x / y;
         }
-               
+
                public int rem(int x, int y)
         {
             return x % y;
@@ -60,10 +60,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.add(500,72)
+       $I0 = obj."add"(500,72)
        print $I0
        print "\n"
-       $I0 = obj.add(500,-72)
+       $I0 = obj."add"(500,-72)
        print $I0
        print "\n"
 .end
@@ -94,10 +94,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.mul(50,7)
+       $I0 = obj."mul"(50,7)
        print $I0
        print "\n"
-       $I0 = obj.mul(-7,-6)
+       $I0 = obj."mul"(-7,-6)
        print $I0
        print "\n"
 .end
@@ -111,13 +111,13 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.div(12,3)
+       $I0 = obj."div"(12,3)
        print $I0
        print "\n"
-       $I0 = obj.div(15,14)
+       $I0 = obj."div"(15,14)
        print $I0
        print "\n"
-       $I0 = obj.div(-121,11)
+       $I0 = obj."div"(-121,11)
        print $I0
        print "\n"
 .end
@@ -132,10 +132,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.rem(13,3)
+       $I0 = obj."rem"(13,3)
        print $I0
        print "\n"
-       $I0 = obj.rem(-15,13)
+       $I0 = obj."rem"(-15,13)
        print $I0
        print "\n"
 .end
@@ -149,10 +149,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.neg(100)
+       $I0 = obj."neg"(100)
        print $I0
        print "\n"
-       $I0 = obj.neg(-15)
+       $I0 = obj."neg"(-15)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/mathovf.t
==============================================================================
--- trunk/languages/dotnet/t/mathovf.t  (original)
+++ trunk/languages/dotnet/t/mathovf.t  Sat Dec 13 11:46:19 2008
@@ -60,7 +60,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.add(500,72)
+       $I0 = obj."add"(500,72)
        print $I0
        print "\n"
 .end
@@ -74,7 +74,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.add(2147483640, 100)
+       $I0 = obj."add"(2147483640, 100)
        print "failed\n"
     end
 handler:
@@ -90,7 +90,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.add_un(500,72)
+       $I0 = obj."add_un"(500,72)
        print $I0
        print "\n"
 .end
@@ -103,9 +103,9 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.add_un(2147483647, 2147483647)
+       $I0 = obj."add_un"(2147483647, 2147483647)
     push_eh handler
-    $I0 = obj.add_un($I0, 10)
+    $I0 = obj."add_un"($I0, 10)
        print "failed\n"
     end
 handler:
@@ -185,7 +185,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.mul(500,20)
+       $I0 = obj."mul"(500,20)
        print $I0
        print "\n"
 .end
@@ -199,7 +199,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
     push_eh handler
-       $I0 = obj.mul(214748364, 100)
+       $I0 = obj."mul"(214748364, 100)
        print "failed\n"
     end
 handler:
@@ -215,7 +215,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.mul_un(500,20)
+       $I0 = obj."mul_un"(500,20)
        print $I0
        print "\n"
 .end
@@ -229,7 +229,7 @@
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
        push_eh handler
-       $I0 = obj.mul_un(214748364, 214748364)
+       $I0 = obj."mul_un"(214748364, 214748364)
        print "failed\n"
     end
 handler:

Modified: trunk/languages/dotnet/t/mp.t
==============================================================================
--- trunk/languages/dotnet/t/mp.t       (original)
+++ trunk/languages/dotnet/t/mp.t       Sat Dec 13 11:46:19 2008
@@ -106,7 +106,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.local_ints()
+       $I0 = obj."local_ints"()
        print $I0
        print "\n"
 .end
@@ -119,7 +119,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.local_floats()
+       $N0 = obj."local_floats"()
        print $N0
        print "\n"
 .end
@@ -132,7 +132,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.param_ints(5, 10, 20, 40, 80, 160)
+       $I0 = obj."param_ints"(5, 10, 20, 40, 80, 160)
        print $I0
        print "\n"
 .end
@@ -145,7 +145,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $N0 = obj.param_floats(5.5, 7.5)
+       $N0 = obj."param_floats"(5.5, 7.5)
        print $N0
        print "\n"
 .end
@@ -158,7 +158,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.element()
+       $I0 = obj."element"()
        print $I0
        print "\n"
 .end
@@ -171,7 +171,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.field()
+       $I0 = obj."field"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/mp_pmc.t
==============================================================================
--- trunk/languages/dotnet/t/mp_pmc.t   (original)
+++ trunk/languages/dotnet/t/mp_pmc.t   Sat Dec 13 11:46:19 2008
@@ -39,7 +39,7 @@
     .local int tmp
 
     # Get register's value indirectly, increment it and store back indirectly.
-    tmp = ptr.load_int()
+    tmp = ptr."load_int"()
     inc tmp
     ptr.store_int(tmp)
 .end
@@ -71,9 +71,9 @@
     .local num tmp
 
     # Get register's value indirectly, increment it and store back indirectly.
-    tmp = ptr.load_float()
+    tmp = ptr."load_float"()
     tmp = tmp * 2
-    ptr.store_float(tmp)
+    ptr."store_float"(tmp)
 .end
 PIR
 4.800000
@@ -87,7 +87,7 @@
     $P0 = loadlib "dotnet_runtime"
 
     # Get the pointer.
-    the_test = new Float
+    the_test = new 'Float'
     the_test = 42.2
     ptr = net_reg_ptr the_test
 
@@ -109,7 +109,7 @@
     tmp2 = tmp
     tmp = new 'Integer'
     tmp = tmp2
-    ptr.store_pmc(tmp)
+    ptr."store_pmc"(tmp)
 .end
 PIR
 42
@@ -123,7 +123,7 @@
     $P0 = loadlib "dotnet_runtime"
 
     # Set up an array.
-    arr = new FixedIntegerArray
+    arr = new 'FixedIntegerArray'
     arr = 3
     arr[0] = 40
     arr[1] = 41
@@ -133,11 +133,11 @@
     ptr = net_ldelema arr, 1
 
     # Use the pointer to get value, increment it, store it again.
-    the_test = ptr.load_int()
+    the_test = ptr."load_int"()
     print the_test
     print "\n"
     inc the_test
-    ptr.store_int(the_test)
+    ptr."store_int"(the_test)
 
     # Print array element.
     the_test = arr[1]
@@ -157,7 +157,7 @@
     $P0 = loadlib "dotnet_runtime"
 
     # Set up an array.
-    arr = new FixedFloatArray
+    arr = new 'FixedFloatArray'
     arr = 3
     arr[0] = 14.2
     arr[1] = 5.9
@@ -167,11 +167,11 @@
     ptr = net_ldelema arr, 1
 
     # Use the pointer to get value, increment it, store it again.
-    the_test = ptr.load_float()
+    the_test = ptr."load_float"()
     print the_test
     print "\n"
     the_test = the_test * 2
-    ptr.store_float(the_test)
+    ptr."store_float"(the_test)
 
     # Print array element.
     the_test = arr[1]
@@ -190,15 +190,15 @@
     $P0 = loadlib "dotnet_runtime"
 
     # Set up an array.
-    arr = new FixedFloatArray
+    arr = new 'FixedFloatArray'
     arr = 3
-    the_test = new Float
+    the_test = new 'Float'
     the_test = 14.2
     arr[0] = the_test
-    the_test = new Float
+    the_test = new 'Float'
     the_test = 5.9
     arr[1] = the_test
-    the_test = new Float
+    the_test = new 'Float'
     the_test = 18.7
     arr[2] = the_test
 
@@ -206,12 +206,12 @@
     ptr = net_ldelema arr, 1
 
     # Use the pointer to get value, increment it, store it again.
-    the_test = ptr.load_pmc()
+    the_test = ptr."load_pmc"()
     print the_test
     print "\n"
-    the_test = new Float
+    the_test = new 'Float'
     the_test = 11.8
-    ptr.store_float(the_test)
+    ptr."store_float"(the_test)
 
     # Print array element.
     the_test = arr[1]
@@ -242,12 +242,12 @@
     ptr = net_ldflda obj, "age"
 
     # Use the pointer to get the age attribute and change it.
-    the_test = ptr.load_int()
+    the_test = ptr."load_int"()
     print "The monkey was "
     print the_test
     print " years old.\n"
     inc the_test
-    ptr.store_int(the_test)
+    ptr."store_int"(the_test)
 
     # Print attribute.
     $P1 = getattribute obj, "age"
@@ -271,7 +271,7 @@
     $P0 = newclass "monkey"
     addattribute $P0, "height"
     obj = new "monkey"
-    $P1 = new Float
+    $P1 = new 'Float'
     $P1 = 1.79
     setattribute obj, "height", $P1
 
@@ -279,12 +279,12 @@
     ptr = net_ldflda obj, "height"
 
     # Use the pointer to get the height attribute and change it.
-    the_test = ptr.load_float()
+    the_test = ptr."load_float"()
     print "The monkey was "
     print the_test
     print " meters tall.\n"
     the_test = 1.82
-    ptr.store_float(the_test)
+    ptr."store_float"(the_test)
 
     # Print attribute.
     $P1 = getattribute obj, "height"
@@ -307,7 +307,7 @@
     $P0 = newclass "monkey"
     addattribute $P0, "name"
     obj = new "monkey"
-    $P1 = new String
+    $P1 = new 'String'
     $P1 = "Derek"
     setattribute obj, "name", $P1
 
@@ -319,9 +319,9 @@
     print "The monkey was called "
     print the_test
     print ".\n"
-    $P1 = new String
+    $P1 = new 'String'
     $P1 = "Bradley"
-    ptr.store_pmc($P1)
+    ptr."store_pmc"($P1)
 
     # Print attribute.
     the_test = getattribute obj, "name"

Modified: trunk/languages/dotnet/t/null.t
==============================================================================
--- trunk/languages/dotnet/t/null.t     (original)
+++ trunk/languages/dotnet/t/null.t     Sat Dec 13 11:46:19 2008
@@ -40,7 +40,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $P0 = obj.ret_null()
+       $P0 = obj."ret_null"()
     if null $P0 goto IS_NULL
        print "not null\n"
 IS_NULL:
@@ -55,8 +55,8 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-    $P0 = obj.ret_null()
-       $I0 = obj.comp_null($P0)
+    $P0 = obj."ret_null"()
+       $I0 = obj."comp_null"($P0)
     print $I0
     print "\n"
 .end
@@ -69,7 +69,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.comp_null(obj)
+       $I0 = obj."comp_null"(obj)
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/overloading.t
==============================================================================
--- trunk/languages/dotnet/t/overloading.t      (original)
+++ trunk/languages/dotnet/t/overloading.t      Sat Dec 13 11:46:19 2008
@@ -94,7 +94,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.one_arg_i()
+       $I0 = obj."one_arg_i"()
     print $I0
     print "\n"
 .end
@@ -107,7 +107,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.two_args_ii()
+       $I0 = obj."two_args_ii"()
     print $I0
     print "\n"
 .end
@@ -120,7 +120,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.two_args_if()
+       $I0 = obj."two_args_if"()
     print $I0
     print "\n"
 .end
@@ -133,7 +133,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_obj_1()
+       $I0 = obj."test_obj_1"()
     print $I0
     print "\n"
 .end
@@ -146,7 +146,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test_obj_2()
+       $I0 = obj."test_obj_2"()
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/overloadprimitives.t
==============================================================================
--- trunk/languages/dotnet/t/overloadprimitives.t       (original)
+++ trunk/languages/dotnet/t/overloadprimitives.t       Sat Dec 13 11:46:19 2008
@@ -118,7 +118,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_int()
+       $I0 = obj."m_int"()
     print $I0
     print "\n"
 .end
@@ -131,7 +131,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_uint()
+       $I0 = obj."m_uint"()
     print $I0
     print "\n"
 .end
@@ -144,7 +144,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_sbyte()
+       $I0 = obj."m_sbyte"()
     print $I0
     print "\n"
 .end
@@ -157,7 +157,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_byte()
+       $I0 = obj."m_byte"()
     print $I0
     print "\n"
 .end
@@ -170,7 +170,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_short()
+       $I0 = obj."m_short"()
     print $I0
     print "\n"
 .end
@@ -183,7 +183,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_ushort()
+       $I0 = obj."m_ushort"()
     print $I0
     print "\n"
 .end
@@ -196,7 +196,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_float()
+       $I0 = obj."m_float"()
     print $I0
     print "\n"
 .end
@@ -209,7 +209,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.m_double()
+       $I0 = obj."m_double"()
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/recursion.t
==============================================================================
--- trunk/languages/dotnet/t/recursion.t        (original)
+++ trunk/languages/dotnet/t/recursion.t        Sat Dec 13 11:46:19 2008
@@ -38,16 +38,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.factorial(0)
+       $I0 = obj."factorial"(0)
     print $I0
     print "\n"
-    $I0 = obj.factorial(1)
+    $I0 = obj."factorial"(1)
     print $I0
     print "\n"
-    $I0 = obj.factorial(2)
+    $I0 = obj."factorial"(2)
     print $I0
     print "\n"
-    $I0 = obj.factorial(10)
+    $I0 = obj."factorial"(10)
     print $I0
     print "\n"
 .end

Modified: trunk/languages/dotnet/t/staticfield.t
==============================================================================
--- trunk/languages/dotnet/t/staticfield.t      (original)
+++ trunk/languages/dotnet/t/staticfield.t      Sat Dec 13 11:46:19 2008
@@ -49,7 +49,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.set_x(26)
+       obj."set_x"(26)
     $P0 = new 'Integer'
     $P0 = get_hll_global [ "Testing" ; "Test" ], "x"
        print $P0
@@ -65,7 +65,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.set_y(16)
+       obj."set_y"(16)
     $P0 = new 'Integer'
     $P0 = get_hll_global [ "Testing" ; "Test" ], "y"
        print $P0
@@ -80,9 +80,9 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.set_x(26)
-       obj.set_y(16)
-    $I0 = obj.add()
+       obj."set_x"(26)
+       obj."set_y"(16)
+    $I0 = obj."add"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/staticmethod.t
==============================================================================
--- trunk/languages/dotnet/t/staticmethod.t     (original)
+++ trunk/languages/dotnet/t/staticmethod.t     Sat Dec 13 11:46:19 2008
@@ -66,7 +66,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.test_no_args()
+       obj."test_no_args"()
     $P0 = new 'Integer'
     $P0 = get_hll_global [ "Testing" ; "Test" ], "x"
        print $P0
@@ -82,7 +82,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       obj.test_args(10)
+       obj."test_args"(10)
     $P0 = new 'Integer'
     $P0 = get_hll_global [ "Testing" ; "Test" ], "y"
        print $P0
@@ -97,7 +97,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-    $I0 = obj.test_ret()
+    $I0 = obj."test_ret"()
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/string.t
==============================================================================
--- trunk/languages/dotnet/t/string.t   (original)
+++ trunk/languages/dotnet/t/string.t   Sat Dec 13 11:46:19 2008
@@ -45,7 +45,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $S0 = obj.ret_string()
+       $S0 = obj."ret_string"()
        print $S0
 .end
 PIR
@@ -57,7 +57,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $S0 = obj.ret_string_with_quotes()
+       $S0 = obj."ret_string_with_quotes"()
        print $S0
 .end
 PIR
@@ -69,7 +69,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $S0 = obj.ret_string_with_quotes_s()
+       $S0 = obj."ret_string_with_quotes_s"()
        print $S0
 .end
 PIR

Modified: trunk/languages/dotnet/t/switch.t
==============================================================================
--- trunk/languages/dotnet/t/switch.t   (original)
+++ trunk/languages/dotnet/t/switch.t   Sat Dec 13 11:46:19 2008
@@ -42,16 +42,16 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.test(0)
+       $I0 = obj."test"(0)
        print $I0
        print "\n"
-    $I0 = obj.test(1)
+    $I0 = obj."test"(1)
        print $I0
        print "\n"
-    $I0 = obj.test(2)
+    $I0 = obj."test"(2)
        print $I0
        print "\n"
-    $I0 = obj.test(3)
+    $I0 = obj."test"(3)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/unsigned.t
==============================================================================
--- trunk/languages/dotnet/t/unsigned.t (original)
+++ trunk/languages/dotnet/t/unsigned.t Sat Dec 13 11:46:19 2008
@@ -72,19 +72,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.uge(500, 800)
+       $I0 = obj."uge"(500, 800)
        print $I0
        print "\n"
-       $I0 = obj.uge(42, -20202)
+       $I0 = obj."uge"(42, -20202)
        print $I0
        print "\n"
-       $I0 = obj.uge(800, 500)
+       $I0 = obj."uge"(800, 500)
        print $I0
        print "\n"
-       $I0 = obj.uge(-20202, 42)
+       $I0 = obj."uge"(-20202, 42)
        print $I0
        print "\n"
-       $I0 = obj.uge(5, 5)
+       $I0 = obj."uge"(5, 5)
        print $I0
        print "\n"
 .end
@@ -101,19 +101,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.ugt(500, 800)
+       $I0 = obj."ugt"(500, 800)
        print $I0
        print "\n"
-       $I0 = obj.ugt(42, -20202)
+       $I0 = obj."ugt"(42, -20202)
        print $I0
        print "\n"
-       $I0 = obj.ugt(800, 500)
+       $I0 = obj."ugt"(800, 500)
        print $I0
        print "\n"
-       $I0 = obj.ugt(-20202, 42)
+       $I0 = obj."ugt"(-20202, 42)
        print $I0
        print "\n"
-       $I0 = obj.ugt(5, 5)
+       $I0 = obj."ugt"(5, 5)
        print $I0
        print "\n"
 .end
@@ -130,19 +130,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.ule(500, 800)
+       $I0 = obj."ule"(500, 800)
        print $I0
        print "\n"
-       $I0 = obj.ule(42, -20202)
+       $I0 = obj."ule"(42, -20202)
        print $I0
        print "\n"
-       $I0 = obj.ule(800, 500)
+       $I0 = obj."ule"(800, 500)
        print $I0
        print "\n"
-       $I0 = obj.ule(-20202, 42)
+       $I0 = obj."ule"(-20202, 42)
        print $I0
        print "\n"
-       $I0 = obj.ule(5, 5)
+       $I0 = obj."ule"(5, 5)
        print $I0
        print "\n"
 .end
@@ -159,19 +159,19 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.ult(500, 800)
+       $I0 = obj."ult"(500, 800)
        print $I0
        print "\n"
-       $I0 = obj.ult(42, -20202)
+       $I0 = obj."ult"(42, -20202)
        print $I0
        print "\n"
-       $I0 = obj.ult(800, 500)
+       $I0 = obj."ult"(800, 500)
        print $I0
        print "\n"
-       $I0 = obj.ult(-20202, 42)
+       $I0 = obj."ult"(-20202, 42)
        print $I0
        print "\n"
-       $I0 = obj.ult(5, 5)
+       $I0 = obj."ult"(5, 5)
        print $I0
        print "\n"
 .end
@@ -188,10 +188,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.udiv(84,2)
+       $I0 = obj."udiv"(84,2)
        print $I0
        print "\n"
-       $I0 = obj.udiv(5,3)
+       $I0 = obj."udiv"(5,3)
        print $I0
        print "\n"
 .end
@@ -205,10 +205,10 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.urem(84,2)
+       $I0 = obj."urem"(84,2)
        print $I0
        print "\n"
-       $I0 = obj.urem(5,3)
+       $I0 = obj."urem"(5,3)
        print $I0
        print "\n"
 .end

Modified: trunk/languages/dotnet/t/valuetypes.t
==============================================================================
--- trunk/languages/dotnet/t/valuetypes.t       (original)
+++ trunk/languages/dotnet/t/valuetypes.t       Sat Dec 13 11:46:19 2008
@@ -104,7 +104,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.locals_1()
+       $I0 = obj."locals_1"()
        print $I0
     print "\n"
 .end
@@ -117,7 +117,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.locals_2()
+       $I0 = obj."locals_2"()
        print $I0
     print "\n"
 .end
@@ -130,7 +130,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.locals_3()
+       $I0 = obj."locals_3"()
        print $I0
     print "\n"
 .end
@@ -143,7 +143,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.pass()
+       $I0 = obj."pass"()
        print $I0
     print "\n"
 .end
@@ -156,7 +156,7 @@
        .local pmc obj
        load_bytecode "t.pbc"
        obj = new [ "Testing" ; "Test" ]
-       $I0 = obj.pass_ref()
+       $I0 = obj."pass_ref"()
        print $I0
     print "\n"
 .end

<Prev in Thread] Current Thread [Next in Thread>
  • [svn:parrot] r33862 - trunk/languages/dotnet/t, fperrad <=