forked from GitHub/gf-rgl
fixed the mysterious "file..gfc" error
This commit is contained in:
@@ -1,4 +1,4 @@
|
|||||||
GF=gf
|
GF=gf -s
|
||||||
RTS=+RTS -M800M -K100M
|
RTS=+RTS -M800M -K100M
|
||||||
RTSS=+RTS -M1000M -K100M
|
RTSS=+RTS -M1000M -K100M
|
||||||
|
|
||||||
@@ -12,7 +12,7 @@ GFC=$(GFCC) -src
|
|||||||
|
|
||||||
# comment the first and uncomment the second in Windows
|
# comment the first and uncomment the second in Windows
|
||||||
GFCP=$(GFC) -preproc=./mkPresent
|
GFCP=$(GFC) -preproc=./mkPresent
|
||||||
GFCCP=$(GFCC) -preproc=./mkPresent -p
|
GFCCP=$(GFCC) -preproc=./mkPresent
|
||||||
#GFCP=$(GFC) -preproc=mkPresent
|
#GFCP=$(GFC) -preproc=mkPresent
|
||||||
|
|
||||||
|
|
||||||
@@ -45,6 +45,7 @@ alltenses:
|
|||||||
cp -p */*.gfc */*.gfr ../alltenses
|
cp -p */*.gfc */*.gfr ../alltenses
|
||||||
touch api/Constructors.gf
|
touch api/Constructors.gf
|
||||||
$(GFCC) api/Syntax???.gf
|
$(GFCC) api/Syntax???.gf
|
||||||
|
cp -p api/Constructors*.gfc api/Constructors*.gfr ../alltenses
|
||||||
cp -p api/Syntax*.gfc api/Syntax*.gfr ../alltenses
|
cp -p api/Syntax*.gfc api/Syntax*.gfr ../alltenses
|
||||||
|
|
||||||
|
|
||||||
@@ -53,7 +54,7 @@ langs:
|
|||||||
echo "s ;; pm | wf langs.gfcm" | $(GFCA) -path=alltenses:prelude ../alltenses/Lang???.gfc $(RTSS)
|
echo "s ;; pm | wf langs.gfcm" | $(GFCA) -path=alltenses:prelude ../alltenses/Lang???.gfc $(RTSS)
|
||||||
|
|
||||||
api:
|
api:
|
||||||
$(GFCC) api/Constructors???.gf
|
# $(GFCC) api/Constructors???.gf
|
||||||
$(GFCC) api/Combinators???.gf
|
$(GFCC) api/Combinators???.gf
|
||||||
$(GFCC) api/Symbolic???.gf
|
$(GFCC) api/Symbolic???.gf
|
||||||
cp -p api/*.gfc api/*.gfr ../api
|
cp -p api/*.gfc api/*.gfr ../api
|
||||||
@@ -67,13 +68,14 @@ present:
|
|||||||
$(GFCP) german/German.gf
|
$(GFCP) german/German.gf
|
||||||
$(GFCP) italian/Italian.gf
|
$(GFCP) italian/Italian.gf
|
||||||
$(GFCP) norwegian/Norwegian.gf
|
$(GFCP) norwegian/Norwegian.gf
|
||||||
$(GFCP) russian/LangRus.gf
|
$(GFCP) russian/Russian.gf
|
||||||
$(GFCP) spanish/Spanish.gf
|
$(GFCP) spanish/Spanish.gf
|
||||||
$(GFCP) swedish/Swedish.gf
|
$(GFCP) swedish/Swedish.gf
|
||||||
$(GFCP) common/ConstructX.gf
|
$(GFCP) common/ConstructX.gf
|
||||||
mv */*.gfc */*.gfr ../present
|
mv */*.gfc */*.gfr ../present
|
||||||
touch api/Constructors.gf
|
touch api/Constructors.gf
|
||||||
$(GFCCP) -path=api:present:prelude api/Syntax???.gf
|
$(GFCCP) -path=api:present:prelude api/Syntax???.gf
|
||||||
|
mv api/Constructors*.gfc api/Constructors*.gfr ../present
|
||||||
mv api/Syntax*.gfc api/Syntax*.gfr ../present
|
mv api/Syntax*.gfc api/Syntax*.gfr ../present
|
||||||
|
|
||||||
mathematical:
|
mathematical:
|
||||||
@@ -92,7 +94,7 @@ multimodal:
|
|||||||
mv multimodal/*.gfc ../multimodal
|
mv multimodal/*.gfc ../multimodal
|
||||||
|
|
||||||
compiled:
|
compiled:
|
||||||
cd .. ; tar cvfz compiled.tgz alltenses/ mathematical/ multimodal/ present/ prelude/*.gf?
|
cd .. ; tar cfz compiled.tgz alltenses/ mathematical/ multimodal/ present/ prelude/*.gf?
|
||||||
|
|
||||||
treebank:
|
treebank:
|
||||||
gf <mkTreebank.gfs
|
gf <mkTreebank.gfs
|
||||||
|
|||||||
@@ -1,5 +0,0 @@
|
|||||||
--# -path=.:present:mathematical:prelude
|
|
||||||
|
|
||||||
resource SymbolicDan = Symbolic with
|
|
||||||
(Symbol = SymbolDan),
|
|
||||||
(Grammar = GrammarDan) ;
|
|
||||||
@@ -1,5 +0,0 @@
|
|||||||
--# -path=.:present:mathematical:prelude
|
|
||||||
|
|
||||||
resource SymbolicRus = Symbolic with
|
|
||||||
(Symbol = SymbolRus),
|
|
||||||
(Grammar = GrammarRus) ;
|
|
||||||
@@ -3,8 +3,8 @@ incomplete concrete PredicationI of Predication = Cat ** open ParamX, Lang in {
|
|||||||
flags optimize = all_subs ;
|
flags optimize = all_subs ;
|
||||||
|
|
||||||
lin
|
lin
|
||||||
PosCl cl = UseCl TPres ASimul PPos cl ;
|
PosCl cl = UseCl Lang.TPres ASimul PPos cl ;
|
||||||
NegCl cl = UseCl TPres ASimul PNeg cl ;
|
NegCl cl = UseCl Lang.TPres ASimul PNeg cl ;
|
||||||
|
|
||||||
--2 Predication patterns.
|
--2 Predication patterns.
|
||||||
|
|
||||||
|
|||||||
@@ -19,7 +19,7 @@ lin
|
|||||||
|
|
||||||
SymbS sy = sy ;
|
SymbS sy = sy ;
|
||||||
|
|
||||||
SymbNum sy = sy ;
|
SymbNum sy = {s = sy.s ; n = Sg} ;
|
||||||
SymbOrd sy = {s = sy.s ++ "th"} ;
|
SymbOrd sy = {s = sy.s ++ "th"} ;
|
||||||
|
|
||||||
lincat
|
lincat
|
||||||
|
|||||||
@@ -23,7 +23,7 @@ lin
|
|||||||
|
|
||||||
SymbS sy = {s = \\_ => sy.s} ;
|
SymbS sy = {s = \\_ => sy.s} ;
|
||||||
|
|
||||||
SymbNum n = {s = n.s} ;
|
SymbNum n = {s = n.s ; n = Pl} ;
|
||||||
SymbOrd n = {s = \\_ => n.s ++ "."} ;
|
SymbOrd n = {s = \\_ => n.s ++ "."} ;
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -82,12 +82,13 @@ concrete NounRus of Noun = CatRus ** open ResRus, Prelude, MorphoRus in {
|
|||||||
-- so just leave a decimal representation, without case-suffixes:
|
-- so just leave a decimal representation, without case-suffixes:
|
||||||
NumInt i = {s = table { _ => table {_ => i.s } } } ;
|
NumInt i = {s = table { _ => table {_ => i.s } } } ;
|
||||||
|
|
||||||
-- OrdInt n = case n of {
|
OrdInt n = variants {} ; ---- TODO
|
||||||
|
-- case n of {
|
||||||
-- 0|2|6 => (uy_oj_EndDecl n.s) ;
|
-- 0|2|6 => (uy_oj_EndDecl n.s) ;
|
||||||
-- 3 => (ti_j_EndDecl n.s) ;
|
-- 3 => (ti_j_EndDecl n.s) ;
|
||||||
-- _ => uy_j_EndDecl n.s } ;
|
-- _ => uy_j_EndDecl n.s } ;
|
||||||
|
|
||||||
-- OrdNumeral numeral =
|
OrdNumeral numeral = variants {} ; ---- TODO
|
||||||
-- {s = \\ af => (uy_j_EndDecl (numeral.s ! caseAF af ! genAF af)).s!af} ;
|
-- {s = \\ af => (uy_j_EndDecl (numeral.s ! caseAF af ! genAF af)).s!af} ;
|
||||||
|
|
||||||
NumNumeral n = n ;
|
NumNumeral n = n ;
|
||||||
|
|||||||
Reference in New Issue
Block a user