summaryrefslogtreecommitdiff
path: root/examples/wiki/LexEditorFre.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/LexEditorFre.gf
parentb96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff)
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'examples/wiki/LexEditorFre.gf')
-rw-r--r--examples/wiki/LexEditorFre.gf64
1 files changed, 0 insertions, 64 deletions
diff --git a/examples/wiki/LexEditorFre.gf b/examples/wiki/LexEditorFre.gf
deleted file mode 100644
index 519d3d7e8..000000000
--- a/examples/wiki/LexEditorFre.gf
+++ /dev/null
@@ -1,64 +0,0 @@
-
-instance LexEditorFre of LexEditor = open SyntaxFre, ParadigmsFre, IrregFre in {
-
--- flags coding = utf8 ;
-
- oper ---
- mkAdV : Str -> AdV = \s -> {s = s ; lock_AdV = <>} ;
- myMkPN : N -> PN = \n -> {s = n.s ! singular ; g = n.g ; lock_PN = <>} ;
-
- 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 "aléatoirement") (mkVP (mkV2 verb) (mkNP det noun)))) ;
- label_Utt noun = mkUtt (mkNP (myMkPN noun)) ;
- errorMessage_Utt adj noun = mkUtt (mkS negativePol (mkCl (mkNP indefPlDet (mkCN adj noun)))) ;
-
--- Verbs
- undo_V = défaire_V2 ;
- redo_V = refaire_V2 ;
- cut_V = mkV "couper" ;
- copy_V = mkV "copier" ;
- paste_V = mkV "coller" ;
- delete_V = détruire_V2 ;
- refine_V = mkV "raffiner" ;
- replace_V = mkV "remplacer" ;
- wrap_V = mkV "emballer" ;
- select_V = mkV "selectionner" ;
- enter_V = mkV "ajouter" ;
- show_V = mkV "montrer" ;
-
--- Nouns
- language_N = mkN "langue" ;
- node_N = mkN "noeud" ;
- tree_N = mkN "arbre" masculine ;
- refinement_N = mkN "raffinement" ;
- wrapper_N = mkN "emballage" masculine ;
- string_N = mkN "chaîne" ;
- page_N = mkN "page" ;
- danish_N = mkN "danois" ;
- english_N = mkN "anglais" ;
- finnish_N = mkN "finnois" ;
- french_N = mkN "français" ;
- german_N = mkN "allemand" ;
- italian_N = mkN "italien" ;
- norwegian_N = mkN "norvégien" ;
- russian_N = mkN "russe" ;
- spanish_N = mkN "espagnol" ;
- swedish_N = mkN "suédois" ;
-
--- Adjectives
- noAdj_A = mkA "" "" "" "" ;
- available_A = mkA "disponible" ;
- next_A = mkA "prochaine" ;
- previous_A = mkA "précédent" ;
-
--- Determiners
- defSg_Det = defSgDet ;
- defPl_Det = defPlDet ;
- indefSg_Det = indefSgDet ;
- indefPl_Det = indefPlDet ;
- this_Det = mkDet this_QuantSg ;
-
-}