aboutsummaryrefslogtreecommitdiff
path: root/rip.hs
diff options
context:
space:
mode:
Diffstat (limited to 'rip.hs')
-rw-r--r--rip.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/rip.hs b/rip.hs
index 3efd081..6660c76 100644
--- a/rip.hs
+++ b/rip.hs
@@ -19,7 +19,7 @@ type Stackelem = Integer
c_ripmode :: Bool
-c_ripmode = True
+c_ripmode = False
c_debugmode :: Bool
c_debugmode = False
@@ -332,7 +332,7 @@ rip' code@(x:xs) fns conns st = do
'\'' -> rip' (tail xs) fns conns $ ordI (head xs) : st
'$' -> do
- (putStrLn . intercalate " " . map show . reverse) st
+ putStrLn $ '[' : ((intercalate " " . map show . reverse) st) ++ "]"
rip' xs fns conns st
c | isSpace c ->