" Vim syntax file " Language: SETL (dB) " Maintainer: Alex Poylisher " Last Change: 2001 Apr 25 " The SETL documentation is at "http://www-robotics.eecs.lehigh.edu/~bacon/setl-doc.html". " Remove any old syntax stuff hanging around. syn clear " SETL is entirely case-insensitive. syn case ignore " The SETL reserved words. syn keyword setlKeyword const var syn keyword setlConditional case else elseif if then of syn keyword setlKeyword end forall exists notexists syn keyword setlSpecial om last_error command_line command_name nargs syn keyword setlSpecial magic stdin stdout stderr syn keyword setlInclude #include syn keyword setlBoolean true false syn keyword setlOperator abs accept acos and any arb asin assert atan syn keyword setlOperator atan2 bit_and bit_not bit_or bit_xor syn keyword setlOperator call callout ceil char chdir clear_error syn keyword setlOperator clock close cos cosh date denotype syn keyword setlOperator div domain dup dup2 eof exec exp fdate syn keyword setlOperator fexists filename fileno filter fix float fixed syn keyword setlOperator floating floor flush fork from fromb frome syn keyword setlOperator fsize get geta getb getc getchar getegid syn keyword setlOperator getenv geteuid getfile getgid getline getn syn keyword setlOperator getpgrp gets getuid getwd gmark syn keyword setlOperator gsub hex hostaddr hostname ichar impl syn keyword setlOperator in incs ip_addresses ip_names is_atom syn keyword setlOperator is_boolean is_integer is_map is_mmap syn keyword setlOperator is_numeric is_om is_real is_routine syn keyword setlOperator is_set is_smap is_string is_tuple syn keyword setlOperator is_open kill len less lessf lexists syn keyword setlOperator link log lpad mark match max mem_alloc syn keyword setlOperator mem_copy mem_free min mod newat not notany syn keyword setlOperator notin npow nprint nprinta odd open syn keyword setlOperator or pack_char pack_short pack_int pack_long syn keyword setlOperator pack_float pack_double pack_long_double syn keyword setlOperator peekc peekchar peer_address peer_name syn keyword setlOperator peer_port pexists pid pipe pipe_from_child syn keyword setlOperator port pow pretty print printa pump put syn keyword setlOperator puta putb putc putchar putenv putfile syn keyword setlOperator putline outs random range rany rbreak rlen syn keyword setlOperator rmatch rnotany rspan read reada readlink syn keyword setlOperator reads recv recvfrom recv_fd rem reverse syn keyword setlOperator rewind round routine rpad seek syn keyword setlOperator select send sendto send_fd setenv setgid syn keyword setlOperator setpgrp setrandom setuid set_intslash syn keyword setlOperator set_magic shutdown sign sin sinh span syn keyword setlOperator split sqrt store_char store_short store_int syn keyword setlOperator store_long store_float store_double syn keyword setlOperator store_long_double store_string store_c_string syn keyword setlOperator str strad sub subset symlink system sys_read syn keyword setlOperator sys_write tan tanh tie time tmpnam syn keyword setlOperator to_lower to_upper tod type umask ungetc syn keyword setlOperator ungetchar unhex unpack_char unpack_short syn keyword setlOperator unpack_int unpack_long unpack_float syn keyword setlOperator unpack_double unpack_long_double syn keyword setlOperator unpretty unsetenv unstr val wait whole with syn keyword setlOperator write writea syn keyword setlPreCondit begin body syn keyword setlPreCondit program package procedure proc use op syn keyword setlRepeat exit for loop while until break syn keyword setlRepeat continue do doing step init term syn keyword setlStatement goto return syn keyword setlStatement stop quit assert pass " Todo. syn keyword setlTodo contained TODO FIXME XXX " Strings and characters. syn region setlString1 start=+'+ skip=+''+ end=+'+ syn region setlString2 start=+"+ skip=+""+ end=+"+ " Numbers. syn match setlNumber "[+-]\=\<[0-9_]*\.\=[0-9_]*\>" " Labels for the goto statement. syn region setlLabel start="<<" end=">>" " Comments. syn region setlComment oneline contains=setlTodo start="--" end="$" if !exists("did_setl_syntax_inits") let did_setl_syntax_inits = 1 " The default methods for highlighting. Can be overridden later. hi link setlBoolean Boolean hi link setlCharacter Character hi link setlComment Comment hi link setlConditional Conditional hi link setlInclude Include hi link setlKeyword Keyword hi link setlLabel Label hi link setlNumber Number hi link setlOperator Operator hi link setlPreCondit PreCondit hi link setlRepeat Repeat hi link setlSpecial Special hi link setlStatement Statement hi link setlString1 String hi link setlString2 String hi link setlStructure Structure hi link setlTodo Todo hi link setlType Type endif let b:current_syntax = "setl" " vim: ts=8