From aa135218a5b6901d31ad560f6f6b88911459fca7 Mon Sep 17 00:00:00 2001
From: Houtan Bastani <houtan@dynare.org>
Date: Fri, 18 Apr 2014 16:08:39 +0200
Subject: [PATCH] preprocessor: don't substitute 'dates' when preceded by an
 underscore

---
 preprocessor/Statement.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/preprocessor/Statement.cc b/preprocessor/Statement.cc
index 50d8ccefb..70889c6b2 100644
--- a/preprocessor/Statement.cc
+++ b/preprocessor/Statement.cc
@@ -83,7 +83,7 @@ NativeStatement::writeOutput(ostream &output, const string &basename) const
 {
   using namespace boost::xpressive;
   string date_regex = "(-?\\d+([YyAa]|[Mm]([1-9]|1[0-2])|[Qq][1-4]|[Ww]([1-9]{1}|[1-4]\\d|5[0-2])))";
-  sregex regex_lookbehind = sregex::compile("(?<!\\$|\\d|[a-zA-Z]|\\')" + date_regex);
+  sregex regex_lookbehind = sregex::compile("(?<!\\$|\\d|[a-zA-Z_]|\\')" + date_regex);
   sregex regex_dollar = sregex::compile("(\\$)"+date_regex);
 
   string ns = regex_replace(native_statement, regex_lookbehind, "dates('$&')");