diff options
| author | tomsmeding <tom.smeding@gmail.com> | 2019-11-22 19:53:37 +0100 |
|---|---|---|
| committer | tomsmeding <tom.smeding@gmail.com> | 2019-11-22 19:53:37 +0100 |
| commit | d3271899e5cda93552d9ccd0cc6e2b0b3cafe325 (patch) | |
| tree | 5ed3bbe4728e84b9ff60fab95a9dc3bef8d6de3b /Compiler.hs | |
| parent | 466ba3ce75ca64a02f83ed84939cdd6e57aa8fa9 (diff) | |
More builtins: type queries, and error
Diffstat (limited to 'Compiler.hs')
| -rw-r--r-- | Compiler.hs | 4 |
1 files changed, 3 insertions, 1 deletions
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 |