" Vim syntax file" Language:	Jess" Maintainer:	Paul Baleme <pbaleme@mail.com>" Last change:	September 14, 2000" Based on lisp.vim by : Dr. Charles E. Campbell, Jr. <cec@gryphon.gsfc.nasa.gov>" For version 5.x: Clear all syntax items" For version 6.x: Quit when a syntax file was already loadedif version < 600  syntax clearelseif exists("b:current_syntax")  finishendifif version < 600  set iskeyword=42,43,45,47-58,60-62,64-90,97-122,_else  setlocal iskeyword=42,43,45,47-58,60-62,64-90,97-122,_endif" Listssyn match	jessSymbol	![^()'`,"; \t]\+!	containedsyn match	jessBarSymbol	!|..\{-}|!		containedsyn region	jessList matchgroup=Delimiter start="(" skip="|.\{-}|" matchgroup=Delimiter end=")" contains=jessAtom,jessBQList,jessConcat,jessDeclaration,jessList,jessNumber,jessSymbol,jessSpecial,jessFunc,jessKey,jessAtomMark,jessString,jessComment,jessBarSymbol,jessAtomBarSymbol,jessVarsyn region	jessBQList	matchgroup=PreProc   start="`("	skip="|.\{-}|" matchgroup=PreProc   end=")" contains=jessAtom,jessBQList,jessConcat,jessDeclaration,jessList,jessNumber,jessSpecial,jessSymbol,jessFunc,jessKey,jessVar,jessAtomMark,jessString,jessComment,jessBarSymbol,jessAtomBarSymbol" Atomssyn match	jessAtomMark	"'"syn match	jessAtom	"'("me=e-1	contains=jessAtomMark	nextgroup=jessAtomListsyn match	jessAtom	"'[^ \t()]\+"	contains=jessAtomMarksyn match	jessAtomBarSymbol	!'|..\{-}|!	contains=jessAtomMarksyn region	jessAtom	start=+'"+	skip=+\\"+ end=+"+syn region	jessAtomList	matchgroup=Special start="("	skip="|.\{-}|" matchgroup=Special end=")"	contained contains=jessAtomList,jessAtomNmbr0,jessString,jessComment,jessAtomBarSymbolsyn match	jessAtomNmbr	"\<[0-9]\+"			contained" Standard jess Functions and Macrossyn keyword jessFunc    *   +   **  -   /   <   >   <=  >=  <>  =syn keyword jessFunc    long            longpsyn keyword jessFunc    abs             agenda              andsyn keyword jessFunc    assert          assert-string       bagsyn keyword jessFunc    batch           bind                bit-andsyn keyword jessFunc    bit-not         bit-or              bloadsyn keyword jessFunc    bsave           build               callsyn keyword jessFunc    clear           clear-storage       closesyn keyword jessFunc    complement$     context             count-query-resultssyn keyword jessFunc    create$syn keyword jessFunc    delete$             divsyn keyword jessFunc    do-backward-chaining                esyn keyword jessFunc    engine          eq                  eq*syn keyword jessFunc    eval            evenp               exitsyn keyword jessFunc    exp             explode$            external-addresspsyn keyword jessFunc    fact-slot-value facts               fetchsyn keyword jessFunc    first$          float               floatpsyn keyword jessFunc    foreach         format              gensym*syn keyword jessFunc    get             get-fact-duplicationsyn keyword jessFunc    get-member      get-multithreaded-iosyn keyword jessFunc    get-reset-globals                   get-salience-evaluationsyn keyword jessFunc    halt            if                  implode$syn keyword jessFunc    import          insert$             integersyn keyword jessFunc    integerp        intersection$       jess-version-numbersyn keyword jessFunc    jess-version-string                 length$syn keyword jessFunc    lexemep         list-function$      load-factssyn keyword jessFunc    load-function   load-package        logsyn keyword jessFunc    log10           lowcase             matchessyn keyword jessFunc    max             member$             minsyn keyword jessFunc    mod             modify              multifieldpsyn keyword jessFunc    neq             new                 notsyn keyword jessFunc    nth$            numberp             oddpsyn keyword jessFunc    open            or                  pisyn keyword jessFunc    ppdeffunction   ppdefglobal         ddpefrulesyn keyword jessFunc    printout        random              readsyn keyword jessFunc    readline        replace$            resetsyn keyword jessFunc    rest$           retract             retract-stringsyn keyword jessFunc    return          round               rulessyn keyword jessFunc    run             run-query           run-until-haltsyn keyword jessFunc    save-facts      set                 set-fact-duplicationsyn keyword jessFunc    set-factory     set-member          set-multithreaded-iosyn keyword jessFunc    set-node-index-hash                 set-reset-globalssyn keyword jessFunc    set-salience-evaluation             set-strategysyn keyword jessFunc    setgen          show-deffacts       show-deftemplatessyn keyword jessFunc    show-jess-listeners                 socketsyn keyword jessFunc    sqrt            store               str-catsyn keyword jessFunc    str-compare     str-index           str-lengthsyn keyword jessFunc    stringp         sub-string          subseq$syn keyword jessFunc    subsetp         sym-cat             symbolpsyn keyword jessFunc    system          throw               timesyn keyword jessFunc    try             undefadvice         undefinstancesyn keyword jessFunc    undefrule       union$              unwatchsyn keyword jessFunc    upcase          view                watchsyn keyword jessFunc    whilesyn match   jessFunc	"\<c[ad]\+r\>"" jess Keywords (modifiers)syn keyword jessKey	    defglobal       deffunction         defrulesyn keyword jessKey	    deffactssyn keyword jessKey	    defadvice       defclass            definstance" Standard jess Variablessyn region	jessVar	start="?"         end="[^a-zA-Z0-9]"me=e-1" Stringssyn region	jessString	start=+"+	skip=+\\"+ end=+"+" Shared with Declarations, Macros, Functions"syn keyword	jessDeclarationsyn match	jessNumber	"[0-9]\+"syn match	jessSpecial	"\*[a-zA-Z_][a-zA-Z_0-9-]*\*"syn match	jessSpecial	!#|[^()'`,"; \t]\+|#!syn match	jessSpecial	!#x[0-9a-fA-F]\+!syn match	jessSpecial	!#o[0-7]\+!syn match	jessSpecial	!#b[01]\+!syn match	jessSpecial	!#\\[ -\~]!syn match	jessSpecial	!#[':][^()'`,"; \t]\+!syn match	jessSpecial	!#([^()'`,"; \t]\+)!syn match	jessConcat	"\s\.\s"syntax match	jessParenError	")"" Commentssyn match	jessComment	";.*$"" synchronizationsyn sync lines=100" 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 yetif version >= 508 || !exists("did_jess_syntax_inits")  if version < 508    let did_jess_syntax_inits = 1    command -nargs=+ HiLink hi link <args>  else    command -nargs=+ HiLink hi def link <args>  endif  HiLink jessAtomNmbr	jessNumber  HiLink jessAtomMark	jessMark  HiLink jessAtom		Identifier  HiLink jessAtomBarSymbol	Special  HiLink jessBarSymbol	Special  HiLink jessComment	Comment  HiLink jessConcat	Statement  HiLink jessDeclaration	Statement  HiLink jessFunc		Statement  HiLink jessKey		Type  HiLink jessMark		Delimiter  HiLink jessNumber	Number  HiLink jessParenError	Error  HiLink jessSpecial	Type  HiLink jessString	String  HiLink jessVar	                  Identifier  delcommand HiLinkendiflet b:current_syntax = "jess"" vim: ts=18