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

fix compilation

Browse Source
This commit is contained in:
Krasimir Angelov
2026-04-13 11:04:31 +02:00
parent 6203aee170
commit 5f6a8b2905
4 changed files with 19 additions and 215 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/albanian/CatSqi.gf
View File

@@ -1,6 +1,4 @@
concrete CatSqi of Cat = CommonX ** open ParamX,Prelude,ResSqi in { concrete CatSqi of Cat = CommonX ** open ParamX,Prelude,ResSqi in {
flags
coding = "UTF-8" ;
lincat A = Adj ; lincat A = Adj ;
lincat A2 = Adj ** {c2 : Compl} ; lincat A2 = Adj ** {c2 : Compl} ;
lincat V, VA, VV, VS, VQ = Verb ; lincat V, VA, VV, VS, VQ = Verb ;

112
src/armenian/CatHye.gf
View File

@@ -1,12 +1,6 @@
concrete CatHye of Cat = CommonX ** open Prelude,ResHye in { concrete CatHye of Cat = CommonX ** open Prelude,ResHye in {
flags lincat A = Adj ;
coding = "UTF-8" ; lincat A2 = Adj ** {c2 : Compl} ;
lincat A = {s : Case => Number => Str; def_dat : Number => Str;
def_nom : Number => Str; poss1 : Case => Number => Str;
poss2 : Case => Number => Str} ;
lincat A2 = {s : Case => Number => Str; def_dat : Number => Str;
def_nom : Number => Str; poss1 : Case => Number => Str;
poss2 : Case => Number => Str; c2 : {s : Str; c : Case}} ;
lincat ACard = {s : Str} ; lincat ACard = {s : Str} ;
lincat AP = {} ; lincat AP = {} ;
lincat CN = {s : Case => Number => Str; def_dat : Number => Str; lincat CN = {s : Case => Number => Str; def_dat : Number => Str;
@@ -28,16 +22,9 @@ concrete CatHye of Cat = CommonX ** open Prelude,ResHye in {
lincat IQuant = {s : Str} ; lincat IQuant = {s : Str} ;
lincat Imp = {s : Str} ; lincat Imp = {s : Str} ;
lincat LN = {s : Str} ; lincat LN = {s : Str} ;
lincat N = {s : Case => Number => Str; def_dat : Number => Str; lincat N = Noun ;
def_nom : Number => Str; poss1 : Case => Number => Str; lincat N2 = Noun ** {c2 : Compl} ;
poss2 : Case => Number => Str} ; lincat N3 = Noun ** {c2,c3 : Compl} ;
lincat N2 = {s : Case => Number => Str; def_dat : Number => Str;
def_nom : Number => Str; poss1 : Case => Number => Str;
poss2 : Case => Number => Str; c2 : {s : Str; c : Case}} ;
lincat N3 = {s : Case => Number => Str; def_dat : Number => Str;
def_nom : Number => Str; poss1 : Case => Number => Str;
poss2 : Case => Number => Str; c2 : {s : Str; c : Case};
c3 : {s : Str; c : Case}} ;
lincat NP = {s : Case => Number => Str; def_dat : Number => Str; lincat NP = {s : Case => Number => Str; def_dat : Number => Str;
def_nom : Number => Str; poss1 : Case => Number => Str; def_nom : Number => Str; poss1 : Case => Number => Str;
poss2 : Case => Number => Str} ; poss2 : Case => Number => Str} ;
@@ -46,7 +33,7 @@ concrete CatHye of Cat = CommonX ** open Prelude,ResHye in {
lincat Ord = {s : Str} ; lincat Ord = {s : Str} ;
lincat PN = {s : Str} ; lincat PN = {s : Str} ;
lincat Predet = {s : Str} ; lincat Predet = {s : Str} ;
lincat Prep = {s : Str; c : Case; lock_Prep : {}} ; lincat Prep = Compl ;
lincat Pron = {s : Str} ; lincat Pron = {s : Str} ;
lincat QCl = {s : Str} ; lincat QCl = {s : Str} ;
lincat QS = {s : Str} ; lincat QS = {s : Str} ;
@@ -58,68 +45,10 @@ concrete CatHye of Cat = CommonX ** open Prelude,ResHye in {
lincat SN = {s : Str} ; lincat SN = {s : Str} ;
lincat SSlash = {s : Str} ; lincat SSlash = {s : Str} ;
lincat Subj = {s : Str} ; lincat Subj = {s : Str} ;
lincat V = {s : Str; causative : Str; lincat V = Verb ;
conditional : Aspect => Person => Number => Str; lincat VV,VS,VQ,VA = Verb ;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str; lincat V2 = Verb ** {c2 : Compl} ;
negative : Str; perfective : Str; simultaneous : Str}; lincat V3,V2A,V2S,V2Q,V2V = Verb ** {c2,c3 : Compl} ;
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str} ;
lincat V2 = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str;
c2 : {s : Str; c : Case}} ;
lincat V2A = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str;
c2 : {s : Str; c : Case}; c3 : {s : Str; c : Case}} ;
lincat V2Q = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str;
c2 : {s : Str; c : Case}; c3 : {s : Str; c : Case}} ;
lincat V2S = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str;
c2 : {s : Str; c : Case}; c3 : {s : Str; c : Case}} ;
lincat V2V = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str;
c2 : {s : Str; c : Case}; c3 : {s : Str; c : Case}} ;
lincat V3 = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str;
c2 : {s : Str; c : Case}; c3 : {s : Str; c : Case}} ;
lincat VA = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str} ;
lincat VP = {s : Case => Number => Str; lincat VP = {s : Case => Number => Str;
conditional : Aspect => Person => Number => Case => Number => Str; conditional : Aspect => Person => Number => Case => Number => Str;
converb : {imperfective : Case => Number => Str; converb : {imperfective : Case => Number => Str;
@@ -139,25 +68,4 @@ concrete CatHye of Cat = CommonX ** open Prelude,ResHye in {
imperative : Number => Str; passive : Str; imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str; past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str; lock_V : {}} ; subjunctive : Aspect => Person => Number => Str; lock_V : {}} ;
lincat VQ = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str} ;
lincat VS = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str} ;
lincat VV = {s : Str; causative : Str;
conditional : Aspect => Person => Number => Str;
converb : {imperfective : Str; futCon1 : Str; futCon2 : Str;
negative : Str; perfective : Str; simultaneous : Str};
imperative : Number => Str; passive : Str;
past : Person => Number => Str; participle : PartType => Str;
subjunctive : Aspect => Person => Number => Str} ;
} }

112
src/kazakh/CatKaz.gf
View File

@@ -1,8 +1,6 @@
concrete CatKaz of Cat = CommonX ** open Prelude,ResKaz in { concrete CatKaz of Cat = CommonX ** open Prelude,ResKaz in {
flags
coding = "UTF-8" ;
lincat A = {s : Str} ; lincat A = {s : Str} ;
lincat A2 = {s : Str; lock_A : {}; c2 : {s : Str}} ; lincat A2 = A ** {c2 : Compl} ;
lincat ACard = {s : Str} ; lincat ACard = {s : Str} ;
lincat AP = {s : Str} ; lincat AP = {s : Str} ;
lincat CN = {s : Case => Str} ; lincat CN = {s : Case => Str} ;
@@ -35,7 +33,7 @@ concrete CatKaz of Cat = CommonX ** open Prelude,ResKaz in {
lincat Ord = {s : Str} ; lincat Ord = {s : Str} ;
lincat PN = {s : Str} ; lincat PN = {s : Str} ;
lincat Predet = {s : Str} ; lincat Predet = {s : Str} ;
lincat Prep = {s : Str} ; lincat Prep = Compl ;
lincat Pron = {s : Str} ; lincat Pron = {s : Str} ;
lincat QCl = {s : Str} ; lincat QCl = {s : Str} ;
lincat QS = {s : Str} ; lincat QS = {s : Str} ;
@@ -47,81 +45,10 @@ concrete CatKaz of Cat = CommonX ** open Prelude,ResKaz in {
lincat SN = {s : Str} ; lincat SN = {s : Str} ;
lincat SSlash = {s : Str} ; lincat SSlash = {s : Str} ;
lincat Subj = {s : Str} ; lincat Subj = {s : Str} ;
lincat V = {infinitive : Str; lincat V = Verb ;
indicative : {fut : Str; lincat VV,VS,VQ,VA = Verb ;
pres : {progressive : Polarity => Person => Number => Str; lincat V2 = Verb ** {c2 : Compl} ;
noAspect : Polarity => Person => Number => Str}; lincat V3,V2A,V2S,V2Q,V2V = Verb ** {c2,c3 : Compl} ;
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str} ;
lincat V2 = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str; c2 : {s : Str}} ;
lincat V2A = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str; c2 : {s : Str};
c3 : {s : Str}} ;
lincat V2Q = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str; c2 : {s : Str}} ;
lincat V2S = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str; c2 : {s : Str}} ;
lincat V2V = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str; c2 : {s : Str};
c3 : {s : Str}} ;
lincat V3 = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str; c2 : {s : Str};
c3 : {s : Str}} ;
lincat VA = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str} ;
lincat VP = {infinitive : Case => Str; lincat VP = {infinitive : Case => Str;
indicative : {fut : Case => Str; indicative : {fut : Case => Str;
pres : {progressive : Polarity => Case => Str; pres : {progressive : Polarity => Case => Str;
@@ -139,31 +66,4 @@ concrete CatKaz of Cat = CommonX ** open Prelude,ResKaz in {
noAspect : Polarity => Person => Number => Str}}; noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str; imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str} ; subjunctive : Person => Number => Str} ;
lincat VQ = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str} ;
lincat VS = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str} ;
lincat VV = {infinitive : Str;
indicative : {fut : Str;
pres : {progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str};
past : {perfect : Polarity => Person => Number => Str;
progressive : Polarity => Person => Number => Str;
noAspect : Polarity => Person => Number => Str}};
imperative : Polarity => Formality => Number => Str;
subjunctive : Person => Number => Str} ;
} }

2
src/macedonian/NamesMkd.gf
View File

@@ -1,6 +1,4 @@
concrete NamesMkd of Names = CatMkd ** open Prelude,ResMkd in { concrete NamesMkd of Names = CatMkd ** open Prelude,ResMkd in {
flags
coding = "UTF-8" ;
lin AdjLN ap ln = {s = ap.s ! Indef ! GSg Masc ++ ln.s} ; lin AdjLN ap ln = {s = ap.s ! Indef ! GSg Masc ++ ln.s} ;
lin FemaleSurname sn = {s = \\r => sn.s; vocative = sn.s; lin FemaleSurname sn = {s = \\r => sn.s; vocative = sn.s;
a = {g = GSg Masc; p = P1}} ; a = {g = GSg Masc; p = P1}} ;