GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-10 11:42:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

fixes to Det and ComplSlash in Chi

Browse Source
This commit is contained in:
aarne
2012-10-15 20:03:13 +00:00
parent d21c9913cf
commit fefb95ecc7
8 changed files with 100 additions and 157 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/src/chinese/ResChi.gf
View File

@@ -47,6 +47,7 @@ resource ResChi = ParamX ** open Prelude in {
exclmark_s = "!" ;
ge_s = "个" ;
di_s = "是" ; -- used in QuestSlash
ba_s = "把" ;
emptyStr = [] ;
@@ -188,6 +189,7 @@ param
oper
Determiner = {s : Str ; detType : DetType} ;
Quantifier = Determiner ** {pl : Str} ;
mkDet = overload {
mkDet : Str -> Determiner = \s -> {s = s ; detType = DTFull Sg} ;
@@ -195,7 +197,11 @@ oper
mkDet : Str -> DetType -> Determiner = \s,d -> {s = s ; detType = d} ;
} ;
mkQuant : Str -> {s : Str} = ss ;
mkQuant = overload {
mkQuant : Str -> Quantifier = \s -> {s,pl = s ; detType = DTFull Sg} ;
mkQuant : Str -> DetType -> Quantifier = \s,d -> {s,pl = s ; detType = d} ;
mkQuant : Str -> Str -> DetType -> Quantifier = \s,p,d -> {s = s ; detType = d ; pl = p} ;
} ;
pronNP : (s : Str) -> NP = \s -> {
s = word s