GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-25 02:38:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

new vocab updated for dan and nor (buggy)

Browse Source
This commit is contained in:
aarne
2005-01-23 20:39:47 +00:00
parent 852474e908
commit 1c6c42a835
5 changed files with 45 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
lib/resource/norwegian/TestResourceNor.gf
View File

@@ -1,6 +1,7 @@
--# -path=.:../scandinavian:../abstract:../../prelude
concrete TestResourceNor of TestResource = RulesNor, StructuralNor ** open MorphoNor, SyntaxNor in {
concrete TestResourceNor of TestResource = RulesNor, StructuralNor **
open Prelude, MorphoNor, SyntaxNor in {
flags startcat=Phr ; lexer=text ; unlexer=text ;
@@ -32,7 +33,7 @@ lin
Give = extTransVerb (vNopart (mkVerb "gi" "gir" "gives" "gav" "givet" "gi")) [] ** {s3 = "til"} ; ---- ?
Prefer = extTransVerb (vNopart (vSpis "foretrekk")) [] ** {s3 = "for"} ;
Say = vNopart (mkVerb "si" "sier" "sies" "sagde" "sagt" "sig") ; ---- ?
Say = vNopart (mkVerb "si" "sier" "sies" "sa" "sagt" "sig") ; ---- ?
Prove = vNopart (vSpis "bevis") ;
SwitchOn = mkDirectVerb (vHusk "lukk" ** {s1 = "opp"}) ;
SwitchOff = mkDirectVerb (vHusk "slukk" ** {s1 = []}) ;
@@ -46,4 +47,23 @@ lin
John = mkProperName "Johan" (NUtr Masc) ;
Mary = mkProperName "Maria" (NUtr NoMasc) ;
--- next
AlreadyAdv = advPre "allerede" ;
NowAdv = advPre "nå" ;
Paint = extTransVerb (vNopart (vHusk "mål")) [] ;
Green = mkAdjective "grønn" "grønt" "grøne" "grønnere" "grønnest" ;
Beg = extTransVerb (mkVerb "be" "ber" "bes" "bad" "bedt" "be") [] ** {s3 = "at"} ;
Promise = extTransVerb (vNopart (vSpis "lov")) [] ** {isAux = False} ;
Promise2 = extTransVerb (vNopart (vSpis "lov")) [] ** {s3 = "att"} ;
Wonder = extTransVerb (vNopart (vHusk "undr")) [] ;
Ask = extTransVerb (mkVerb "spørre" "spør""spørs""spurde""spurt""spør") [] ;
Tell = extTransVerb (mkVerb "fortelle" "forteller" "fortelles"
"fortalte" "fortalt" "fortell") [] ;
Look = extTransVerb (mkVerb "se" "ser" "ses" "så" "sett" "sedd") []
; ---- ut
} ;