From d3271899e5cda93552d9ccd0cc6e2b0b3cafe325 Mon Sep 17 00:00:00 2001
From: tomsmeding <tom.smeding@gmail.com>
Date: Fri, 22 Nov 2019 19:53:37 +0100
Subject: More builtins: type queries, and error

---
 Compiler.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'Compiler.hs')

diff --git a/Compiler.hs b/Compiler.hs
index 70a35ae..59b82af 100644
--- a/Compiler.hs
+++ b/Compiler.hs
@@ -90,7 +90,9 @@ builtinSet = Set.fromList [
     "list", "cons", "car", "cdr", "null?",
     "sys-open-file", "sys-close-file", "sys-get-char", "sys-put-string", "sys-flush",
     "sys-stdin", "sys-stdout", "sys-stderr",
-    "length", "substr", "ord", "chr", "concat"]
+    "length", "substr", "ord", "chr", "concat",
+    "type-list?", "type-number?", "type-string?", "type-quoted?", "type-symbol?",
+    "error"]
 
 bbId :: BB -> Int
 bbId (BB i _ _) = i
-- 
cgit v1.2.3-54-g00ecf