From 71f3b2dc78a0af6df6644929bd9819d63c8611be Mon Sep 17 00:00:00 2001
From: Aarne Ranta <aarne@chalmers.se>
Date: Thu, 25 Jul 2024 11:55:55 +0200
Subject: [PATCH] MakeStructural.mkDet in Ita and Por

---
 src/italian/MakeStructuralIta.gf    | 11 +++++++++--
 src/portuguese/MakeStructuralPor.gf | 30 +++++++++++++++++++++++++++++
 2 files changed, 39 insertions(+), 2 deletions(-)

diff --git a/src/italian/MakeStructuralIta.gf b/src/italian/MakeStructuralIta.gf
index 67600e67e..4e80702c9 100644
--- a/src/italian/MakeStructuralIta.gf
+++ b/src/italian/MakeStructuralIta.gf
@@ -61,7 +61,14 @@ oper
   } ;
 
   mkDet = overload {
-    -- Does not inflect for number
+    -- singular, does not inflect for gender
+    mkDet : Str ->  Det = \piu -> lin Det {
+      s,sp = \\_,_ => piu ;
+      spn = \\_ => piu ;
+      n = Sg ;
+      s2 = \\g => [] ;
+      isNeg = False
+    } ;
     mkDet : Str -> Number -> Det = \piu,n -> lin Det {
       s,sp = \\_,_ => piu ;
       spn = \\_ => piu ;
@@ -69,7 +76,7 @@ oper
       s2 = \\g => [] ;
       isNeg = False
     } ;
-    -- Inflects for number
+    -- Inflects for gender
     mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
       s,sp = table {
         Masc => \\_ => alcuni ;
diff --git a/src/portuguese/MakeStructuralPor.gf b/src/portuguese/MakeStructuralPor.gf
index 87ab6dc31..d856016f3 100644
--- a/src/portuguese/MakeStructuralPor.gf
+++ b/src/portuguese/MakeStructuralPor.gf
@@ -19,4 +19,34 @@ oper
     a = if_then_else PAgr p (PAg Sg) PNoAg ---- e,g, "chacun de"; other possibilities?
     } ;
 
+  mkDet = overload {
+    -- singular, does not inflect for gender
+    mkDet : Str ->  Det = \piu -> lin Det {
+      s,sp = \\_,_ => piu ;
+      spn = \\_ => piu ;
+      n = Sg ;
+      s2 = \\g => [] ;
+      isNeg = False
+    } ;
+    mkDet : Str -> Number -> Det = \piu,n -> lin Det {
+      s,sp = \\_,_ => piu ;
+      spn = \\_ => piu ;
+      n = n ;
+      s2 = \\g => [] ;
+      isNeg = False
+    } ;
+    -- Inflects for gender
+    mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
+      s,sp = table {
+        Masc => \\_ => alcuni ;
+        Fem  => \\_ => alcune
+      } ;
+      spn = \\_ => alcuni ;
+      n = n ;
+      s2 = \\g => [] ;
+      isNeg = False
+    } ;
+  } ;
+
+
 } ;