diff options
author | tomsmeding <tom.smeding@gmail.com> | 2016-01-08 22:18:22 +0100 |
---|---|---|
committer | tomsmeding <tom.smeding@gmail.com> | 2016-01-08 22:18:22 +0100 |
commit | 73725d0f4d1eea724829104b4483aa1585a31afd (patch) | |
tree | 40aca60a98516a4ca2a238eb1baa4da3f08cd0b3 /rip.hs | |
parent | 534cd47f7488d7081d68c641b28a7c30c93643b9 (diff) |
meta.rip stub
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 -> |