summaryrefslogtreecommitdiff
path: root/examples/wiki/LexEditorSpa.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/LexEditorSpa.gf
parentb96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff)
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'examples/wiki/LexEditorSpa.gf')
-rw-r--r--examples/wiki/LexEditorSpa.gf67
1 files changed, 0 insertions, 67 deletions
diff --git a/examples/wiki/LexEditorSpa.gf b/examples/wiki/LexEditorSpa.gf
deleted file mode 100644
index 1e0c8793d..000000000
--- a/examples/wiki/LexEditorSpa.gf
+++ /dev/null
@@ -1,67 +0,0 @@
-
-instance LexEditorSpa of LexEditor = open SyntaxSpa, IrregSpa, ParadigmsSpa in {
-
- flags coding = utf8 ;
-
- oper
--- Sentences
- singleWordCommand_Utt verb = mkUtt (mkVP verb) ;
- command_Utt verb det adj noun = mkUtt (mkVP (mkV2 verb) (mkNP det (mkCN adj noun))) ;
- randomlyCommand_Utt verb det noun = mkUtt (mkVP (mkAdV "aleatoriamente") (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 = deshacer_V ;
--- redo_V = rehacer_V ;
- undo_V = mkV "Deshacer" ;
- redo_V = mkV "Rehacer" ;
- cut_V = mkV "Cortar" ;
- copy_V = mkV "Copiar" ;
- paste_V = mkV "Pegar" ;
- delete_V = mkV "Borrar" ;
- refine_V = mkV "Refinar" ;
- replace_V = mkV "Reemplazar" ;
--- wrap_V = envolver_V ;
- wrap_V = mkV "Envolver" ;
- select_V = mkV "Seleccionar" ;
- enter_V = mkV "Introducir" ;
- show_V = mkV "Mostrar" ;
-
--- Nouns
- language_N = mkN "lenguaje" ;
- node_N = mkN "nodo" ;
- tree_N = mkN "árbol" ;
- refinement_N = mkN "refinamiento" ;
- wrapper_N = mkN "envoltura" ;
- string_N = compN (mkN "cadena") ("de" ++ "caracteres") ;
- page_N = mkN "página" ;
- danish_N = mkN "Danés" ;
- english_N = mkN "Inglés" ;
- finnish_N = mkN "Finlandés" ;
- french_N = mkN "Francés" ;
- german_N = mkN "Alemán" ;
- italian_N = mkN "Italiano" ;
- norwegian_N = mkN "Noruego" ;
- russian_N = mkN "Ruso" ;
- spanish_N = mkN "Español" ;
- swedish_N = mkN "Sueco" ;
-
--- Adjectives
- noAdj_A = mkA "" ;
- available_A = mkA "disponible" ;
- next_A = mkA "siguiente" ;
- previous_A = mkA "anterior" ;
-
--- Determiners
- defSg_Det = defSgDet ;
- defPl_Det = defPlDet ;
- indefSg_Det = indefSgDet ;
- indefPl_Det = indefPlDet ;
- this_Det = mkDet this_QuantSg ;
-
--- Functions
- myMkPN : N -> PN =
- \n -> {s = n.s ! singular ; g = n.g ; lock_PN = <>} ;
-
-}