diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-10-31 14:39:47 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-10-31 14:39:47 +0000 |
| commit | 0c1f5cf9f2ae21490af5c5ff3eddabf193c02578 (patch) | |
| tree | 2f8cf741c1f75b2a7a16a4f2a2473c46b24e9dcf /next-lib/src/italian/StructuralIta.gf | |
| parent | 88fa05749b90a7447a058025ba90082464516253 (diff) | |
fixed some spurious errors in romance
Diffstat (limited to 'next-lib/src/italian/StructuralIta.gf')
| -rw-r--r-- | next-lib/src/italian/StructuralIta.gf | 8 |
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 } |
