[t] We now pass 25-class.t.

jnthn · Nov 6, 2010 · f7efbd5 · f7efbd5
1 parent de688fe
commit f7efbd5
Showing 1 changed file with 28 additions and 0 deletions.
diff --git a/t/nqp/25-class.t b/t/nqp/25-class.t
@@ -0,0 +1,28 @@
+#!./parrot nqp.pbc
+
+# class
+
+plan(2);
+
+class XYZ {
+    method foo($x) {
+        say($x);
+    }
+}
+
+my $xyz := XYZ.new();
+
+$xyz.foo('ok 1');
+
+
+# test that a class can start with Q
+
+class QRS {
+    method foo($x) {
+        say($x);
+    }
+}
+
+my $qrs := QRS.new();
+
+$qrs.foo('ok 2');