summaryrefslogtreecommitdiff
path: root/next-lib/src/italian/StructuralIta.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2008-10-31 14:39:47 +0000
committeraarne <aarne@cs.chalmers.se>2008-10-31 14:39:47 +0000
commit0c1f5cf9f2ae21490af5c5ff3eddabf193c02578 (patch)
tree2f8cf741c1f75b2a7a16a4f2a2473c46b24e9dcf /next-lib/src/italian/StructuralIta.gf
parent88fa05749b90a7447a058025ba90082464516253 (diff)
fixed some spurious errors in romance
Diffstat (limited to 'next-lib/src/italian/StructuralIta.gf')
-rw-r--r--next-lib/src/italian/StructuralIta.gf8
1 files changed, 5 insertions, 3 deletions
diff --git a/next-lib/src/italian/StructuralIta.gf b/next-lib/src/italian/StructuralIta.gf
index c8d3618a3..905355b0f 100644
--- a/next-lib/src/italian/StructuralIta.gf
+++ b/next-lib/src/italian/StructuralIta.gf
@@ -1,5 +1,7 @@
concrete StructuralIta of Structural = CatIta **
- open PhonoIta, MorphoIta, ParadigmsIta, BeschIta, Prelude in {
+ open
+ PhonoIta, MorphoIta,
+ ParadigmsIta, BeschIta, Prelude in {
flags optimize=all ; coding=utf8 ;
@@ -82,7 +84,7 @@ lin
something_NP = pn2np (mkPN ["qualche cosa"] Masc) ;
somewhere_Adv = ss ["qualche parte"] ;
that_Quant = let
- quello : Str -> Str -> Number => Gender => Case => Str =
+ quello : Str -> Str -> ParadigmsIta.Number => ParadigmsIta.Gender => Case => Str =
\quel, quelli -> table {
Sg => \\g,c => prepCase c ++ genForms quel "quella" ! g ;
Pl => \\g,c => prepCase c ++ genForms quelli "quelle" ! g ---- quegli
@@ -104,7 +106,7 @@ lin
Masc Pl P3 ;
this_Quant = let
- questo : Number => Gender => Case => Str = table {
+ questo : ParadigmsIta.Number => ParadigmsIta.Gender => Case => Str = table {
Sg => \\g,c => prepCase c ++ genForms "questo" "questa" ! g ;
Pl => \\g,c => prepCase c ++ genForms "questi" "queste" ! g
}