From 794bfca1361fc6900f0ea0186d64111c3a02b0f8 Mon Sep 17 00:00:00 2001 From: Chouser Date: Mon, 16 Feb 2015 21:28:05 -0500 Subject: forth: Add step 7 --- forth/types.fs | 1 + 1 file changed, 1 insertion(+) (limited to 'forth/types.fs') diff --git a/forth/types.fs b/forth/types.fs index 5b8a211..79965e8 100644 --- a/forth/types.fs +++ b/forth/types.fs @@ -380,6 +380,7 @@ MalDefault nip ;; extend as-native ;; ( obj -- obj ) extend to-list drop 0 ;; + extend empty? drop mal-true ;; drop MalNil -- cgit v1.2.3