From 3589e352cc49c99e9335a97a476fd827b382db2f Mon Sep 17 00:00:00 2001 From: aarne Date: Sat, 4 Mar 2006 14:58:11 +0000 Subject: treebank creating script; duplicated consonants in LexiconEng --- src/GF/Shell/HelpFile.hs | 16 ++++++++++++---- src/GF/Shell/PShell.hs | 2 +- 2 files changed, 13 insertions(+), 5 deletions(-) (limited to 'src/GF/Shell') diff --git a/src/GF/Shell/HelpFile.hs b/src/GF/Shell/HelpFile.hs index d89877a3d..ca795d01c 100644 --- a/src/GF/Shell/HelpFile.hs +++ b/src/GF/Shell/HelpFile.hs @@ -245,11 +245,19 @@ txtHelpFile = "\n rf tb.xml | tb -c -- compare-test treebank from file" ++ "\n rf old.xml | tb -trees | tb -xml -- create new treebank from old" ++ "\n" ++ - "\nlt, lookup_treebank: lt String" ++ + "\nut, use_treebank: ut String" ++ "\n Lookup a string in a treebank and return the resulting trees." ++ - "\n Use 'tb' to create a treebank and 'i -treebank' to read it in memory." ++ - "\n flag:" ++ - "\n -treebank use this treebank (instead of the latest introduced one) TODO" ++ + "\n Use 'tb' to create a treebank and 'i -treebank' to read one from" ++ + "\n a file." ++ + "\n options:" ++ + "\n -assocs show all string-trees associations in the treebank" ++ + "\n -strings show all strings in the treebank" ++ + "\n -raw return result as string, without typechecking it" ++ + "\n flags:" ++ + "\n -treebank use this treebank (instead of the latest introduced one)" ++ + "\n examples:" ++ + "\n ut \"He adds this to that\" | l -multi -- use treebank lookup as parser in translation" ++ + "\n ut -assocs | grep \"ComplV2\" -- show all associations with ComplV2" ++ "\n" ++ "\ntt, test_tokenizer: tt String" ++ "\n Show the token list sent to the parser when String is parsed." ++ diff --git a/src/GF/Shell/PShell.hs b/src/GF/Shell/PShell.hs index 2c501ab9f..159910755 100644 --- a/src/GF/Shell/PShell.hs +++ b/src/GF/Shell/PShell.hs @@ -114,7 +114,7 @@ pCommand ws = case ws of "cc" : s -> aUnit $ CComputeConcrete $ unwords s "so" : s -> aUnit $ CShowOpers $ unwords s "tb" : [] -> aUnit CTreeBank - "lt" : s -> aString CLookupTreebank s + "ut" : s -> aString CLookupTreebank s "tq" : i:o:[] -> aUnit (CTranslationQuiz (language i) (language o)) "tl":i:o:[] -> aUnit (CTranslationList (language i) (language o)) -- cgit v1.2.3