" Vim syntax file" " Language: Baan " Maintainer: Erwin Smit / Her van de Vliert " Last change: 30-10-2001" " For version 5.x: Clear all syntax items " For version 6.x: Quit when a syntax file was already loaded if version < 600 syntax clear elseif exists("b:current_syntax") finish endif "************************************* 3GL ************************************" syn match baan3gl "#ident" syn match baan3gl "#include" syn match baan3gl "#define" syn match baan3gl "#undef" syn match baan3gl "#pragma" syn keyword baanConditional if then else case endif while endwhile endfor endcase syn keyword baan3gl at based break bset call common const continue default double syn keyword baan3gl empty extern fixed function ge global goto gt le lt mb syn keyword baan3gl multibyte ne ofr prompt ref repeat static step stop string syn keyword baan3gl true false until void wherebind syn keyword baan3gl and or to not in syn keyword baan3gl domain table eq input end long dim return at base print syn match baan3gl "\" contains=baansql syn match baan3gl "on case" syn match baan3gl "e\=n\=d\=dllusage" "************************************* SQL ************************************" syn keyword baansqlh where reference selecterror selectbind selectdo selectempty syn keyword baansqlh selecteos whereused endselect unref setunref clearunref syn keyword baansqlh from select clear skip rows syn keyword baansql between inrange having syn match baansql "as set with \d\+ rows" syn match baansql "as prepared set" syn match baansql "as prepared set with \d\+ rows" syn match baansql "refers to" syn match baansql "with retry" syn match baansql "with retry repeat last row" syn match baansql "for update" syn match baansql "order by" syn match baansql "group by" syn match baansql "commit\.transaction()" syn match baansql "abort\.transaction()" syn match baansql "db\.columns\.to\.record" syn match baansql "db\.record\.to\.columns" syn match baansql "db\.bind" syn match baansql "db\.change\.order" syn match baansql "\" "number with dot" syn match baanNumber "\<\-\=\d\+\.\d*\>" "number starting with a dot" syn match baanNumber "\<\-\=\.\d\+\>" " String" syn region baanString start=+"+ skip=+""+ end=+"+ " Comment" syn match baanComment "|$" syn match baanComment "|.$" syn match baanComment "|[^ ]" syn match baanComment "|[^#].*[^ ]" syn match baanCommenth "^|#lra.*$" syn match baanCommenth "^|#mdm.*$" syn match baanCommenth "^|#[0-9][0-9][0-9][0-9][0-9].*$" syn match baanCommenth "^|#N\=o\=Include.*$" syn region baanComment start="dllusage" end="enddllusage" " Oldcode" syn match baanUncommented "^|[^*#].*[^ ]" " SpaceError" syn match BaanSpaces " " syn match baanSpaceError "\s*$" syn match baanSpaceError " " " Define the default highlighting. " For version 5.7 and earlier: only when not done already " For version 5.8 and later: only when an item doesn't have highlighting yet if version >= 508 || !exists("did_baan_syn_inits") if version < 508 let did_c_syn_inits = 1 command -nargs=+ HiLink hi link else command -nargs=+ HiLink hi def link endif HiLink baanConditional Conditional HiLink baan3gl Statement HiLink baan4gl Statement HiLink baan4glh Statement HiLink baansql Statement HiLink baansqlh Statement HiLink baanNumber Number HiLink baanString String HiLink baanComment Comment HiLink baanCommenth Comment HiLink baanUncommented Comment delcommand HiLink endif let b:current_syntax = "baan" " vim: ts=8