summaryrefslogtreecommitdiff
path: root/examples/wiki/LexEditorFin.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2008-06-25 16:54:35 +0000
committeraarne <aarne@cs.chalmers.se>2008-06-25 16:54:35 +0000
commite9e80fc389365e24d4300d7d5390c7d833a96c50 (patch)
treef0b58473adaa670bd8fc52ada419d8cad470ee03 /examples/wiki/LexEditorFin.gf
parentb96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff)
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'examples/wiki/LexEditorFin.gf')
-rw-r--r--examples/wiki/LexEditorFin.gf62
1 files changed, 0 insertions, 62 deletions
diff --git a/examples/wiki/LexEditorFin.gf b/examples/wiki/LexEditorFin.gf
deleted file mode 100644
index 21bd9ae00..000000000
--- a/examples/wiki/LexEditorFin.gf
+++ /dev/null
@@ -1,62 +0,0 @@
-
-instance LexEditorFin of LexEditor = open SyntaxFin, ParadigmsFin in {
-
--- flags coding = utf8 ;
-
- oper mkAdV : Str -> AdV = \s -> {s = s ; lock_AdV = <>} ;
-
- oper
--- Sentences
- singleWordCommand_Utt verb = mkUtt politeImpForm positivePol (mkImp verb) ;
- command_Utt verb det adj noun = mkUtt politeImpForm positivePol (mkImp (mkVP (mkV2 verb) (mkNP det (mkCN adj noun)))) ;
- randomlyCommand_Utt verb det noun = mkUtt politeImpForm positivePol (mkImp (mkVP (mkAdV "satunnaisesti") (mkVP (mkV2 verb) (mkNP det noun)))) ;
- label_Utt noun = mkUtt (mkNP (mkPN noun)) ;
- errorMessage_Utt adj noun = mkUtt (mkS negativePol (mkCl (mkNP indefPlDet (mkCN adj noun)))) ;
-
--- Verbs
- undo_V = mkV "perua" ;
- redo_V = mkV "toistaa" ;
- cut_V = mkV "leikata" ;
- copy_V = mkV "kopioida" ;
- paste_V = mkV "liimata" ;
- delete_V = mkV "poistaa" ;
- refine_V = mkV "hienontaa" ;
- replace_V = mkV "korvata" ;
- wrap_V = mkV "kääriä" ;
- select_V = mkV "valita" ;
- enter_V = mkV "lisätä" ;
- show_V = mkV "näyttää" ;
-
--- Nouns
- language_N = mkN "kieli" "kieliä" ;
- node_N = mkN "solmu" ;
- tree_N = mkN "puu" ;
- refinement_N = mkN "hienonnus" ;
- wrapper_N = mkN "kääre" ;
- string_N = mkN "merkkijono" ;
- page_N = mkN "sivu" ;
- danish_N = mkN "tanska" ;
- english_N = mkN "englanti" ;
- finnish_N = mkN "suomi" "suomia" ;
- french_N = mkN "ranska" ;
- german_N = mkN "saksa" ;
- italian_N = mkN "italia" ;
- norwegian_N = mkN "norja" ;
- russian_N = mkN "venäjä" ;
- spanish_N = mkN "espanja" ;
- swedish_N = mkN "ruotsi" ;
-
--- Adjectives
- noAdj_A = mkA "" ;
- available_A = mkA "saatavillaoleva" ;
- next_A = mkA "seuraava" ;
- previous_A = mkA "edellinen" ;
-
--- Determiners
- defSg_Det = defSgDet ;
- defPl_Det = defPlDet ;
- indefSg_Det = indefSgDet ;
- indefPl_Det = indefPlDet ;
- this_Det = mkDet this_QuantSg ;
-
-}