mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-26 03:08:55 -06:00
Possessive constructor in Romance: un-record arguments to work around a PGF bug
This commit is contained in:
@@ -53,7 +53,7 @@ interface DiffRomance = open CommonRomance, Prelude in {
|
||||
|
||||
--2 Constants that must derivatively depend on language
|
||||
|
||||
param NPForm = Ton Case | Aton Case | Poss {g : Gender ; n : Number} ; --- AAgr
|
||||
param NPForm = Ton Case | Aton Case | Poss Gender Number ; --- AAgr
|
||||
|
||||
oper dative : Case ;
|
||||
oper genitive : Case ;
|
||||
|
||||
@@ -79,7 +79,7 @@ incomplete concrete NounRomance of Noun =
|
||||
} ;
|
||||
|
||||
PossPron p = {
|
||||
s = \\n,g,c => possCase g n c ++ p.s ! Poss (aagr g n) ---- il mio!
|
||||
s = \\n,g,c => possCase g n c ++ p.s ! Poss g n ---- il mio!
|
||||
} ;
|
||||
|
||||
NumSg = {s = \\_ => [] ; isNum = False ; n = Sg} ;
|
||||
|
||||
@@ -28,7 +28,7 @@ oper
|
||||
|
||||
npform2case : NPForm -> Case = \p -> case p of {
|
||||
Ton x => x ;
|
||||
Poss _ => genitive ;
|
||||
Poss _ _ => genitive ;
|
||||
Aton x => x
|
||||
} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user