diff options
Diffstat (limited to 'src/GF/Command/Commands.hs')
| -rw-r--r-- | src/GF/Command/Commands.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/GF/Command/Commands.hs b/src/GF/Command/Commands.hs index a54067dd6..d8e2a3023 100644 --- a/src/GF/Command/Commands.hs +++ b/src/GF/Command/Commands.hs @@ -506,6 +506,8 @@ allCommands cod env@(pgf, mos) = Map.fromList [ exec = \opts _ -> do let file = valStrOpts "file" "_gftmp" opts let exprs [] = ([],empty) + exprs ((n,s):ls) | null s + = exprs ls exprs ((n,s):ls) = case readExpr s of Just e -> let (es,err) = exprs ls in case inferExpr pgf e of |