added Greek to ResourceDemo

This commit is contained in:
aarne
2013-04-25 13:55:08 +00:00
parent 56f87a4c34
commit 563b2b185d
3 changed files with 4 additions and 4 deletions

View File

@@ -6,7 +6,7 @@ src:
runghc MkMini.hs
compdemo:
$(compile) Afr Bul Cat Chi Dan Dut Eng Fin Fre Ger Hin Ita Jpn Lav Nep Nor Pes Pnb Pol Ron Rus Snd Spa Swe Tha Urd
$(compile) Afr Bul Cat Chi Dan Dut Eng Fin Fre Ger Gre Hin Ita Jpn Lav Nep Nor Pes Pnb Pol Ron Rus Snd Spa Swe Tha Urd
linkdemo:
$(compile) -link Afr Bul Cat Chi Dan Dut Eng Fin Fre Ger Hin Ita Jpn Lav Nep Nor Pes Pnb Pol Ron Rus Snd Spa Swe Tha Urd
$(compile) -link Afr Bul Cat Chi Dan Dut Eng Fin Fre Ger Gre Hin Ita Jpn Lav Nep Nor Pes Pnb Pol Ron Rus Snd Spa Swe Tha Urd

View File

@@ -1,7 +1,7 @@
src = "Eng"
langs = [
"Afr","Bul","Cat","Chi","Dan","Dut",
"Fin","Fre","Ger","Hin","Ita",
"Fin","Fre","Ger","Gre","Hin","Ita",
"Jpn","Lav","Nep","Nor","Pes",
"Pol","Pnb","Ron","Rus","Snd",
"Spa","Swe","Tha","Urd"

View File

@@ -66,7 +66,7 @@ concrete NounDut of Noun = CatDut ** open ResDut, Prelude in {
PossPron p = {
s = \\_,n,g => p.unstressed.poss ;
sp = \\n,g => p.substposs ;
a = Strong
a = Weak
} ;
NumCard n = {s = n.s ! Utr ! Nom ; n = n.n ; isNum = True} ;