From: NeilBrown <neil@brown.name>
Date: Sun, 12 Oct 2014 23:38:05 +0000 (+1100)
Subject: oceani: accept MULTI_STRING as well as STRING
X-Git-Tag: FallsCreek~3
X-Git-Url: https://ocean-lang.org/code/?p=ocean;a=commitdiff_plain;h=caa6e6a070280eb12ea4374947d3f42c73b58412

oceani: accept MULTI_STRING as well as STRING

The scanner produces two types of strings - we need to accept
them both.

Signed-off-by: NeilBrown <neil@brown.name>
---

diff --git a/csrc/oceani.mdc b/csrc/oceani.mdc
index 784c680..8997785 100644
--- a/csrc/oceani.mdc
+++ b/csrc/oceani.mdc
@@ -726,6 +726,11 @@ an executable.
 			$0->val.vtype = Vstr;
 			string_parse(&$1, '\\', &$0->val.str, $0->val.tail);
 			}$
+		| MULTI_STRING ${
+			$0 = new(val);
+			$0->val.vtype = Vstr;
+			string_parse(&$1, '\\', &$0->val.str, $0->val.tail);
+			}$
 
 ###### print exec cases
 	case Xval: