1 files changed, 19 insertions, 4 deletions

diff --git a/src/x86_64/prelude.asm b/src/x86_64/prelude.asm
index 3ad33f7..c9ef823 100644
--- a/src/x86_64/prelude.asm
+++ b/src/x86_64/prelude.asm
@@ -71,10 +71,16 @@ bool_write:
     syscall
     ret
 
-true_str:
-    db      "true", 10
-false_str:
-    db      "false", 10
+printstring:
+    mov     rsi, rdi
+    mov     rax, STRING_INV_MASK
+    and     rsi, rax
+    mov     rdx, [rsi]
+    add     rsi, 8
+    mov     rax, 1
+    mov     rdi, 1
+    syscall
+    ret
 
 display:
     ;; is nil?
@@ -91,6 +97,15 @@ display:
     ret
 not_bool:
 
+    ;; is string?
+    mov     rax, rdi
+    and     rax, STRING_MASK
+    cmp     rax, STRING_TAG
+    jne     not_string
+    call    printstring
+    ret
+not_string:
+
     ;; is fixnum?
     mov     rax, rdi
     call    printdln