From 1eb7ff8e10a1767d4fd95aa126de2ee9d4666622 Mon Sep 17 00:00:00 2001
From: "Brian T. Rice" <briantrice@gmail.com>
Date: Mon, 21 Feb 2011 14:34:11 -0800
Subject: [PATCH] Implemented a "q" QuoteMacro for the ##() literals-array
 syntax.

---
 src/syntax/lexer.slate | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/syntax/lexer.slate b/src/syntax/lexer.slate
index c8f82c7..a94fb08 100644
--- a/src/syntax/lexer.slate
+++ b/src/syntax/lexer.slate
@@ -22,6 +22,12 @@ Lexer QuoteMacros at: 'r' put:
   [| :contents | contents regex].
 Lexer QuoteMacros at: 'm' put:
   [| :contents | contents regex].
+Lexer QuoteMacros at: 'q' put:
+  [| :contents parser |
+   parser := Parser newOn: contents.
+   [| :result |
+    [parser lexer isAtEnd] whileFalse:
+      [result nextPut: parser nextLiteral]] writingAs: #{}].
 
 Lexer traits define: #QuoteMacroChars &builder: [Dictionary new].
 Lexer QuoteMacroChars at: $\' put: $\'.
-- 
2.11.4.GIT