We pass 25-class.t.

jnthn · Jan 28, 2013 · ef24e8b · ef24e8b
1 parent c1b6aa1
commit ef24e8b
Showing 1 changed file with 29 additions and 0 deletions.
diff --git a/t/nqp/25-class.t b/t/nqp/25-class.t
@@ -0,0 +1,29 @@
+#!./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');
+