GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-21 09:02:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

Tense to Common ; Idiom ; Text

Browse Source
This commit is contained in:
aarne
2006-02-20 22:11:57 +00:00
parent b6957f4e41
commit e0dc7034ac
39 changed files with 255 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/resource-1.0/finnish/CatFin.gf
View File

@@ -1,4 +1,4 @@
concrete CatFin of Cat = TenseX ** open ResFin, Prelude in {
concrete CatFin of Cat = CommonX ** open ResFin, Prelude in {
flags optimize=all_subs ;
@@ -6,7 +6,7 @@ concrete CatFin of Cat = TenseX ** open ResFin, Prelude in {
-- Phrase
Text, Phr, Utt, Voc = {s : Str} ;
Utt, Voc = {s : Str} ;
-- Tensed/Untensed

7
lib/resource-1.0/finnish/IdiomFin.gf Normal file
View File

@@ -0,0 +1,7 @@
concrete IdiomFin of Idiom = CatFin **
open MorphoFin, ParadigmsFin, Prelude in {
flags optimize=all_subs ;
}

4
lib/resource-1.0/finnish/LangFin.gf
View File

@@ -11,10 +11,12 @@ concrete LangFin of Lang =
RelativeFin,
ConjunctionFin,
PhraseFin,
TextX,
IdiomFin,
StructuralFin,
LexiconFin
** {
flags startcat = Phr ;
flags startcat = Phr ; unlexer = text ; lexer = finnish ;
} ;

2
lib/resource-1.0/finnish/VerbFin.gf
View File

@@ -35,7 +35,7 @@ concrete VerbFin of Verb = CatFin ** open Prelude, ResFin in {
ComplV2A v np ap =
insertObj
(\\fin,b,_ => appCompl fin b v.c2 np ++
ap.s ! False ! AN (NCase np.a.n (npform2case v.c2.c))) --agr to obj
ap.s ! False ! AN (NCase np.a.n (npform2case v.c3.c))) --agr to obj
(predV v) ;
UseComp comp =