mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-18 07:40:16 -06:00
fix the word order for superlatives
This commit is contained in:
@@ -6,6 +6,6 @@ concrete CompatibilitySpa of Compatibility = CatSpa ** open Prelude, CommonRoman
|
||||
|
||||
lin
|
||||
NumInt n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
|
||||
OrdInt n = {s = \\_ => n.s ++ SOFT_BIND ++ "."} ; ---
|
||||
OrdInt n = {s = \\_ => n.s ++ SOFT_BIND ++ "." ; s2 = \\_ => []} ; ---
|
||||
|
||||
}
|
||||
|
||||
@@ -240,4 +240,7 @@ instance DiffSpa of DiffRomance - [iAdvQuestionInv,otherInv,partAgr,stare_V,vpAg
|
||||
param
|
||||
HasArt = NoArt | UseArt ;
|
||||
|
||||
oper
|
||||
superlCanBePost = True ;
|
||||
|
||||
}
|
||||
|
||||
@@ -60,7 +60,7 @@ oper
|
||||
s,sp = \\_,c => prepCase c ++ piu ;
|
||||
spn = \\c => prepCase c ++ piu ;
|
||||
n = n ;
|
||||
s2 = [] ;
|
||||
s2 = \\g => [] ;
|
||||
isNeg = False
|
||||
} ;
|
||||
-- Inflects for number
|
||||
@@ -68,7 +68,7 @@ oper
|
||||
s,sp = \\g,c => prepCase c ++ genForms alcuni alcune ! g ;
|
||||
spn = \\c => prepCase c ++ alcuni ;
|
||||
n = n ;
|
||||
s2 = [] ;
|
||||
s2 = \\g => [] ;
|
||||
isNeg = False
|
||||
} ;
|
||||
} ;
|
||||
|
||||
@@ -237,6 +237,7 @@ oper
|
||||
mkOrdinal : A -> Ord = \adj->
|
||||
lin Ord {
|
||||
s = \\ag => adj.s ! genNum2Aform ag.g ag.n ;
|
||||
s2 = \\_ => []
|
||||
} ;
|
||||
|
||||
mkQuantifier : (ese,esa,esos,esas,eso : Str) -> Quant = \ese,esa,esos,esas,eso->
|
||||
@@ -261,7 +262,7 @@ oper
|
||||
s,sp = \\g,c => prepCase c ++ genForms mucho mucha ! g ;
|
||||
spn = \\c => prepCase c ++ mucho ;
|
||||
n = number;
|
||||
s2 = [] ;
|
||||
s2 = \\c => [] ;
|
||||
isNeg = neg
|
||||
} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user