From bf6a574e00a221dfe564ba11148deaa73ba8a229 Mon Sep 17 00:00:00 2001
From: Chouser <chouser@n01se.net>
Date: Mon, 16 Feb 2015 20:12:44 -0500
Subject: forth: Add step 6, clean up comment parsing

---
 forth/core.fs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'forth/core.fs')

diff --git a/forth/core.fs b/forth/core.fs
index 4982a0e..71f43ca 100644
--- a/forth/core.fs
+++ b/forth/core.fs
@@ -74,3 +74,6 @@ defcore str ( argv argc )
         loop
         MalString. nip
     endif ;;
+
+defcore read-string drop @ unpack-str read-str ;;
+defcore slurp drop @ unpack-str slurp-file MalString. ;;
-- 
cgit v1.2.3