From 7390af67e18e6d17934541dd3c2d6d46cfad84d0 Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jans.tuomi@gmail.com>
Date: Mon, 31 Jan 2022 11:08:30 +0200
Subject: Pop words type-safely from stack

---
 samples/conditional.sample | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'samples/conditional.sample')

diff --git a/samples/conditional.sample b/samples/conditional.sample
index fb67d66..2cb9326 100644
--- a/samples/conditional.sample
+++ b/samples/conditional.sample
@@ -1,7 +1,7 @@
 define eq10?
     10 eq?
-        [ true ]
-        [ false ] cond ;
+        [ "true" ]
+        [ "false" ] cond ;
 
-10 eq10? .
-5 eq10? .
\ No newline at end of file
+10 eq10? s.
+5 eq10? s.
-- 
cgit v1.3