From bcf5e66b72e9a1ae4cbccbfa03a67dfbe4e4cb8e Mon Sep 17 00:00:00 2001
From: cxl <cxl@f0d560ea-af0d-0410-9eb7-867de7ffcac7>
Date: Wed, 19 Dec 2012 20:44:50 +0000
Subject: [PATCH] Fixed $$ -> $ escaping

git-svn-id: svn://ultimatepp.org/upp/trunk@5653 f0d560ea-af0d-0410-9eb7-867de7ffcac7
---
 uppsrc/Skylark/Compile.cpp | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/uppsrc/Skylark/Compile.cpp b/uppsrc/Skylark/Compile.cpp
index 87ca9cd0f..c00bd7531 100644
--- a/uppsrc/Skylark/Compile.cpp
+++ b/uppsrc/Skylark/Compile.cpp
@@ -359,8 +359,11 @@ One<Exe> Compiler::Block()
 	int line = 1;
 	while(*s) {
 		if(*s == '$') {
-			if(s[1] == '$')
-				s += 2;
+			if(s[1] == '$') {
+				blk.AddText(b, s + 1);
+				p.Set(s + 2, NULL, line);
+				b = s = p.GetSpacePtr();
+			}
 			else {
 				blk.AddText(b, s);
 				p.Set(s + 1, NULL, line);