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 ;
plural : Number = Pl ;
nominative : Case = Nom ;
accusative : Case = Acc ;
dative : Case = Dat ;
ablative : Case = Ablat ;
oper
regN : Str -> N -- s;Indef;Nom;Sg
= \form -> case form of {
@@ -1435,22 +1440,9 @@ mkCard : Str -> Card = \s -> lin Card {s=s} ;
mkACard : Str -> ACard = \s -> lin ACard {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;
c=case s of {
"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
}
c=c
} ;
noPrep : Prep = lin Prep {s=""; c=Acc} ;
src/albanian/StructuralSqi.gf
+21 -21
View File
@@ -67,27 +67,27 @@ lin
or_Conj = mkConj "ose" ;
if_then_Conj = mkConj "nëse" ;
above_Prep = mkPrep "mbi" ;
after_Prep = mkPrep "pas" ;
before_Prep = mkPrep "para" ;
behind_Prep = mkPrep "prapa" ;
between_Prep = mkPrep "midis" ;
by8agent_Prep = mkPrep "nga" ;
by8means_Prep = mkPrep "me" ;
during_Prep = mkPrep "gjatë" ;
except_Prep = mkPrep "përveç" ;
for_Prep = mkPrep "për" ;
from_Prep = mkPrep "nga" ;
in8front_Prep = mkPrep "përpara" ;
in_Prep = mkPrep "në" ;
on_Prep = mkPrep "mbi" ;
part_Prep = mkPrep "nga" ;
possess_Prep = mkPrep "i" ;
through_Prep = mkPrep "përmes" ;
to_Prep = mkPrep "te" ;
under_Prep = mkPrep "nën" ;
with_Prep = mkPrep "me" ;
without_Prep = mkPrep "pa" ;
above_Prep = mkPrep "mbi" accusative ;
after_Prep = mkPrep "pas" ablative ;
before_Prep = mkPrep "para" ablative ;
behind_Prep = mkPrep "prapa" ablative ;
between_Prep = mkPrep "midis" ablative ;
by8agent_Prep = mkPrep "nga" nominative ;
by8means_Prep = mkPrep "me" accusative ;
during_Prep = mkPrep "gjatë" ablative ;
except_Prep = mkPrep "përveç" ablative ;
for_Prep = mkPrep "për" accusative ;
from_Prep = mkPrep "nga" nominative ;
in8front_Prep = mkPrep "përpara" accusative ;
in_Prep = mkPrep "në" accusative ;
on_Prep = mkPrep "mbi" accusative ;
part_Prep = mkPrep "nga" nominative ;
possess_Prep = mkPrep "i" accusative ;
through_Prep = mkPrep "përmes" accusative ;
to_Prep = mkPrep "te" accusative ;
under_Prep = mkPrep "nën" accusative ;
with_Prep = mkPrep "me" accusative ;
without_Prep = mkPrep "pa" accusative ;
although_Subj = mkSubj "megjithëse" ;
because_Subj = mkSubj "sepse" ;