Re-write the nqp-builtins cheats into NQP and stick 'em in the setting.

build/Makefile.in

@@ -85,13 +85,13 @@ NQP_SOURCES = \
   src/NQP/Actions.pm \
   src/NQP/Compiler.pm \
   src/NQP/Compiler.pir \
-  src/cheats/nqp-builtins.pir \
 
 CORE_SETTING_SOURCES = \
   src/core/NativeTypes.pm \
   src/core/NQPMu.pm \
   src/core/IO.pm \
   src/core/Regex.pm \
+  src/core/testing.pm \
 
 CORE_SETTING_NQP = NQPCORE.setting
 

src/NQP/Compiler.pir

@@ -40,7 +40,6 @@ NQP::Compiler - NQP compiler
 .include 'gen/nqp-grammar.pir'
 .include 'gen/nqp-actions.pir'
 .include 'gen/nqp-compiler.pir'
-.include 'src/cheats/nqp-builtins.pir'
 
 .namespace ['NQP';'Compiler']
 

src/core/IO.pm

@@ -47,4 +47,15 @@ sub spew($filename, $contents) {
     $handle.close();
 }
 
+sub print(*@args) {
+    for @args {
+        pir::print($_);
+    }
+    1;
+}
+
+sub say(*@args) {
+    print(|@args, "\n");
+}
+
 # vim: ft=perl6

src/core/testing.pm

@@ -0,0 +1,25 @@
+my $test_counter := 0;
+
+sub plan($quantity) {
+    say("1..$quantity");
+}
+
+sub ok($condition, $desc?) {
+    $test_counter := $test_counter + 1;
+
+    unless $condition {
+        print("not ");
+    }
+    print("ok $test_counter");
+    if $desc {
+        print(" - $desc");
+    }
+    print("\n");
+
+    $condition ?? 1 !! 0
+}
+
+sub skip($desc) {
+    $test_counter := $test_counter + 1;
+    say("ok $test_counter # SKIP $desc\n");
+}