1
0
forked from GitHub/gf-core

command eh ; lib/doc/tour started

This commit is contained in:
aarne
2010-02-03 20:55:54 +00:00
parent b90e56a94e
commit 064cfef331
2 changed files with 5 additions and 1 deletions

View File

@@ -5,7 +5,7 @@ instance LexFoodsGer of LexFoods =
oper
wine_N = mkN "Wein" ;
pizza_N = mkN "Pizza" "Pizzen" feminine ;
cheese_N = mkN "Käse" "Käsen" masculine ;
cheese_N = mkN "Käse" "Käse" masculine ;
fish_N = mkN "Fisch" ;
fresh_A = mkA "frisch" ;
warm_A = mkA "warm" "wärmer" "wärmste" ;

View File

@@ -130,6 +130,10 @@ loop opts gfenv0 = do
writeFile "_gfdepgraph.dot" (depGraph sgr)
putStrLn "wrote graph in file _gfdepgraph.dot"
loopNewCPU gfenv
"eh":w:_ -> do
cs <- readFile w >>= return . map (interpretCommandLine enc env) . lines
loopNewCPU gfenv
"i":args -> do
gfenv' <- case parseOptions args of
Ok (opts',files) -> do