Added initial TextMate language bundle

diff --git a/contrib/textmate/Factor.tmbundle/Syntaxes/Factor.tmLanguage b/contrib/textmate/Factor.tmbundle/Syntaxes/Factor.tmLanguage
new file mode 100644 (file)
index 0000000..5b01909
--- /dev/null
+++ b/contrib/textmate/Factor.tmbundle/Syntaxes/Factor.tmLanguage
@@ -0,0 +1,95 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+       <key>fileTypes</key>
+       <array>
+               <string>factor</string>
+       </array>
+       <key>foldingStartMarker</key>
+       <string>^\s*(M|C)?:|#(V|H|C)\{</string>
+       <key>foldingStopMarker</key>
+       <string>^\s*$</string>
+       <key>keyEquivalent</key>
+       <string>^~F</string>
+       <key>name</key>
+       <string>Factor</string>
+       <key>patterns</key>
+       <array>
+               <dict>
+                       <key>captures</key>
+                       <dict>
+                               <key>3</key>
+                               <dict>
+                                       <key>name</key>
+                                       <string>keyword.colon.factor</string>
+                               </dict>
+                               <key>4</key>
+                               <dict>
+                                       <key>name</key>
+                                       <string>keyword.colon.factor</string>
+                               </dict>
+                               <key>5</key>
+                               <dict>
+                                       <key>name</key>
+                                       <string>keyword.colon.factor</string>
+                               </dict>
+                               <key>6</key>
+                               <dict>
+                                       <key>name</key>
+                                       <string>entity.name.class.factor</string>
+                               </dict>
+                               <key>7</key>
+                               <dict>
+                                       <key>name</key>
+                                       <string>comment.stack-effect.factor</string>
+                               </dict>
+                       </dict>
+                       <key>match</key>
+                       <string>^(((M:)\s+[^\s]+)|(:)|(C:))\s*([^\s]+)\s*(\(\s.*\))?</string>
+                       <key>name</key>
+                       <string>definition.word.factor</string>
+               </dict>
+               <dict>
+                       <key>match</key>
+                       <string>\b(drop|2drop|3drop|nip|2nip|dup|2dup|3dup|dupd|over|pick|tuck|swap|rot|-rot|2swap|swapd|&gt;r|r&gt;)\b</string>
+                       <key>name</key>
+                       <string>keyword.control.stack.factor</string>
+               </dict>
+               <dict>
+                       <key>match</key>
+                       <string>\b(f|t)\b</string>
+                       <key>name</key>
+                       <string>constant.language.factor</string>
+               </dict>
+               <dict>
+                       <key>begin</key>
+                       <string>"</string>
+                       <key>end</key>
+                       <string>"</string>
+                       <key>name</key>
+                       <string>string.quoted.double.factor</string>
+               </dict>
+               <dict>
+                       <key>begin</key>
+                       <string>#!|!</string>
+                       <key>end</key>
+                       <string>$</string>
+                       <key>name</key>
+                       <string>comment.line.factor</string>
+               </dict>
+               <dict>
+                       <key>begin</key>
+                       <string>\(\s+</string>
+                       <key>end</key>
+                       <string>\s+\)</string>
+                       <key>name</key>
+                       <string>comment.parens.factor</string>
+               </dict>
+       </array>
+       <key>scopeName</key>
+       <string>source.factor</string>
+       <key>uuid</key>
+       <string>3C9C9C2A-314A-475B-A4E4-A68BAAF3F36E</string>
+</dict>
+</plist>

diff --git a/contrib/textmate/Factor.tmbundle/info.plist b/contrib/textmate/Factor.tmbundle/info.plist
new file mode 100644 (file)
index 0000000..8def380
--- /dev/null
+++ b/contrib/textmate/Factor.tmbundle/info.plist
@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+       <key>name</key>
+       <string>Factor</string>
+       <key>uuid</key>
+       <string>8061D2F3-B603-411D-AFFE-61784A07906D</string>
+</dict>
+</plist>