summaryrefslogtreecommitdiff
path: root/src/GF/Canon/LexGFC.x
diff options
context:
space:
mode:
Diffstat (limited to 'src/GF/Canon/LexGFC.x')
-rw-r--r--src/GF/Canon/LexGFC.x2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Canon/LexGFC.x b/src/GF/Canon/LexGFC.x
index 2f7b2180c..b3332a48b 100644
--- a/src/GF/Canon/LexGFC.x
+++ b/src/GF/Canon/LexGFC.x
@@ -24,7 +24,7 @@ $white+ ;
@rsyms { tok (\p s -> PT p (TS $ shareString s)) }
$l $i* { tok (\p s -> PT p (eitherResIdent (TV . shareString) s)) } -- H
-\" ([$u # [\" \\ \n]] | (\\ (\" | \\ | \' | n | t)))* \"{ tok (\p s -> PT p (TL $ unescapeInitTail $ shareString s)) } -- H
+\" ([$u # [\" \\ \n]] | (\\ (\" | \\ | \' | n | t)))* \"{ tok (\p s -> PT p (TL $ shareString $ unescapeInitTail s)) } -- H
$d+ { tok (\p s -> PT p (TI s)) }