Install vim73
[git/jnareb-git.git] / share / vim / vim73 / syntax / st.vim
blobd629eb4ed8646e0c28e881af77ac2efca2b72589
1 " Vim syntax file
2 " Language:     Smalltalk
3 " Maintainer:   Arndt Hesse <hesse@self.de>
4 " Last Change:  2001 May 09
6 " For version 5.x: Clear all syntax items
7 " For version 6.x: Quit when a syntax file was already loaded
8 if version < 600
9   syntax clear
10 elseif exists("b:current_syntax")
11   finish
12 endif
14 " some Smalltalk keywords and standard methods
15 syn keyword     stKeyword       super self class true false new not
16 syn keyword     stKeyword       notNil isNil inspect out nil
17 syn match       stMethod        "\<do\>:"
18 syn match       stMethod        "\<whileTrue\>:"
19 syn match       stMethod        "\<whileFalse\>:"
20 syn match       stMethod        "\<ifTrue\>:"
21 syn match       stMethod        "\<ifFalse\>:"
22 syn match       stMethod        "\<put\>:"
23 syn match       stMethod        "\<to\>:"
24 syn match       stMethod        "\<at\>:"
25 syn match       stMethod        "\<add\>:"
26 syn match       stMethod        "\<new\>:"
27 syn match       stMethod        "\<for\>:"
28 syn match       stMethod        "\<methods\>:"
29 syn match       stMethod        "\<methodsFor\>:"
30 syn match       stMethod        "\<instanceVariableNames\>:"
31 syn match       stMethod        "\<classVariableNames\>:"
32 syn match       stMethod        "\<poolDictionaries\>:"
33 syn match       stMethod        "\<subclass\>:"
35 " the block of local variables of a method
36 syn region stLocalVariables     start="^[ \t]*|" end="|"
38 " the Smalltalk comment
39 syn region stComment    start="\"" end="\""
41 " the Smalltalk strings and single characters
42 syn region stString     start='\'' skip="''" end='\''
43 syn match  stCharacter  "$."
45 syn case ignore
47 " the symols prefixed by a '#'
48 syn match  stSymbol     "\(#\<[a-z_][a-z0-9_]*\>\)"
49 syn match  stSymbol     "\(#'[^']*'\)"
51 " the variables in a statement block for loops
52 syn match  stBlockVariable "\(:[ \t]*\<[a-z_][a-z0-9_]*\>[ \t]*\)\+|" contained
54 " some representations of numbers
55 syn match  stNumber     "\<\d\+\(u\=l\=\|lu\|f\)\>"
56 syn match  stFloat      "\<\d\+\.\d*\(e[-+]\=\d\+\)\=[fl]\=\>"
57 syn match  stFloat      "\<\d\+e[-+]\=\d\+[fl]\=\>"
59 syn case match
61 " a try to higlight paren mismatches
62 syn region stParen      transparent start='(' end=')' contains=ALLBUT,stParenError
63 syn match  stParenError ")"
64 syn region stBlock      transparent start='\[' end='\]' contains=ALLBUT,stBlockError
65 syn match  stBlockError "\]"
66 syn region stSet        transparent start='{' end='}' contains=ALLBUT,stSetError
67 syn match  stSetError   "}"
69 hi link stParenError stError
70 hi link stSetError stError
71 hi link stBlockError stError
73 " synchronization for syntax analysis
74 syn sync minlines=50
76 " Define the default highlighting.
77 " For version 5.7 and earlier: only when not done already
78 " For version 5.8 and later: only when an item doesn't have highlighting yet
79 if version >= 508 || !exists("did_st_syntax_inits")
80   if version < 508
81     let did_st_syntax_inits = 1
82     command -nargs=+ HiLink hi link <args>
83   else
84     command -nargs=+ HiLink hi def link <args>
85   endif
87   HiLink stKeyword              Statement
88   HiLink stMethod               Statement
89   HiLink stComment              Comment
90   HiLink stCharacter            Constant
91   HiLink stString               Constant
92   HiLink stSymbol               Special
93   HiLink stNumber               Type
94   HiLink stFloat                Type
95   HiLink stError                Error
96   HiLink stLocalVariables       Identifier
97   HiLink stBlockVariable        Identifier
99   delcommand HiLink
100 endif
102 let b:current_syntax = "st"