Some peacekeeping clean-up, still far from compiling.

This commit is contained in:
bjorn
2008-08-18 20:22:25 +00:00
parent 256ab54807
commit 401d1cd7d1
11 changed files with 18 additions and 42 deletions

View File

@@ -0,0 +1,2 @@
peace.pgf:
gfc --make english/Peace_Eng.gf swedish/Peace_Swe.gf

View File

@@ -1,4 +1,8 @@
abstract Peace = abstract Peace =
PeaceSyntax, PeaceLexCommon, PeaceSyntax, PeaceLexCommon,
PeaceLexExt, PeacePhrases PeaceLexExt, PeacePhrases
** {} ** {
flags startcat = PhraseWritten ;
}

View File

@@ -1 +1,5 @@
abstract PeaceSpoken = Peace ** {} abstract PeaceSpoken = Peace ** {
flags startcat = PhraseSpoken ;
}

View File

@@ -2,8 +2,6 @@ incomplete concrete PeaceSyntaxI of PeaceSyntax =
PeaceCatI ** open Lang,PeaceRes in { PeaceCatI ** open Lang,PeaceRes in {
flags flags
-- optimize = all_subs ;
optimize = share ;
unlexer = text ; lexer = text ; unlexer = text ; lexer = text ;
lincat lincat

View File

@@ -1,8 +1,4 @@
--# -path=.:..:present:prelude --# -path=.:..:present:prelude
concrete PeaceSpoken_Eng of PeaceSpoken = concrete PeaceSpoken_Eng of PeaceSpoken =
Peace_Eng ** { Peace_Eng;
flags startcat = PhraseSpoken ;
}

View File

@@ -2,9 +2,4 @@
concrete Peace_Eng of Peace = concrete Peace_Eng of Peace =
PeaceSyntax_Eng, PeaceLexCommon_Eng, PeaceSyntax_Eng, PeaceLexCommon_Eng,
PeaceLexExt_Eng, PeacePhrases_Eng PeaceLexExt_Eng, PeacePhrases_Eng;
** {
flags startcat = PhraseWritten ;
}

View File

@@ -1,8 +1,3 @@
--# -path=.:..:present:prelude --# -path=.:..:present:prelude
concrete PeaceSpoken_Fin of PeaceSpoken = concrete PeaceSpoken_Fin of PeaceSpoken = Peace_Fin;
Peace_Fin ** {
flags startcat = PhraseSpoken ;
}

View File

@@ -2,9 +2,4 @@
concrete Peace_Fin of Peace = concrete Peace_Fin of Peace =
PeaceSyntax_Fin, PeaceLexCommon_Fin, PeaceSyntax_Fin, PeaceLexCommon_Fin,
PeaceLexExt_Fin, PeacePhrases_Fin PeaceLexExt_Fin, PeacePhrases_Fin;
** {
flags startcat = PhraseWritten ;
optimize = all_subs ;
}

View File

@@ -1,4 +0,0 @@
i -optimize=share english/Peace_Eng.gf
i -optimize=share swedish/Peace_Swe.gf
s
pm | wf peace.gfcm

View File

@@ -1,8 +1,4 @@
--# -path=.:..:present:prelude --# -path=.:..:present:prelude
concrete PeaceSpoken_Swe of PeaceSpoken = concrete PeaceSpoken_Swe of PeaceSpoken =
Peace_Swe ** { Peace_Swe;
flags startcat = PhraseSpoken ;
}

View File

@@ -2,9 +2,4 @@
concrete Peace_Swe of Peace = concrete Peace_Swe of Peace =
PeaceSyntax_Swe, PeaceLexCommon_Swe, PeaceSyntax_Swe, PeaceLexCommon_Swe,
PeaceLexExt_Swe, PeacePhrases_Swe PeaceLexExt_Swe, PeacePhrases_Swe;
** {
flags startcat = PhraseWritten ;
}