diff options
Diffstat (limited to 'src/GFI.hs')
| -rw-r--r-- | src/GFI.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GFI.hs b/src/GFI.hs index a5f5d835a..f183d043c 100644 --- a/src/GFI.hs +++ b/src/GFI.hs @@ -141,7 +141,7 @@ loop opts gfenv0 = do _ -> putStrLn "command definition not parsed" >> loopNewCPU gfenv "dt":f:ws -> do - case readTree (unwords ws) of + case readExpr (unwords ws) of Just exp -> loopNewCPU $ gfenv { commandenv = env { expmacros = Map.insert f exp (expmacros env) |