From 55bc0cb1b2d099fa531f1a38bd7745851e44a097 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 13 Jun 2016 12:00:14 -0700
Subject: [PATCH] strings.parser: Add \` aka escaped backtick.

---
 core/strings/parser/parser.factor   | 1 +
 language/backticks/backticks.factor | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/core/strings/parser/parser.factor b/core/strings/parser/parser.factor
index 3f28e05874..18c4fa41be 100644
--- a/core/strings/parser/parser.factor
+++ b/core/strings/parser/parser.factor
@@ -31,6 +31,7 @@ ERROR: bad-escape char ;
         { char: \( char: \( }
         { char: \) char: \) }
         { char: \! char: \! }
+        { char: \` char: \` }
     } ?at [ bad-escape ] unless ;
 
 symbol: name>char-hook
diff --git a/language/backticks/backticks.factor b/language/backticks/backticks.factor
index e40e8e2e9c..cad9665ee7 100644
--- a/language/backticks/backticks.factor
+++ b/language/backticks/backticks.factor
@@ -4,7 +4,7 @@ USING: fry io io.encodings.utf8 interpolate io.launcher
 multiline sequences ;
 in: backticks
 
-SYNTAX: `
+SYNTAX: \ `
     "`" parse-multiline-string '[
         _ interpolate>string
         utf8 [ contents ] with-process-reader