summaryrefslogtreecommitdiffstats
path: root/.vim/syntax
diff options
context:
space:
mode:
Diffstat (limited to '.vim/syntax')
-rw-r--r--.vim/syntax/fortress.vim90
1 files changed, 90 insertions, 0 deletions
diff --git a/.vim/syntax/fortress.vim b/.vim/syntax/fortress.vim
new file mode 100644
index 0000000..13aacbb
--- /dev/null
+++ b/.vim/syntax/fortress.vim
@@ -0,0 +1,90 @@
+" Vim syntax file
+" Language: Fortress
+" Filenames: *.fsi *.fss
+" Maintainers: Jon Rafkind <rafkind@cs.utah.edu>
+" URL: http://www.cs.utah.edu/~rafkind
+" Last Change: 2008 May 20 - Initial version
+
+" Some stuff stolen from ocaml.vim
+
+if version < 600
+ syntax clear
+elseif exists("b:current_syntax") && b:current_syntax == "fortress"
+ finish
+endif
+
+" syn region fortressComment start="(\*)" end="\\$" end="$"
+syn region fortressComment start="(\*" end="\*)" contains=fortressComment
+syn match fortressLineComment "(\*).*"
+syn match fortressEnd "\<end\>"
+
+" syn match fortressKeyword "\<getter\>"
+syn keyword fortressKeyword getter else var test
+syn keyword fortressExternal import export
+
+syn region fortressString start=+"+ skip=+\\\\\|\\"+ end=+"+
+syn match fortressChar "'.'"
+syn match fortressNumber "\<-\=\d\(_\|\d\)*"
+
+syn keyword fortressType api object trait value
+syn keyword fortressType extends abstract comprises
+syn keyword fortressType grammar component
+syn keyword fortressType Any Boolean String self
+syn keyword fortressType Char
+syn keyword fortressType ZZ32 ZZ64 RR32 RR64 ZZ
+
+syn keyword fortressOperator println
+
+syn keyword fortressKeyword opr for private asif throw
+
+syn match fortressThenErr "\<then\>"
+syn match fortressCaseErr "\<case\>"
+syn match fortressCatchErr "\<catch\>"
+syn match fortressTypecaseErr "\<of\>"
+
+syn region fortressNone matchgroup=fortressKeyword start="\<if\>" matchgroup=fortressKeyword end="\<then\>" contains=ALLBUT,fortressThenErr nextgroup=fortressIf
+syn region fortressIf matchgroup=fortressKeyword start="\<elif\>" matchgroup=fortressKeyword end="\<then\>" contains=ALLBUT,fortressThenErr nextgroup=fortressIf
+syn region fortressIf matchgroup=fortressKeyword start="\<then\>" matchgroup=fortressKeyword end="\<end\>" contains=ALLBUT,fortressThenErr
+
+syn region fortressNone matchgroup=fortressKeyword start="\<case\>" matchgroup=fortressKeyword end="\<of\>" contains=ALLBUT,fortressCaseErr nextgroup=fortressCase
+syn region fortressCase matchgroup=fortressKeyword start="\<in\>" matchgroup=fortressKeyword end="\<end\>" contains=ALLBUT,fortressCaseErr
+
+syn region fortressNone matchgroup=fortressKeyword start="\<typecase\>" matchgroup=fortressKeyword end="\<of\>" contains=ALLBUT,fortressTypecaseErr nextgroup=fortressTypecase
+syn region fortressTypecase matchgroup=fortressKeyword start="\<of\>" matchgroup=fortressKeyword end="\<end\>" contains=ALLBUT,fortressEndErr
+
+syn region fortressNone matchgroup=fortressKeyword start="\<try\>" matchgroup=fortressKeyword end="\<catch\>" contains=ALLBUT,fortressCatchErr nextgroup=fortressCatch
+syn region fortressCatch matchgroup=fortressKeyword start="\<catch\>" matchgroup=fortressKeyword end="\<end\>" contains=ALLBUT,fortressEndErr
+
+syn region fortressNone matchgroup=fortressKeyword start="\<do\>" matchgroup=fortressKeyword end="\<end\>" contains=ALLBUT,fortressEndErr
+
+syn region fortressApi matchgroup=fortressModule start="\<api\>" matchgroup=fortressModule end="\<end\>" contains=ALLBUT,fortressEndErr
+syn region fortressObject matchgroup=fortressModule start="\<object\>" matchgroup=fortressModule end="\<end\>" contains=ALLBUT,fortressEndErr
+syn region fortressTrait matchgroup=fortressModule start="\<trait\>" matchgroup=fortressModule end="\<end\>" contains=ALLBUT,fortressEndErr
+syn region fortressComponent matchgroup=fortressModule start="\<component\>" matchgroup=fortressModule end="\<end\>" contains=ALLBUT,fortressEndErr
+
+if version >= 508 || !exists("did_fortress_syntax_inits")
+ if version < 508
+ let did_fortress_syntax_inits = 1
+ command -nargs=+ HiLink hi link <args>
+ else
+ command -nargs=+ HiLink hi def link <args>
+ endif
+
+ HiLink fortressComment Comment
+ HiLink fortressLineComment Comment
+ HiLink fortressKeyword Keyword
+ HiLink fortressExternal Include
+ HiLink fortressType Type
+ HiLink fortressOperator Operator
+ HiLink fortressEnd Statement
+
+ HiLink fortressString String
+ HiLink fortressChar String
+ HiLink fortressNumber Number
+
+ HiLink fortressThenErr Error
+
+ delcommand HiLink
+endif
+
+let b:current_syntax = "fortress"