GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-09-18 08:16:05 -06:00
Code Issues Packages Projects Releases Wiki Activity

make the case an argument of mkPrep

Browse Source
This commit is contained in:
Krasimir Angelov
2026-09-18 09:25:01 +02:00
parent 96e9ee9994
commit 470f2cc796
2 changed files with 28 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/albanian/ParadigmsSqi.gf
+7 -15
View File
@@ -4,6 +4,11 @@ oper
singular : Number = Sg ; singular : Number = Sg ;
plural : Number = Pl ; plural : Number = Pl ;
nominative : Case = Nom ;
accusative : Case = Acc ;
dative : Case = Dat ;
ablative : Case = Ablat ;
oper oper
regN : Str -> N -- s;Indef;Nom;Sg regN : Str -> N -- s;Indef;Nom;Sg
= \form -> case form of { = \form -> case form of {
@@ -1435,22 +1440,9 @@ mkCard : Str -> Card = \s -> lin Card {s=s} ;
mkACard : Str -> ACard = \s -> lin ACard {s=s} ; mkACard : Str -> ACard = \s -> lin ACard {s=s} ;
mkPredet : Str -> Predet = \s -> lin Predet {s=s} ; mkPredet : Str -> Predet = \s -> lin Predet {s=s} ;
mkPrep : Str -> Prep = \s -> lin Prep { mkPrep : Str -> Case -> Prep = \s,c -> lin Prep {
s=s; s=s;
c=case s of { c=c
"nga" => Nom;
"prej" => Ablat;
"gjatë" => Ablat;
"pas" => Ablat;
"para" => Ablat;
"prapa" => Ablat;
"midis" => Ablat;
"mes" => Ablat;
"përveç" => Ablat;
"përtej" => Ablat;
"krahas" => Ablat;
_ => Acc
}
} ; } ;
noPrep : Prep = lin Prep {s=""; c=Acc} ; noPrep : Prep = lin Prep {s=""; c=Acc} ;
src/albanian/StructuralSqi.gf
+21 -21
View File
@@ -67,27 +67,27 @@ lin
or_Conj = mkConj "ose" ; or_Conj = mkConj "ose" ;
if_then_Conj = mkConj "nëse" ; if_then_Conj = mkConj "nëse" ;
above_Prep = mkPrep "mbi" ; above_Prep = mkPrep "mbi" accusative ;
after_Prep = mkPrep "pas" ; after_Prep = mkPrep "pas" ablative ;
before_Prep = mkPrep "para" ; before_Prep = mkPrep "para" ablative ;
behind_Prep = mkPrep "prapa" ; behind_Prep = mkPrep "prapa" ablative ;
between_Prep = mkPrep "midis" ; between_Prep = mkPrep "midis" ablative ;
by8agent_Prep = mkPrep "nga" ; by8agent_Prep = mkPrep "nga" nominative ;
by8means_Prep = mkPrep "me" ; by8means_Prep = mkPrep "me" accusative ;
during_Prep = mkPrep "gjatë" ; during_Prep = mkPrep "gjatë" ablative ;
except_Prep = mkPrep "përveç" ; except_Prep = mkPrep "përveç" ablative ;
for_Prep = mkPrep "për" ; for_Prep = mkPrep "për" accusative ;
from_Prep = mkPrep "nga" ; from_Prep = mkPrep "nga" nominative ;
in8front_Prep = mkPrep "përpara" ; in8front_Prep = mkPrep "përpara" accusative ;
in_Prep = mkPrep "në" ; in_Prep = mkPrep "në" accusative ;
on_Prep = mkPrep "mbi" ; on_Prep = mkPrep "mbi" accusative ;
part_Prep = mkPrep "nga" ; part_Prep = mkPrep "nga" nominative ;
possess_Prep = mkPrep "i" ; possess_Prep = mkPrep "i" accusative ;
through_Prep = mkPrep "përmes" ; through_Prep = mkPrep "përmes" accusative ;
to_Prep = mkPrep "te" ; to_Prep = mkPrep "te" accusative ;
under_Prep = mkPrep "nën" ; under_Prep = mkPrep "nën" accusative ;
with_Prep = mkPrep "me" ; with_Prep = mkPrep "me" accusative ;
without_Prep = mkPrep "pa" ; without_Prep = mkPrep "pa" accusative ;
although_Subj = mkSubj "megjithëse" ; although_Subj = mkSubj "megjithëse" ;
because_Subj = mkSubj "sepse" ; because_Subj = mkSubj "sepse" ;