msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

corrections in Dutch

Browse Source
This commit is contained in:
aarne
2010-05-24 16:36:35 +00:00
parent 499467777b
commit 2dc95734e2
5 changed files with 29 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/src/dutch/ExtraDut.gf
View File

@@ -35,4 +35,10 @@ concrete ExtraDut of ExtraDutAbs = CatDut **
--
--}
lin
ICompAP ap = {s = \\_ => "hoe" ++ ap.s ! APred} ;
IAdvAdv adv = {s = "hoe" ++ adv.s} ;
}

2
lib/src/dutch/ExtraDutAbs.gf
View File

@@ -1,6 +1,6 @@
abstract ExtraDutAbs = Extra [
VPI,ListVPI,BaseVPI,ConsVPI,MkVPI,ComplVPIVV,ConjVPI,
VV,VP,Conj] **
VV,VP,Conj,IComp,ICompAP,IAdvAdv,Adv,AP,IAdv] **
{
--{
--

2
lib/src/dutch/ResDut.gf
View File

@@ -53,7 +53,7 @@ resource ResDut = ParamX ** open Prelude in {
shortVoc : Str -> Str -> Str = \v,s -> init v + endCons s ;
endCons : Str -> Str = \s -> case s of {
_ + ("ts" |"rs") => s ;
_ + ("ts" |"rs" | "ls") => s ;
b + "s" => b + "z" ;
b + "f" => b + "v" ;
_ => s

2
lib/src/dutch/StructuralDut.gf
View File

@@ -105,7 +105,7 @@ concrete StructuralDut of Structural = CatDut, Prelude **
with_Prep = mkPrep "met" ;
youSg_Pron = mkPronoun "je" "je" "je" "jij" "jou" "je" "jouwe" Utr Sg P2 ;
youPl_Pron = mkPronoun "jullie" "jullie" "je" "jullie" "jullie" "jullie" "uwe" Utr Pl P2 ;
youPol_Pron = mkPronoun "u" "u" "uw" "u" "u" "uw" "uwe" Utr Sg P3 ;
youPol_Pron = mkPronoun "u" "u" "uw" "u" "u" "uw" "uwe" Utr Sg P2 ;
yes_Utt = ss "ja" ;
not_Predet = mkPredet "niet" "niet" ;