mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 11:19:32 -06:00
tried to change Jap to Jpn everywhere
This commit is contained in:
@@ -28,7 +28,7 @@ exx: exx-script
|
||||
gf -retain -s ../alltenses/TryGer.gfo <api-examples.gfs >api-examples-Ger.txt
|
||||
gf -retain -s ../alltenses/TryHin.gfo <api-examples.gfs >api-examples-Hin.txt
|
||||
gf -retain -s ../alltenses/TryIta.gfo <api-examples.gfs >api-examples-Ita.txt
|
||||
gf -retain -s ../alltenses/TryJap.gfo <api-examples.gfs >api-examples-Jap.txt
|
||||
gf -retain -s ../alltenses/TryJpn.gfo <api-examples.gfs >api-examples-Jpn.txt
|
||||
gf -retain -s ../alltenses/TryLav.gfo <api-examples.gfs >api-examples-Lav.txt
|
||||
gf -retain -s ../alltenses/TryNep.gfo <api-examples.gfs >api-examples-Nep.txt
|
||||
gf -retain -s ../alltenses/TryNor.gfo <api-examples.gfs >api-examples-Nor.txt
|
||||
|
||||
@@ -71,7 +71,7 @@ prApiEx apexx = case M.toList apexx of
|
||||
[l ++ ": //" ++ mkEx l e ++ "//" | (l,e) <- lexx]
|
||||
|
||||
mkEx l = unws . bind . mkE . words where
|
||||
unws = if elem l ["Jap","Tha"] then concat else unwords -- remove spaces
|
||||
unws = if elem l ["Jpn","Tha"] then concat else unwords -- remove spaces
|
||||
mkE e = case e of
|
||||
"atomic":"term":_ -> ["*"]
|
||||
"[]":_ -> ["''"]
|
||||
|
||||
@@ -17,7 +17,7 @@ revealedLang = "Eng"
|
||||
|
||||
-- all languages shown
|
||||
apiExxFiles = ["api-examples-" ++ lang ++ ".txt" | lang <- words
|
||||
"Afr Bul Cat Dan Dut Eng Fin Fre Ger Hin Ita Jap Lav Nep Nor Pes Pnb Pol Ron Rus Snd Spa Swe Tha Urd"]
|
||||
"Afr Bul Cat Dan Dut Eng Fin Fre Ger Hin Ita Jpn Lav Nep Nor Pes Pnb Pol Ron Rus Snd Spa Swe Tha Urd"]
|
||||
|
||||
main = do
|
||||
xx <- getArgs
|
||||
@@ -248,7 +248,7 @@ paradigmFiles = [
|
||||
("Hindi", srcPath "/hindi/ParadigmsHin.gf"),
|
||||
-- ("Interlingua", srcPath "/interlingua/ParadigmsIna.gf"),
|
||||
("Italian", srcPath "/italian/ParadigmsIta.gf"),
|
||||
("Japanese", srcPath "/japanese/ParadigmsJap.gf"),
|
||||
("Japanese", srcPath "/japanese/ParadigmsJpn.gf"),
|
||||
("Latvian", srcPath "/latvian/ParadigmsLav.gf"),
|
||||
("Nepali", srcPath "/nepali/ParadigmsNep.gf"),
|
||||
("Norwegian", srcPath "/norwegian/ParadigmsNor.gf"),
|
||||
|
||||
Reference in New Issue
Block a user