Index: main/display-string.lisp
===================================================================
--- main/display-string.lisp	(revision main,49)
+++ main/display-string.lisp	(revision main,88)
@@ -18,5 +18,5 @@
   (aref two-char 1))
 
-(deflexer eat-dstring
+(deflexer eat-dstring (:priority-only t)
   ("`[SsRrBbUuDdKkPpIi]" escape escape-code)
   ("(?:[^`]|``)+" literal dequote))
