GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-20 18:29:33 -06:00
Code Issues Packages Projects Releases Wiki Activity

fixes before beta3 release

Browse Source
This commit is contained in:
aarne
2009-04-02 09:35:48 +00:00
parent a94143ee92
commit 6bb85a8f41
10 changed files with 45 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
next-lib/src/english/MakeStructuralEng.gf
View File

@@ -3,8 +3,8 @@
resource MakeStructuralEng = open CatEng, ParadigmsEng, ResEng, MorphoEng, Prelude in {
oper
mkConj : Str -> Str -> Number -> Conj = \x,y,n ->
{s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ;
-- mkConj : Str -> Str -> Number -> Conj = \x,y,n ->
-- {s1 = x ; s2 = y ; n = n ; lock_Conj = <>} ;
mkSubj : Str -> Subj = \x ->
{s = x ; lock_Subj = <>} ;
mkNP : Str -> Number -> NP = \s,n ->

3
next-lib/src/english/StructuralEng.gf
View File

@@ -1,5 +1,6 @@
concrete StructuralEng of Structural = CatEng **
open MorphoEng, ResEng, ParadigmsEng, (C = ConstructX), Prelude in {
open MorphoEng, ResEng, ParadigmsEng, MakeStructuralEng,
(C = ConstructX), Prelude in {
flags optimize=all ;

4
next-lib/src/french/StructuralFre.gf
View File

@@ -1,7 +1,9 @@
--# -path=.:../abstract:../romance:../common:prelude
concrete StructuralFre of Structural = CatFre **
open PhonoFre, MorphoFre, ParadigmsFre, IrregFre, (X = ConstructX), Prelude in {
open PhonoFre, MorphoFre, ParadigmsFre, IrregFre, (X = ConstructX),
MakeStructuralFre,
Prelude in {
flags optimize=all ; coding=utf8 ;

3
next-lib/src/swedish/StructuralSwe.gf
View File

@@ -1,5 +1,6 @@
concrete StructuralSwe of Structural = CatSwe **
open MorphoSwe, ParadigmsSwe, (X = ConstructX), Prelude in {
open MorphoSwe, ParadigmsSwe, MakeStructuralSwe,
(X = ConstructX), Prelude in {
flags optimize=all ;