1
0
forked from GitHub/gf-core

chinese (Chi) in place and compiles, based on work by Jolene Zhuo Lin Qiqige

This commit is contained in:
aarne
2012-10-15 08:07:17 +00:00
parent 1db0efc7a4
commit 754949f5cc
32 changed files with 1920 additions and 2 deletions

View File

@@ -0,0 +1,36 @@
--# -path=.:../abstract:../common
concrete SymbolChi of Symbol = CatChi ** open Prelude, ResChi in {
flags coding = utf8;
lin
SymbPN i = i ;
IntPN i = i ;
FloatPN i = i ;
NumPN i = i ;
CNIntNP cn i = {
s = cn.s ++ i.s ;
c = cn.c
} ;
CNSymbNP det cn xs = ss (det.s ++ cn.s ++ xs.s) ; ----
CNNumNP cn i = {
s = cn.s ++ i.s ;
c = cn.c
} ;
SymbS sy = sy ;
SymbNum sy = sy ;
SymbOrd sy = sy ;
lincat
Symb, [Symb] = SS ;
lin
MkSymb s = s ;
BaseSymb = infixSS "" ;
ConsSymb = infixSS "" ;
}