forked from GitHub/gf-core
Rename all Language.gf to AllLan.gf to be able to build them automatically.
This commit is contained in:
@@ -1,3 +1,3 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Arabic of ArabicAbs = LangAra ;
|
concrete AllAra of AllAraAbs = LangAra ;
|
||||||
@@ -1,3 +1,3 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
abstract ArabicAbs = Lang ;
|
abstract AllAraAbs = Lang ;
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Bulgarian of BulgarianAbs =
|
concrete AllBul of AllBulAbs =
|
||||||
LangBul,
|
LangBul,
|
||||||
ExtraBul
|
ExtraBul
|
||||||
** {
|
** {
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
abstract BulgarianAbs =
|
abstract AllBulAbs =
|
||||||
Lang,
|
Lang,
|
||||||
ExtraBulAbs
|
ExtraBulAbs
|
||||||
** {
|
** {
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../romance:../abstract:../common:prelude
|
--# -path=.:../romance:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Catalan of CatalanAbs =
|
concrete AllCat of AllCatAbs =
|
||||||
LangCat,
|
LangCat,
|
||||||
IrregCat,
|
IrregCat,
|
||||||
ExtraCat
|
ExtraCat
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract CatalanAbs =
|
abstract AllCatAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregCatAbs,
|
IrregCatAbs,
|
||||||
ExtraCatAbs
|
ExtraCatAbs
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../scandinavian:../abstract:../common:prelude
|
--# -path=.:../scandinavian:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Danish of DanishAbs =
|
concrete AllDan of AllDanAbs =
|
||||||
LangDan,
|
LangDan,
|
||||||
IrregDan - [fly_V],
|
IrregDan - [fly_V],
|
||||||
ExtraDan
|
ExtraDan
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract DanishAbs =
|
abstract AllDanAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregDanAbs - [fly_V],
|
IrregDanAbs - [fly_V],
|
||||||
ExtraDanAbs
|
ExtraDanAbs
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete English of EnglishAbs =
|
concrete AllEng of AllEngAbs =
|
||||||
LangEng,
|
LangEng,
|
||||||
IrregEng-[
|
IrregEng-[
|
||||||
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
abstract EnglishAbs =
|
abstract AllEngAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregEngAbs-[
|
IrregEngAbs-[
|
||||||
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
blow_V,burn_V,come_V,dig_V,fall_V,fly_V,freeze_V,go_V,lie_V,run_V,
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Finnish of FinnishAbs =
|
concrete AllFin of AllFinAbs =
|
||||||
LangFin,
|
LangFin,
|
||||||
ExtraFin
|
ExtraFin
|
||||||
** {} ;
|
** {} ;
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract FinnishAbs =
|
abstract AllFinAbs =
|
||||||
Lang,
|
Lang,
|
||||||
ExtraFinAbs
|
ExtraFinAbs
|
||||||
** {} ;
|
** {} ;
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../romance:../abstract:../common:prelude
|
--# -path=.:../romance:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete French of FrenchAbs =
|
concrete AllFre of AllFreAbs =
|
||||||
LangFre,
|
LangFre,
|
||||||
IrregFre,
|
IrregFre,
|
||||||
ExtraFre
|
ExtraFre
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract FrenchAbs =
|
abstract AllFreAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregFreAbs,
|
IrregFreAbs,
|
||||||
ExtraFreAbs
|
ExtraFreAbs
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete German of GermanAbs =
|
concrete AllGer of AllGerAbs =
|
||||||
LangGer,
|
LangGer,
|
||||||
IrregGer,
|
IrregGer,
|
||||||
ExtraGer
|
ExtraGer
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
abstract GermanAbs =
|
abstract AllGerAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregGerAbs,
|
IrregGerAbs,
|
||||||
ExtraGerAbs
|
ExtraGerAbs
|
||||||
3
lib/resource/hindi/AllHin.gf
Normal file
3
lib/resource/hindi/AllHin.gf
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
|
concrete AllHin of AllHinAbs = LanHin ;
|
||||||
1
lib/resource/hindi/AllHinAbs.gf
Normal file
1
lib/resource/hindi/AllHinAbs.gf
Normal file
@@ -0,0 +1 @@
|
|||||||
|
abstract AllHinAbs = Lang ;
|
||||||
@@ -1,53 +0,0 @@
|
|||||||
concrete ExtraEng of ExtraEngAbs = CatEng **
|
|
||||||
open ResEng, Coordination, Prelude in {
|
|
||||||
|
|
||||||
lin
|
|
||||||
GenNP np = {s = \\_ => np.s ! Gen} ;
|
|
||||||
ComplBareVS v s = insertObj (\\_ => s.s) (predV v) ;
|
|
||||||
|
|
||||||
StrandRelSlash rp slash = {
|
|
||||||
s = \\t,a,p,ag =>
|
|
||||||
rp.s ! RC (fromAgr ag).g Acc ++ slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
|
|
||||||
c = Acc
|
|
||||||
} ;
|
|
||||||
EmptyRelSlash rp slash = {
|
|
||||||
s = \\t,a,p,_ => slash.s ! t ! a ! p ! ODir ++ slash.c2 ;
|
|
||||||
c = Acc
|
|
||||||
} ;
|
|
||||||
|
|
||||||
StrandQuestSlash ip slash =
|
|
||||||
{s = \\t,a,b,q =>
|
|
||||||
(mkQuestion (ss (ip.s ! Acc)) slash).s ! t ! a ! b ! q ++ slash.c2
|
|
||||||
};
|
|
||||||
|
|
||||||
lincat
|
|
||||||
VPI = {s : VPIForm => Agr => Str} ;
|
|
||||||
[VPI] = {s1,s2 : VPIForm => Agr => Str} ;
|
|
||||||
|
|
||||||
lin
|
|
||||||
BaseVPI = twoTable2 VPIForm Agr ;
|
|
||||||
ConsVPI = consrTable2 VPIForm Agr comma ;
|
|
||||||
|
|
||||||
MkVPI vp = {
|
|
||||||
s = \\v,a => vp.ad ++ vp.inf ++ vp.s2 ! a
|
|
||||||
} ;
|
|
||||||
ConjVPI = conjunctDistrTable2 VPIForm Agr ;
|
|
||||||
ComplVPIVV vv vpi =
|
|
||||||
insertObj (\\a => (if_then_Str vv.isAux [] "to") ++ vpi.s ! VPIInf ! a) (predVV vv) ;
|
|
||||||
|
|
||||||
UncNegCl t a cl = {s = t.s ++ a.s ++ cl.s ! t.t ! a.a ! neg ! ODir} ;
|
|
||||||
UncNegQCl t a cl = {s = \\q => t.s ++ a.s ++ cl.s ! t.t ! a.a ! neg !q} ;
|
|
||||||
UncNegRCl t a cl = {
|
|
||||||
s = \\r => t.s ++ a.s ++ cl.s ! t.t ! a.a ! neg ! r ;
|
|
||||||
c = cl.c
|
|
||||||
} ;
|
|
||||||
UncNegImpSg imp = {s = imp.s ! neg ! ImpF Sg False} ;
|
|
||||||
UncNegImpPl imp = {s = imp.s ! neg ! ImpF Pl False} ;
|
|
||||||
|
|
||||||
CompoundCN a b = {s = \\n,c => a.s ! Sg ! Nom ++ b.s ! n ! c ; g = b.g} ;
|
|
||||||
|
|
||||||
|
|
||||||
oper
|
|
||||||
neg = CNeg False ;
|
|
||||||
|
|
||||||
}
|
|
||||||
3
lib/resource/interlingua/AllIna.gf
Normal file
3
lib/resource/interlingua/AllIna.gf
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
|
concrete AllIna of AllInaAbs = LangIna ;
|
||||||
3
lib/resource/interlingua/AllInaAbs.gf
Normal file
3
lib/resource/interlingua/AllInaAbs.gf
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
|
abstract AllInaAbs = Lang ;
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../romance:../abstract:../common:prelude
|
--# -path=.:../romance:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Italian of ItalianAbs =
|
concrete AllIta of AllItaAbs =
|
||||||
LangIta,
|
LangIta,
|
||||||
-- IrregIta,
|
-- IrregIta,
|
||||||
ExtraIta
|
ExtraIta
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract ItalianAbs =
|
abstract AllItaAbs =
|
||||||
Lang,
|
Lang,
|
||||||
-- IrregItaAbs,
|
-- IrregItaAbs,
|
||||||
ExtraItaAbs
|
ExtraItaAbs
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../scandinavian:../abstract:../common:prelude
|
--# -path=.:../scandinavian:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Norwegian of NorwegianAbs =
|
concrete AllNor of AllNorAbs =
|
||||||
LangNor,
|
LangNor,
|
||||||
IrregNor - [fly_V],
|
IrregNor - [fly_V],
|
||||||
ExtraNor
|
ExtraNor
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract NorwegianAbs =
|
abstract AllNorAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregNorAbs - [fly_V],
|
IrregNorAbs - [fly_V],
|
||||||
ExtraNorAbs
|
ExtraNorAbs
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Russian of RussianAbs =
|
concrete AllRus of AllRusAbs =
|
||||||
LangRus,
|
LangRus,
|
||||||
ExtraRus
|
ExtraRus
|
||||||
** {flags coding=utf8 ;} ;
|
** {flags coding=utf8 ;} ;
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../abstract:../common:prelude
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
abstract RussianAbs =
|
abstract AllRusAbs =
|
||||||
Lang,
|
Lang,
|
||||||
ExtraRusAbs
|
ExtraRusAbs
|
||||||
** {} ;
|
** {} ;
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../romance:../abstract:../common:prelude
|
--# -path=.:../romance:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Spanish of SpanishAbs =
|
concrete AllSpa of AllSpaAbs =
|
||||||
LangSpa,
|
LangSpa,
|
||||||
IrregSpa,
|
IrregSpa,
|
||||||
ExtraSpa
|
ExtraSpa
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract SpanishAbs =
|
abstract AllSpaAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregSpaAbs,
|
IrregSpaAbs,
|
||||||
ExtraSpaAbs
|
ExtraSpaAbs
|
||||||
@@ -1,6 +1,6 @@
|
|||||||
--# -path=.:../scandinavian:../abstract:../common:prelude
|
--# -path=.:../scandinavian:../abstract:../common:prelude
|
||||||
|
|
||||||
concrete Swedish of SwedishAbs =
|
concrete AllSwe of AllSweAbs =
|
||||||
LangSwe,
|
LangSwe,
|
||||||
IrregSwe,
|
IrregSwe,
|
||||||
ExtraSwe
|
ExtraSwe
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
abstract SwedishAbs =
|
abstract AllSweAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregSweAbs,
|
IrregSweAbs,
|
||||||
ExtraSweAbs
|
ExtraSweAbs
|
||||||
3
lib/resource/thai/AllTha.gf
Normal file
3
lib/resource/thai/AllTha.gf
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
|
concrete AllTha of AllThaAbs = LangTha ;
|
||||||
3
lib/resource/thai/AllThaAbs.gf
Normal file
3
lib/resource/thai/AllThaAbs.gf
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
--# -path=.:../abstract:../common:prelude
|
||||||
|
|
||||||
|
abstract AllThaAbs = Lang ;
|
||||||
Reference in New Issue
Block a user