forked from GitHub/gf-rgl
Added ExtendGer as almost dummy to start with
This commit is contained in:
@@ -3,5 +3,8 @@
|
|||||||
concrete AllGer of AllGerAbs =
|
concrete AllGer of AllGerAbs =
|
||||||
LangGer,
|
LangGer,
|
||||||
IrregGer,
|
IrregGer,
|
||||||
|
---- ExtendGer, ---- to replace ExtraGer
|
||||||
ExtraGer
|
ExtraGer
|
||||||
** {} ;
|
**
|
||||||
|
open ExtendGer in ---- to force compilation
|
||||||
|
{} ;
|
||||||
|
|||||||
@@ -3,5 +3,6 @@
|
|||||||
abstract AllGerAbs =
|
abstract AllGerAbs =
|
||||||
Lang,
|
Lang,
|
||||||
IrregGerAbs,
|
IrregGerAbs,
|
||||||
|
---- Extend,
|
||||||
ExtraGerAbs
|
ExtraGerAbs
|
||||||
** {} ;
|
** {} ;
|
||||||
|
|||||||
19
src/german/ExtendGer.gf
Normal file
19
src/german/ExtendGer.gf
Normal file
@@ -0,0 +1,19 @@
|
|||||||
|
--# -path=alltenses:../common:../abstract
|
||||||
|
|
||||||
|
concrete ExtendGer of Extend =
|
||||||
|
CatGer ** ExtendFunctor
|
||||||
|
- [InOrderToVP]
|
||||||
|
with
|
||||||
|
(Grammar = GrammarGer) **
|
||||||
|
open
|
||||||
|
GrammarGer,
|
||||||
|
ResGer,
|
||||||
|
Coordination,
|
||||||
|
Prelude,
|
||||||
|
ParadigmsGer in {
|
||||||
|
|
||||||
|
lin
|
||||||
|
|
||||||
|
InOrderToVP vp = {s = "um" ++ useInfVP False vp} ;
|
||||||
|
|
||||||
|
}
|
||||||
Reference in New Issue
Block a user