ultraviolet1x 0.12.1

data/syntax/c++.syntax

@@ -0,0 +1,186 @@
+--- 
+comment: I don't think anyone uses .hp. .cp tends to be paired with .h. (I could be wrong. :) -- chris
+fileTypes: 
+- cc
+- cpp
+- cp
+- cxx
+- c++
+- C
+- h
+- hh
+- hpp
+- h++
+firstLineMatch: -\*- C\+\+ -\*-
+foldingStartMarker: "(?x)\n\
+  \t\t /\\*\\*(?!\\*)\n\
+  \t\t|^(?![^{]*?//|[^{]*?/\\*(?!.*?\\*/.*?\\{)).*?\\{\\s*($|//|/\\*(?!.*?\\*/.*\\S))\n\
+  \t"
+foldingStopMarker: (?<!\*)\*\*/|^\s*\}
+keyEquivalent: ^~C
+name: C++
+patterns: 
+- include: "#special_block"
+- include: source.c
+- match: \b(friend|explicit|virtual)\b
+  name: storage.modifier.c++
+- match: \b(private:|protected:|public:)
+  name: storage.modifier.c++
+- match: \b(catch|operator|try|throw|using)\b
+  name: keyword.control.c++
+- match: \bdelete\b(\s*\[\])?|\bnew\b(?!\])
+  name: keyword.control.c++
+- comment: common C++ instance var naming idiom -- fMemberName
+  match: \b(f|m)[A-Z]\w*\b
+  name: variable.other.readwrite.member.c++
+- match: \b(this)\b
+  name: variable.language.c++
+- match: \btemplate\b\s*
+  name: storage.type.template.c++
+- match: \b(const_cast|dynamic_cast|reinterpret_cast|static_cast)\b\s*
+  name: keyword.operator.cast.c++
+- match: \b(and|and_eq|bitand|bitor|compl|not|not_eq|or|or_eq|typeid|xor|xor_eq)\b
+  name: keyword.operator.c++
+- match: \b(class|wchar_t)\b
+  name: storage.type.c++
+- match: \b(export|mutable|typename)\b
+  name: storage.modifier.c++
+- begin: "(?x)\n    \t\t\t\t(?:  ^                                 # begin-of-line\n    \t\t\t\t  |  (?: (?<!else|new|=) )             #  or word + space before name\n    \t\t\t\t)\n    \t\t\t\t((?:[A-Za-z_][A-Za-z0-9_]*::)*+~[A-Za-z_][A-Za-z0-9_]*) # actual name\n    \t\t\t\t \\s*(\\()                           # start bracket or end-of-line\n    \t\t\t"
+  beginCaptures: 
+    "1": 
+      name: entity.name.function.c++
+    "2": 
+      name: punctuation.definition.parameters.c
+  end: \)
+  endCaptures: 
+    "0": 
+      name: punctuation.definition.parameters.c
+  name: meta.function.destructor.c++
+  patterns: 
+  - include: $base
+- begin: "(?x)\n    \t\t\t\t(?:  ^                                 # begin-of-line\n    \t\t\t\t  |  (?: (?<!else|new|=) )             #  or word + space before name\n    \t\t\t\t)\n    \t\t\t\t((?:[A-Za-z_][A-Za-z0-9_]*::)*+~[A-Za-z_][A-Za-z0-9_]*) # actual name\n    \t\t\t\t \\s*(\\()                           # terminating semi-colon\n    \t\t\t"
+  beginCaptures: 
+    "1": 
+      name: entity.name.function.c++
+    "2": 
+      name: punctuation.definition.parameters.c
+  end: \)
+  endCaptures: 
+    "0": 
+      name: punctuation.definition.parameters.c
+  name: meta.function.destructor.prototype.c++
+  patterns: 
+  - include: $base
+repository: 
+  angle_brackets: 
+    begin: <
+    end: ">"
+    name: meta.angle-brackets.c++
+    patterns: 
+    - include: "#angle_brackets"
+    - include: $base
+  block: 
+    begin: \{
+    end: \}
+    name: meta.block.c++
+    patterns: 
+    - captures: 
+        "1": 
+          name: support.function.any-method.c
+        "2": 
+          name: punctuation.definition.parameters.c
+      match: |-
+        (?x)
+            				(
+            					(?!while|for|do|if|else|switch|catch|enumerate|return|r?iterate)(?: \b[A-Za-z_][A-Za-z0-9_]*+\b | :: )*+                  # actual name
+            				)
+            				 \s*(\()
+      name: meta.function-call.c
+    - include: $base
+  constructor: 
+    patterns: 
+    - begin: "(?x)\n    \t\t\t\t(?:  ^\\s*)                             # begin-of-line\n    \t\t\t\t((?!while|for|do|if|else|switch|catch|enumerate|r?iterate)[A-Za-z_][A-Za-z0-9_:]*) # actual name\n    \t\t\t\t \\s*(\\()                            # start bracket or end-of-line\n    \t\t\t"
+      beginCaptures: 
+        "1": 
+          name: entity.name.function.c++
+        "2": 
+          name: punctuation.definition.parameters.c
+      end: \)
+      endCaptures: 
+        "0": 
+          name: punctuation.definition.parameters.c
+      name: meta.function.constructor.c++
+      patterns: 
+      - include: $base
+    - begin: "(?x)\n    \t\t\t\t(:)                            # begin-of-line\n    \t\t\t\t((?=\\s*[A-Za-z_][A-Za-z0-9_:]* # actual name\n    \t\t\t\t \\s*(\\()))                      # start bracket or end-of-line\n    \t\t\t"
+      beginCaptures: 
+        "1": 
+          name: punctuation.definition.parameters.c
+      end: (?=\{)
+      name: meta.function.constructor.initializer-list.c++
+      patterns: 
+      - include: $base
+  special_block: 
+    patterns: 
+    - begin: \b(namespace)\b\s*([_A-Za-z][_A-Za-z0-9]*\b)?+
+      beginCaptures: 
+        "1": 
+          name: storage.type.c++
+        "2": 
+          name: entity.name.type.c++
+      end: (?<=\})|(?=(;|,|\(|\)|>|\[|\]|=))
+      name: meta.namespace-block.c++
+      patterns: 
+      - begin: (\{)
+        beginCaptures: 
+          "1": 
+            name: punctuation.definition.scope.c++
+        end: (\})
+        endCaptures: 
+          "1": 
+            name: punctuation.definition.invalid.c++
+        patterns: 
+        - include: "#special_block"
+        - include: "#constructor"
+        - include: $base
+      - include: $base
+    - begin: \b(class|struct)\b\s*([_A-Za-z][_A-Za-z0-9]*\b)?+
+      beginCaptures: 
+        "1": 
+          name: storage.type.c++
+        "2": 
+          name: entity.name.type.c++
+      end: (?<=\})|(?=(;|,|\(|\)|>|\[|\]|=))
+      name: meta.class-struct-block.c++
+      patterns: 
+      - include: "#angle_brackets"
+      - begin: (\{)
+        beginCaptures: 
+          "1": 
+            name: punctuation.definition.scope.c++
+        end: (\})(\s*\n)?
+        endCaptures: 
+          "1": 
+            name: punctuation.definition.invalid.c++
+          "2": 
+            name: invalid.illegal.you-forgot-semicolon.c++
+        patterns: 
+        - include: "#special_block"
+        - include: "#constructor"
+        - include: $base
+      - include: $base
+    - begin: \b(extern)(?=\s*")
+      beginCaptures: 
+        "1": 
+          name: storage.modifier.c++
+      end: (?<=\})|(?=\w)
+      name: meta.extern-block.c++
+      patterns: 
+      - begin: \{
+        end: \}
+        patterns: 
+        - include: "#special_block"
+        - include: $base
+      - include: $base
+scopeName: source.c++
+uuid: 26251B18-6B1D-11D9-AFDB-000D93589AF6

data/syntax/c.syntax

@@ -0,0 +1,414 @@
+--- 
+fileTypes: 
+- c
+- h
+firstLineMatch: -[*]-( Mode:)? C -[*]-
+foldingStartMarker: "(?x)\n\
+  \t\t /\\*\\*(?!\\*)\n\
+  \t\t|^(?![^{]*?//|[^{]*?/\\*(?!.*?\\*/.*?\\{)).*?\\{\\s*($|//|/\\*(?!.*?\\*/.*\\S))\n\
+  \t"
+foldingStopMarker: (?<!\*)\*\*/|^\s*\}
+keyEquivalent: ^~C
+name: C
+patterns: 
+- include: "#preprocessor-rule-enabled"
+- include: "#preprocessor-rule-disabled"
+- include: "#preprocessor-rule-other"
+- include: "#comments"
+- match: \b(break|case|continue|default|do|else|for|goto|if|_Pragma|return|switch|while)\b
+  name: keyword.control.c
+- match: \b(asm|__asm__|auto|bool|_Bool|char|_Complex|double|enum|float|_Imaginary|int|long|short|signed|struct|typedef|union|unsigned|void)\b
+  name: storage.type.c
+- match: \b(const|extern|register|restrict|static|volatile|inline)\b
+  name: storage.modifier.c
+- comment: common C constant naming idiom -- kConstantVariable
+  match: \bk[A-Z]\w*\b
+  name: constant.other.variable.mac-classic.c
+- match: \bg[A-Z]\w*\b
+  name: variable.other.readwrite.global.mac-classic.c
+- match: \bs[A-Z]\w*\b
+  name: variable.other.readwrite.static.mac-classic.c
+- match: \b(NULL|true|false|TRUE|FALSE)\b
+  name: constant.language.c
+- include: "#sizeof"
+- match: \b((0(x|X)[0-9a-fA-F]*)|(([0-9]+\.?[0-9]*)|(\.[0-9]+))((e|E)(\+|-)?[0-9]+)?)(L|l|UL|ul|u|U|F|f|ll|LL|ull|ULL)?\b
+  name: constant.numeric.c
+- begin: "\""
+  beginCaptures: 
+    "0": 
+      name: punctuation.definition.string.begin.c
+  end: "\""
+  endCaptures: 
+    "0": 
+      name: punctuation.definition.string.end.c
+  name: string.quoted.double.c
+  patterns: 
+  - include: "#string_escaped_char"
+  - include: "#string_placeholder"
+- begin: "&apos;"
+  beginCaptures: 
+    "0": 
+      name: punctuation.definition.string.begin.c
+  end: "&apos;"
+  endCaptures: 
+    "0": 
+      name: punctuation.definition.string.end.c
+  name: string.quoted.single.c
+  patterns: 
+  - include: "#string_escaped_char"
+- begin: "(?x)\n        \t\t^\\s*\\#\\s*(define)\\s+             # define\n        \t\t((?<id>[a-zA-Z_][a-zA-Z0-9_]*))  # macro name\n        \t\t(?:                              # and optionally:\n        \t\t    (\\()                         # an open parenthesis\n        \t\t        (\n        \t\t            \\s* \\g<id> \\s*       # first argument\n        \t\t            ((,) \\s* \\g<id> \\s*)*  # additional arguments\n        \t\t            (?:\\.\\.\\.)?          # varargs ellipsis?\n        \t\t        )\n        \t\t    (\\))                         # a close parenthesis\n        \t\t)?\n        \t"
+  beginCaptures: 
+    "1": 
+      name: keyword.control.import.define.c
+    "2": 
+      name: entity.name.function.preprocessor.c
+    "4": 
+      name: punctuation.definition.parameters.c
+    "5": 
+      name: variable.parameter.preprocessor.c
+    "7": 
+      name: punctuation.separator.parameters.c
+    "8": 
+      name: punctuation.definition.parameters.c
+  end: (?=(?://|/\*))|$
+  name: meta.preprocessor.macro.c
+  patterns: 
+  - match: (?>\\\s*\n)
+    name: punctuation.separator.continuation.c
+  - include: $base
+- begin: ^\s*#\s*(error|warning)\b
+  captures: 
+    "1": 
+      name: keyword.control.import.error.c
+  end: $
+  name: meta.preprocessor.diagnostic.c
+  patterns: 
+  - match: (?>\\\s*\n)
+    name: punctuation.separator.continuation.c
+- begin: ^\s*#\s*(include|import)\b\s+
+  captures: 
+    "1": 
+      name: keyword.control.import.include.c
+  end: (?=(?://|/\*))|$
+  name: meta.preprocessor.c.include
+  patterns: 
+  - match: (?>\\\s*\n)
+    name: punctuation.separator.continuation.c
+  - begin: "\""
+    beginCaptures: 
+      "0": 
+        name: punctuation.definition.string.begin.c
+    end: "\""
+    endCaptures: 
+      "0": 
+        name: punctuation.definition.string.end.c
+    name: string.quoted.double.include.c
+  - begin: <
+    beginCaptures: 
+      "0": 
+        name: punctuation.definition.string.begin.c
+    end: ">"
+    endCaptures: 
+      "0": 
+        name: punctuation.definition.string.end.c
+    name: string.quoted.other.lt-gt.include.c
+- include: "#pragma-mark"
+- begin: ^\s*#\s*(define|defined|elif|else|if|ifdef|ifndef|line|pragma|undef)\b
+  captures: 
+    "1": 
+      name: keyword.control.import.c
+  end: (?=(?://|/\*))|$
+  name: meta.preprocessor.c
+  patterns: 
+  - match: (?>\\\s*\n)
+    name: punctuation.separator.continuation.c
+- match: \b(u_char|u_short|u_int|u_long|ushort|uint|u_quad_t|quad_t|qaddr_t|caddr_t|daddr_t|dev_t|fixpt_t|blkcnt_t|blksize_t|gid_t|in_addr_t|in_port_t|ino_t|key_t|mode_t|nlink_t|id_t|pid_t|off_t|segsz_t|swblk_t|uid_t|id_t|clock_t|size_t|ssize_t|time_t|useconds_t|suseconds_t)\b
+  name: support.type.sys-types.c
+- match: \b(pthread_attr_t|pthread_cond_t|pthread_condattr_t|pthread_mutex_t|pthread_mutexattr_t|pthread_once_t|pthread_rwlock_t|pthread_rwlockattr_t|pthread_t|pthread_key_t)\b
+  name: support.type.pthread.c
+- match: \b(int8_t|int16_t|int32_t|int64_t|uint8_t|uint16_t|uint32_t|uint64_t|int_least8_t|int_least16_t|int_least32_t|int_least64_t|uint_least8_t|uint_least16_t|uint_least32_t|uint_least64_t|int_fast8_t|int_fast16_t|int_fast32_t|int_fast64_t|uint_fast8_t|uint_fast16_t|uint_fast32_t|uint_fast64_t|intptr_t|uintptr_t|intmax_t|intmax_t|uintmax_t|uintmax_t)\b
+  name: support.type.stdint.c
+- match: \b(noErr|kNilOptions|kInvalidID|kVariableLengthArray)\b
+  name: support.constant.mac-classic.c
+- match: \b(AbsoluteTime|Boolean|Byte|ByteCount|ByteOffset|BytePtr|CompTimeValue|ConstLogicalAddress|ConstStrFileNameParam|ConstStringPtr|Duration|Fixed|FixedPtr|Float32|Float32Point|Float64|Float80|Float96|FourCharCode|Fract|FractPtr|Handle|ItemCount|LogicalAddress|OptionBits|OSErr|OSStatus|OSType|OSTypePtr|PhysicalAddress|ProcessSerialNumber|ProcessSerialNumberPtr|ProcHandle|Ptr|ResType|ResTypePtr|ShortFixed|ShortFixedPtr|SignedByte|SInt16|SInt32|SInt64|SInt8|Size|StrFileName|StringHandle|StringPtr|TimeBase|TimeRecord|TimeScale|TimeValue|TimeValue64|UInt16|UInt32|UInt64|UInt8|UniChar|UniCharCount|UniCharCountPtr|UniCharPtr|UnicodeScalarValue|UniversalProcHandle|UniversalProcPtr|UnsignedFixed|UnsignedFixedPtr|UnsignedWide|UTF16Char|UTF32Char|UTF8Char)\b
+  name: support.type.mac-classic.c
+- include: "#block"
+- begin: |-
+    (?x)
+        		(?:  ^                                 # begin-of-line
+        		  |  
+        		     (?: (?= \s )           (?<!else|new|return) (?<=\w)      #  or word + space before name
+        		       | (?= \s*[A-Za-z_] ) (?<!&&)       (?<=[*&>])   #  or type modifier before name
+        		     )
+        		)
+        		(\s*) (?!(while|for|do|if|else|switch|catch|enumerate|return|r?iterate)\s*\()
+        		(
+        			(?: [A-Za-z_][A-Za-z0-9_]*+ | :: )++ |                  # actual name
+        			(?: (?<=operator) (?: [-*&<>=+!]+ | \(\) | \[\] ) )  # if it is a C++ operator
+        		)
+        		 \s*(?=\()
+  beginCaptures: 
+    "1": 
+      name: punctuation.whitespace.function.leading.c
+    "3": 
+      name: entity.name.function.c
+    "4": 
+      name: punctuation.definition.parameters.c
+  end: (?<=\})|(?=#)|(;)
+  name: meta.function.c
+  patterns: 
+  - include: "#comments"
+  - include: "#parens"
+  - match: \bconst\b
+    name: storage.modifier.c
+  - include: "#block"
+repository: 
+  access: 
+    match: \.[a-zA-Z_][a-zA-Z_0-9]*\b(?!\s*\()
+    name: variable.other.dot-access.c
+  block: 
+    begin: \{
+    end: \}
+    name: meta.block.c
+    patterns: 
+    - include: "#block_innards"
+  block_innards: 
+    patterns: 
+    - include: "#preprocessor-rule-enabled-block"
+    - include: "#preprocessor-rule-disabled-block"
+    - include: "#preprocessor-rule-other-block"
+    - include: "#sizeof"
+    - include: "#access"
+    - captures: 
+        "1": 
+          name: punctuation.whitespace.support.function.leading.c
+        "2": 
+          name: support.function.C99.c
+      match: (\s*)\b(hypot(f|l)?|s(scanf|ystem|nprintf|ca(nf|lb(n(f|l)?|ln(f|l)?))|i(n(h(f|l)?|f|l)?|gn(al|bit))|tr(s(tr|pn)|nc(py|at|mp)|c(spn|hr|oll|py|at|mp)|to(imax|d|u(l(l)?|max)|k|f|l(d|l)?)|error|pbrk|ftime|len|rchr|xfrm)|printf|et(jmp|vbuf|locale|buf)|qrt(f|l)?|w(scanf|printf)|rand)|n(e(arbyint(f|l)?|xt(toward(f|l)?|after(f|l)?))|an(f|l)?)|c(s(in(h(f|l)?|f|l)?|qrt(f|l)?)|cos(h(f)?|f|l)?|imag(f|l)?|t(ime|an(h(f|l)?|f|l)?)|o(s(h(f|l)?|f|l)?|nj(f|l)?|pysign(f|l)?)|p(ow(f|l)?|roj(f|l)?)|e(il(f|l)?|xp(f|l)?)|l(o(ck|g(f|l)?)|earerr)|a(sin(h(f|l)?|f|l)?|cos(h(f|l)?|f|l)?|tan(h(f|l)?|f|l)?|lloc|rg(f|l)?|bs(f|l)?)|real(f|l)?|brt(f|l)?)|t(ime|o(upper|lower)|an(h(f|l)?|f|l)?|runc(f|l)?|gamma(f|l)?|mp(nam|file))|i(s(space|n(ormal|an)|cntrl|inf|digit|u(nordered|pper)|p(unct|rint)|finite|w(space|c(ntrl|type)|digit|upper|p(unct|rint)|lower|al(num|pha)|graph|xdigit|blank)|l(ower|ess(equal|greater)?)|al(num|pha)|gr(eater(equal)?|aph)|xdigit|blank)|logb(f|l)?|max(div|abs))|di(v|fftime)|_Exit|unget(c|wc)|p(ow(f|l)?|ut(s|c(har)?|wc(har)?)|error|rintf)|e(rf(c(f|l)?|f|l)?|x(it|p(2(f|l)?|f|l|m1(f|l)?)?))|v(s(scanf|nprintf|canf|printf|w(scanf|printf))|printf|f(scanf|printf|w(scanf|printf))|w(scanf|printf)|a_(start|copy|end|arg))|qsort|f(s(canf|e(tpos|ek))|close|tell|open|dim(f|l)?|p(classify|ut(s|c|w(s|c))|rintf)|e(holdexcept|set(e(nv|xceptflag)|round)|clearexcept|testexcept|of|updateenv|r(aiseexcept|ror)|get(e(nv|xceptflag)|round))|flush|w(scanf|ide|printf|rite)|loor(f|l)?|abs(f|l)?|get(s|c|pos|w(s|c))|re(open|e|ad|xp(f|l)?)|m(in(f|l)?|od(f|l)?|a(f|l|x(f|l)?)?))|l(d(iv|exp(f|l)?)|o(ngjmp|cal(time|econv)|g(1(p(f|l)?|0(f|l)?)|2(f|l)?|f|l|b(f|l)?)?)|abs|l(div|abs|r(int(f|l)?|ound(f|l)?))|r(int(f|l)?|ound(f|l)?)|gamma(f|l)?)|w(scanf|c(s(s(tr|pn)|nc(py|at|mp)|c(spn|hr|oll|py|at|mp)|to(imax|d|u(l(l)?|max)|k|f|l(d|l)?|mbs)|pbrk|ftime|len|r(chr|tombs)|xfrm)|to(b|mb)|rtomb)|printf|mem(set|c(hr|py|mp)|move))|a(s(sert|ctime|in(h(f|l)?|f|l)?)|cos(h(f|l)?|f|l)?|t(o(i|f|l(l)?)|exit|an(h(f|l)?|2(f|l)?|f|l)?)|b(s|ort))|g(et(s|c(har)?|env|wc(har)?)|mtime)|r(int(f|l)?|ound(f|l)?|e(name|alloc|wind|m(ove|quo(f|l)?|ainder(f|l)?))|a(nd|ise))|b(search|towc)|m(odf(f|l)?|em(set|c(hr|py|mp)|move)|ktime|alloc|b(s(init|towcs|rtowcs)|towc|len|r(towc|len))))\b
+    - captures: 
+        "1": 
+          name: punctuation.whitespace.function-call.leading.c
+        "2": 
+          name: support.function.any-method.c
+        "3": 
+          name: punctuation.definition.parameters.c
+      match: |-
+        (?x) (?: (?= \s )  (?:(?<=else|new|return) | (?<!\w)) (\s+))?
+        			(\b 
+        				(?!(while|for|do|if|else|switch|catch|enumerate|return|r?iterate)\s*\()(?:(?!NS)[A-Za-z_][A-Za-z0-9_]*+\b | :: )++                  # actual name
+        			)
+        			 \s*(\()
+      name: meta.function-call.c
+    - captures: 
+        "1": 
+          name: variable.other.c
+        "2": 
+          name: punctuation.definition.parameters.c
+      match: |-
+        (?x)
+        			        (?x)
+        			(?:  
+        			     (?: (?= \s )           (?<!else|new|return) (?<=\w)\s+      #  or word + space before name
+        			     )
+        			)
+        			(
+        				(?: [A-Za-z_][A-Za-z0-9_]*+ | :: )++    |              # actual name
+        				(?: (?<=operator) (?: [-*&<>=+!]+ | \(\) | \[\] ) )?  # if it is a C++ operator
+        			)
+        			 \s*(\()
+      name: meta.initialization.c
+    - include: "#block"
+    - include: $base
+  comments: 
+    patterns: 
+    - captures: 
+        "1": 
+          name: meta.toc-list.banner.block.c
+      match: ^/\* =(\s*.*?)\s*= \*/$\n?
+      name: comment.block.c
+    - begin: /\*
+      captures: 
+        "0": 
+          name: punctuation.definition.comment.c
+      end: \*/
+      name: comment.block.c
+    - match: \*/.*\n
+      name: invalid.illegal.stray-comment-end.c
+    - captures: 
+        "1": 
+          name: meta.toc-list.banner.line.c
+      match: ^// =(\s*.*?)\s*=\s*$\n?
+      name: comment.line.banner.c++
+    - begin: //
+      beginCaptures: 
+        "0": 
+          name: punctuation.definition.comment.c
+      end: $\n?
+      name: comment.line.double-slash.c++
+      patterns: 
+      - match: (?>\\\s*\n)
+        name: punctuation.separator.continuation.c++
+  disabled: 
+    begin: ^\s*#\s*if(n?def)?\b.*$
+    comment: eat nested preprocessor if(def)s
+    end: ^\s*#\s*endif\b.*$
+    patterns: 
+    - include: "#disabled"
+    - include: "#pragma-mark"
+  parens: 
+    begin: \(
+    end: \)
+    name: meta.parens.c
+    patterns: 
+    - include: $base
+  pragma-mark: 
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.pragma.c
+      "3": 
+        name: meta.toc-list.pragma-mark.c
+    match: ^\s*(#\s*(pragma\s+mark)\s+(.*))
+    name: meta.section
+  preprocessor-rule-disabled: 
+    begin: ^\s*(#(if)\s+(0)\b).*
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.if.c
+      "3": 
+        name: constant.numeric.preprocessor.c
+    end: ^\s*(#\s*(endif)\b)
+    patterns: 
+    - begin: ^\s*(#\s*(else)\b)
+      captures: 
+        "1": 
+          name: meta.preprocessor.c
+        "2": 
+          name: keyword.control.import.else.c
+      end: (?=^\s*#\s*endif\b.*$)
+      patterns: 
+      - include: $base
+    - begin: ""
+      end: (?=^\s*#\s*(else|endif)\b.*$)
+      name: comment.block.preprocessor.if-branch
+      patterns: 
+      - include: "#disabled"
+      - include: "#pragma-mark"
+  preprocessor-rule-disabled-block: 
+    begin: ^\s*(#(if)\s+(0)\b).*
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.if.c
+      "3": 
+        name: constant.numeric.preprocessor.c
+    end: ^\s*(#\s*(endif)\b)
+    patterns: 
+    - begin: ^\s*(#\s*(else)\b)
+      captures: 
+        "1": 
+          name: meta.preprocessor.c
+        "2": 
+          name: keyword.control.import.else.c
+      end: (?=^\s*#\s*endif\b.*$)
+      patterns: 
+      - include: "#block_innards"
+    - begin: ""
+      end: (?=^\s*#\s*(else|endif)\b.*$)
+      name: comment.block.preprocessor.if-branch.in-block
+      patterns: 
+      - include: "#disabled"
+      - include: "#pragma-mark"
+  preprocessor-rule-enabled: 
+    begin: ^\s*(#(if)\s+(0*1)\b)
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.if.c
+      "3": 
+        name: constant.numeric.preprocessor.c
+    end: ^\s*(#\s*(endif)\b)
+    patterns: 
+    - begin: ^\s*(#\s*(else)\b).*
+      captures: 
+        "1": 
+          name: meta.preprocessor.c
+        "2": 
+          name: keyword.control.import.else.c
+      contentName: comment.block.preprocessor.else-branch
+      end: (?=^\s*#\s*endif\b.*$)
+      patterns: 
+      - include: "#disabled"
+      - include: "#pragma-mark"
+    - begin: ""
+      end: (?=^\s*#\s*(else|endif)\b.*$)
+      patterns: 
+      - include: $base
+  preprocessor-rule-enabled-block: 
+    begin: ^\s*(#(if)\s+(0*1)\b)
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.if.c
+      "3": 
+        name: constant.numeric.preprocessor.c
+    end: ^\s*(#\s*(endif)\b)
+    patterns: 
+    - begin: ^\s*(#\s*(else)\b).*
+      captures: 
+        "1": 
+          name: meta.preprocessor.c
+        "2": 
+          name: keyword.control.import.else.c
+      contentName: comment.block.preprocessor.else-branch.in-block
+      end: (?=^\s*#\s*endif\b.*$)
+      patterns: 
+      - include: "#disabled"
+      - include: "#pragma-mark"
+    - begin: ""
+      end: (?=^\s*#\s*(else|endif)\b.*$)
+      patterns: 
+      - include: "#block_innards"
+  preprocessor-rule-other: 
+    begin: ^\s*(#\s*(if(n?def)?)\b.*?(?:(?=(?://|/\*))|$))
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.c
+    end: ^\s*(#\s*(endif)\b).*$
+    patterns: 
+    - include: $base
+  preprocessor-rule-other-block: 
+    begin: ^\s*(#\s*(if(n?def)?)\b.*?(?:(?=(?://|/\*))|$))
+    captures: 
+      "1": 
+        name: meta.preprocessor.c
+      "2": 
+        name: keyword.control.import.c
+    end: ^\s*(#\s*(endif)\b).*$
+    patterns: 
+    - include: "#block_innards"
+  sizeof: 
+    match: \b(sizeof)\b
+    name: keyword.operator.sizeof.c
+  string_escaped_char: 
+    patterns: 
+    - match: \\(\\|[abefnprtv&apos;"?]|[0-3]\d{,2}|[4-7]\d?|x[a-fA-F0-9]{,2})
+      name: constant.character.escape.c
+    - match: \\.
+      name: invalid.illegal.unknown-escape.c
+  string_placeholder: 
+    patterns: 
+    - match: "(?x)%\n    \t\t\t\t\t\t(\\d+\\$)?                             # field (argument #)\n    \t\t\t\t\t\t[#0\\- +&apos;]*                           # flags\n    \t\t\t\t\t\t[,;:_]?                              # separator character (AltiVec)\n    \t\t\t\t\t\t((-?\\d+)|\\*(-?\\d+\\$)?)?              # minimum field width\n    \t\t\t\t\t\t(\\.((-?\\d+)|\\*(-?\\d+\\$)?)?)?         # precision\n    \t\t\t\t\t\t(hh|h|ll|l|j|t|z|q|L|vh|vl|v|hv|hl)? # length modifier\n    \t\t\t\t\t\t[diouxXDOUeEfFgGaACcSspn%]           # conversion type\n    \t\t\t\t\t"
+      name: constant.other.placeholder.c
+    - match: "%"
+      name: invalid.illegal.placeholder.c
+scopeName: source.c
+uuid: 25066DC2-6B1D-11D9-9D5B-000D93589AF6

data/syntax/cake.syntax

@@ -0,0 +1,55 @@
+--- 
+name: Cake
+fileTypes: 
+- thtml
+scopeName: source.php.cake
+uuid: 3DF2FE0B-94CC-4EE2-A50A-BD4823D1B09D
+foldingStartMarker: (/\*|\{|\()
+patterns: 
+- name: support.function.model.cake
+  match: \b(bindModel|unbindModel|hasField|read|field|save|saveField|remove|del|delete|exists|hasAny|find|findAll|findCount|execute|query|validates|invalidate|invalidFields|isForeignKey|getDisplayField|generateList|getID|getLastInsertID|getInsertID|getNumRows|getAffectedRows|setDatasource|beforeFind|afterFind|beforeSave|afterSave|beforeDelete|afterDelete)\b
+- name: support.function.controller.cake
+  match: \b(redirect|set|setAction|validate|validateErrors|render|referer|flash|flashOut|generateFieldNames|postCondtions|cleanUpFields|beforeFilter|beforeRender|afterFilter)\b
+- name: support.constant.core.cake
+  match: \b(ACL_CLASSNAME|ACL_FILENAME|APP|APP_DIR|APP_PATH|AUTO_OUTPUT|AUTO_SESSION|CACHE|CACHE_CHECK|CAKE|CAKE_CORE_INCLUDE_PATH|CAKE_SECURITY|CAKE_SESSION_COOKIE|CAKE_SESSION_SAVE|CAKE_SESSION_STRING|CAKE_SESSION_TIMEOUT|COMPONENTS|COMPRESS_CSS|CONFIGS|CONTROLLER_TESTS|CONTROLLERS|CORE_PATH|CSS|DAY|DEBUG|DS|ELEMENTS|HELPER_TESTS|HELPERS|HOUR|INFLECTIONS|JS|LAYOUTS|LIB_TESTS|LIBS|LOG_ERROR|LOGS|MAX_MD5SIZE|MINUTE|MODEL_TESTS|MODELS|MODULES|MONTH|PEAR|ROOT|SCRIPTS|SECOND|TAG_DIV|TAG_FIELDSET|TAG_LABEL|TAG_P_CLASS|TESTS|TMP|VALID_EMAIL|VALID_NOT_EMPTY|VALID_NUMBER|VALID_YEAR|VENDORS|VIEWS|WEBROOT_DIR|WEBSERVICES|WEEK|WWW_ROOT|YEAR)\b
+- name: invalid.deprecated.model.cake
+  match: \b(setId|findBySql)\b
+- name: invalid.deprecated.helper.html.cake
+  match: \b(areaTag|charsetTag|checkboxTag|contentTag|cssTag|fileTag|formTag|guiListTag|hiddenTag|imageTag|inputTag|javascriptIncludeTag|javascriptTag|linkEmail|linkOut|linkTo|parseHtmlOptions|passwordTag|radioTags|submitTag|tag|urlFor)\b
+- name: invalid.deprecated.helper.ajax.cake
+  match: \b(linkToRemote)\b
+- name: support.function.helper.cake
+  match: \b(isFieldError|labelTag|divTag|pTag|generate(Input|Checkbox|Area|Select|submit)Div|generate(Date|DateTime|Fields))\b
+- name: support.function.helper.html.cake
+  match: \b(addCrumb|charset|url|link|submit|password|textarea|checkbox|css|file|getCrumbs|hidden|image|input|radio|tableHeaders|tableCells|validate|tagIsValid|validateErrors|tagErrorMsg|selectTag|(day|year|month|hour|minute|meridian|date)OptionTag)\b
+- name: support.function.helper.ajax.cake
+  match: \b(link|remoteFunction|remoteTimer|form|submit|observe(Field|Form)|autoComplete|drag|drop|dropRemote|slider|editor|sortable)\b
+- name: support.function.file.cake
+  match: \b(read|append|write|get(Md5|Size|Ext|Name|Owner|Group|Folder|Chmod|FullPath)|create|exists|delete|writable|executable|readable|last(Access|Change))\b
+- name: support.function.log.cake
+  match: \b(write)\b
+- name: support.function.helper.number.cake
+  match: \b(precision|toReadableSize|toPercentage)\b
+- name: support.function.component.requestHandler.cake
+  match: \b(startup|setAjax|is(Ajax|Xml|Rss|Atom|Post|Get|Delete|Mobile)|getAjaxVersion|setContent|get(Referer|ClientIP)|strip(WhiteSpace|Images|Scripts|All|tags)|accepts|prefers)\b
+- name: support.function.component.session.cake
+  match: \b(write|read|del|delete|check|error|setFlash|flash|renew|valid)\b
+- name: support.function.component.security.cake
+  match: \b(startup|blackHole|requirePost|requireAuth)\b
+- name: support.function.component.sanitize.cake
+  match: \b(paranoid|sql|html|cleanArray|cleanArrayR|cleanValue|formatColumns)\b
+- name: support.function.helper.time.cake
+  match: \b(trim|fromString|nice|niceShort|isToday|daysAsSql|dayAsSql|isThisYear|wasYesterday|isTomorrow|toUnix|toAtom|toRSS|timeAgoInWords|relativeTime|wasWithinLast)\b
+- name: support.function.helper.text.cake
+  match: \b(highlight|stripLinks|autoLinkUrls|autoLinkEmails|autoLink|truncate|excerpt|flay)\b
+- name: support.function.helper.javascript.cake
+  match: \b(codeBlock|link|linkOut|escape(String|Script)|event|(cache|write)Events|includeScript|object)\b
+- name: support.function.neatArray.cake
+  match: \b(findIn|cleanup|add|plus|totals|filter|walk|sprintf|extract|unique|makeUnique|joinWith|threaded|multi_search)\b
+- name: support.function.neatString.cake
+  match: \b(toArray|toRoman|toCompressed|randomPassword)\b
+- name: support.function.basics.cake
+  match: \b(load(Models|PluginModels|View|Model|Controllers|PluginController)|listClasses|config|gendor|debug|aa|ha|a|e|low|up|r|pr|params|am|setUri|env|cache|clearCache|stripslashes_deep|countDim|LogError|fileExistsInPAth|convertSlash)\b
+- include: source.php
+- include: text.html.basic
+foldingStopMarker: (\*/|\}|\))

data/syntax/camlp4.syntax

@@ -0,0 +1,36 @@
+--- 
+name: camlp4
+scopeName: source.camlp4.ocaml
+repository: 
+  camlpppp-streams: 
+    patterns: 
+    - name: meta.camlp4-stream.element.ocaml
+      endCaptures: 
+        "1": 
+          name: punctuation.separator.camlp4.ocaml
+      begin: (')
+      beginCaptures: 
+        "1": 
+          name: punctuation.definition.camlp4.simple-element.ocaml
+      end: (;)(?=\s*')|(?=\s*>])
+      patterns: 
+      - include: source.ocaml
+uuid: 37538B6B-CEFA-4DAE-B1E4-1218DB82B37F
+foldingStartMarker: (\bEXTEND\B)
+patterns: 
+- name: meta.camlp4-stream.ocaml
+  endCaptures: 
+    "1": 
+      name: punctuation.definition.camlp4-stream.ocaml
+  begin: (\[<)(?=.*?>])
+  beginCaptures: 
+    "1": 
+      name: punctuation.definition.camlp4-stream.ocaml
+  end: (?=>])
+  patterns: 
+  - include: "#camlpppp-streams"
+- name: punctuation.definition.camlp4-stream.ocaml
+  match: \[<|>]
+- name: keyword.other.camlp4.ocaml
+  match: \bparser\b|<(<|:)|>>|\$(:|\${0,1})
+foldingStopMarker: (\bEND\b)