[truffle] Simple &ok and &plan before we can run better ones

Raku · Jun 27, 2018 · a16e900 · a16e900
1 parent a6b54a2
commit a16e900
Showing 1 changed file with 13 additions and 2 deletions.
diff --git a/nqp-truffle.nqp b/nqp-truffle.nqp
@@ -389,12 +389,23 @@ class QAST::TruffleCompiler {
 
 
 my $mini_setting := '
+sub print($arg) {
+    nqp::print($arg);
+}
 sub say($arg) {
     nqp::say($arg);
 }
 
-sub print($arg) {
-    nqp::print($arg);
+sub plan($quantity) {
+    nqp::say("1..$quantity");
+}
+
+sub ok($condition) {
+    if $condition {
+        nqp::say("ok");
+    } else {
+        nqp::say("not ok");
+    }
 }
 ';