From 03798aee763fa9b49b600871c074cd78ad1f96f1 Mon Sep 17 00:00:00 2001
From: Kelvin Sherlock <ksherlock@gmail.com>
Date: Sun, 31 Mar 2013 20:21:41 -0400
Subject: [PATCH] DC syntax parsing

---
 Syntaxes/ORCA:M.tmLanguage | 121 +++++++++++++++++++++++++++++++++++++
 1 file changed, 121 insertions(+)

diff --git a/Syntaxes/ORCA:M.tmLanguage b/Syntaxes/ORCA:M.tmLanguage
index f1c0cbc..72161dd 100644
--- a/Syntaxes/ORCA:M.tmLanguage
+++ b/Syntaxes/ORCA:M.tmLanguage
@@ -118,6 +118,127 @@
 			<key>name</key>
 			<string>meta.path.directive</string>
 		</dict>
+		<dict>
+			<key>begin</key>
+			<string>\b((?i)DC)\s+(\d*)([bB])(')</string>
+			<key>beginCaptures</key>
+			<dict>
+				<key>1</key>
+				<dict>
+					<key>name</key>
+					<string>keyword.directive</string>
+				</dict>
+				<key>2</key>
+				<dict>
+					<key>name</key>
+					<string>constant.numeric.decimal</string>
+				</dict>
+				<key>3</key>
+				<dict>
+					<key>name</key>
+					<string>storage.type</string>
+				</dict>
+			</dict>
+			<key>comment</key>
+			<string>DC nB'...'</string>
+			<key>end</key>
+			<string>(')$</string>
+			<key>name</key>
+			<string>meta.dc.b</string>
+			<key>patterns</key>
+			<array>
+				<dict>
+					<key>match</key>
+					<string>[0|1]</string>
+					<key>name</key>
+					<string>constant.numeric.binary</string>
+				</dict>
+				<dict>
+					<key>match</key>
+					<string>\S</string>
+					<key>name</key>
+					<string>invalid.illegal.binary</string>
+				</dict>
+			</array>
+		</dict>
+		<dict>
+			<key>begin</key>
+			<string>\b((?i)DC)\s+(\d*)([hH])(')</string>
+			<key>beginCaptures</key>
+			<dict>
+				<key>1</key>
+				<dict>
+					<key>name</key>
+					<string>keyword.directive</string>
+				</dict>
+				<key>2</key>
+				<dict>
+					<key>name</key>
+					<string>constant.numeric.decimal</string>
+				</dict>
+				<key>3</key>
+				<dict>
+					<key>name</key>
+					<string>storage.type</string>
+				</dict>
+			</dict>
+			<key>comment</key>
+			<string>dc nH'...'</string>
+			<key>end</key>
+			<string>(')$</string>
+			<key>name</key>
+			<string>meta.dc.h</string>
+			<key>patterns</key>
+			<array>
+				<dict>
+					<key>match</key>
+					<string>[0-9A-Fa-f]</string>
+					<key>name</key>
+					<string>constant.numeric.hexidecimal</string>
+				</dict>
+				<dict>
+					<key>match</key>
+					<string>\S</string>
+					<key>name</key>
+					<string>invalid.illegal.hexidecimal</string>
+				</dict>
+			</array>
+		</dict>
+		<dict>
+			<key>begin</key>
+			<string>\b((?i)DC)\s+(\d*)([A-Za-z])(\d*)(')</string>
+			<key>beginCaptures</key>
+			<dict>
+				<key>1</key>
+				<dict>
+					<key>name</key>
+					<string>keyword.directive</string>
+				</dict>
+				<key>2</key>
+				<dict>
+					<key>name</key>
+					<string>constant.numeric.decimal</string>
+				</dict>
+				<key>3</key>
+				<dict>
+					<key>name</key>
+					<string>storage.type</string>
+				</dict>
+				<key>4</key>
+				<dict>
+					<key>name</key>
+					<string>constant.numeric.decimal</string>
+				</dict>
+			</dict>
+			<key>comment</key>
+			<string>DC nIn'...', DC C'...'</string>
+			<key>contentName</key>
+			<string>string.quited.single</string>
+			<key>end</key>
+			<string>(')|$</string>
+			<key>name</key>
+			<string>meta.dc.other</string>
+		</dict>
 		<dict>
 			<key>match</key>
 			<string>\b(?i:ABSADDR|ALIGN|ANOP|APPEND|CASE|CODECHK|COPY|DATA|DATACHK|DC|DIRECT|DS|DYNCHK|EJECT|END|ENTRY|EQU|ERR|EXPAND|GEQU|IEEE|INSTIME|KEEP|KIND|LIST|LONGA|LONGI|MCOPY|MEM|MERR|MSB|NUMSEX|OBJ|OBJCASE|OBJEND|ORG|PRINTER|PRIVATE|PRIVDATA|RENAME|SETCOM|START|SYMBOL|TITLE|USING|65C02|65816)\b</string>