From 5a80d5bf17dd9b176c034bae4d708710f6305419 Mon Sep 17 00:00:00 2001
From: Adrian Thurston <thurston@complang.org>
Date: Tue, 15 Dec 2015 18:03:12 -0500
Subject: added the $$ operator, which converts tree-to-str with attrs

---
 src/loadcolm.cc | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src/loadcolm.cc')

diff --git a/src/loadcolm.cc b/src/loadcolm.cc
index d9212976..e7bdbf2b 100644
--- a/src/loadcolm.cc
+++ b/src/loadcolm.cc
@@ -1977,6 +1977,11 @@ struct LoadColm
 			expr = LangExpr::cons( unary.DOLLAR().loc(), '$', factor );
 			break;
 		}
+		case code_unary::DollarDollar: {
+			LangExpr *factor = walkCodeFactor( unary.code_factor() );
+			expr = LangExpr::cons( unary.DOLLAR().loc(), 'S', factor );
+			break;
+		}
 		case code_unary::Caret: {
 			LangExpr *factor = walkCodeFactor( unary.code_factor() );
 			expr = LangExpr::cons( unary.CARET().loc(), '^', factor );
-- 
cgit v1.2.1