GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 13:09:33 -06:00
Code Issues Packages Projects Releases Wiki Activity

Do not escape single quotes in strings in PrintGF. This seems to be unmarked hand-hacked behaviour that the old pretty printer had.

Browse Source
This commit is contained in:
bringert
2004-07-22 11:12:27 +00:00
parent 2b1f64eb06
commit 541ef75fb4
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Source/PrintGF.hs
View File

@@ -71,7 +71,7 @@ instance Print Char where
mkEsc :: Char -> ShowS
mkEsc s = case s of
_ | elem s "\\\"'" -> showChar '\\' . showChar s
_ | elem s "\\\"" -> showChar '\\' . showChar s -- H (don't escape ')
'\n' -> showString "\\n"
'\t' -> showString "\\t"
_ -> showChar s