diff options
Diffstat (limited to 'rip.hs')
-rw-r--r-- | rip.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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 -> |