msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Changed JS generation to avoid grammar reference files. Removed grammar reference file generation.

Browse Source
This commit is contained in:
meza
2008-04-11 13:52:13 +00:00
parent 6cf8790989
commit 04da53c7e8
4 changed files with 34 additions and 65 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/JavaScript/PrintJS.hs
View File

@@ -26,7 +26,7 @@ render d = rend 0 (map ($ "") $ d []) "" where
space t = showString t . (\s -> if null s then "" else (' ':s))
spaceAfter :: String -> Bool
spaceAfter = (`notElem` [".","(","[","\n"])
spaceAfter = (`notElem` [".","(","[","{","\n"])
spaceBefore :: String -> Bool
spaceBefore = (`notElem` [",",".",":",";","(",")","[","]","{","}","\n"])