summaryrefslogtreecommitdiffstats
path: root/syntax/reva.vim
diff options
context:
space:
mode:
authorAdam Stankiewicz <sheerun@sher.pl>2017-09-28 22:18:09 +0200
committerAdam Stankiewicz <sheerun@sher.pl>2017-09-28 22:18:09 +0200
commit27903c5b8656c796564ef073c1ebe77a2f0154e1 (patch)
tree2b0a3a14494d7976fb79a7517706e25d2a95d080 /syntax/reva.vim
parentd5e38fa97bc50a93a66473d6cd7072fbcbadda57 (diff)
downloadvim-polyglot-3.0.0.tar.gz
vim-polyglot-3.0.0.zip
Revert inlining basic language packv3.0.0
Diffstat (limited to 'syntax/reva.vim')
-rw-r--r--syntax/reva.vim195
1 files changed, 0 insertions, 195 deletions
diff --git a/syntax/reva.vim b/syntax/reva.vim
deleted file mode 100644
index 6194f148..00000000
--- a/syntax/reva.vim
+++ /dev/null
@@ -1,195 +0,0 @@
-if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'vim') == -1
-
-" Vim syntax file
-" Language: Reva Forth
-" Version: 2011.2
-" Last Change: 2012/02/13
-" Maintainer: Ron Aaron <ron@ronware.org>
-" URL: http://ronware.org/reva/
-" Filetypes: *.rf *.frt
-" NOTE: You should also have the ftplugin/reva.vim file to set 'isk'
-
-" quit when a syntax file was already loaded
-if exists("b:current_syntax")
- finish
-endif
-
-let s:cpo_save = &cpo
-set cpo&vim
-
-syn clear
-
-" Synchronization method
-syn sync ccomment
-syn sync maxlines=100
-
-
-syn case ignore
-" Some special, non-FORTH keywords
-"syn keyword revaTodo contained todo fixme bugbug todo: bugbug: note:
-syn match revaTodo contained '\(todo\|fixme\|bugbug\|note\)[:]*'
-syn match revaTodo contained 'copyright\(\s(c)\)\=\(\s[0-9]\{2,4}\)\='
-
-syn match revaHelpDesc '\S.*' contained
-syn match revaHelpStuff '\<\(def\|stack\|ctx\|ver\|os\|related\):\s.*'
-syn region revaHelpStuff start='\<desc:\>' end='^\S' contains=revaHelpDesc
-syn region revaEOF start='\<|||\>' end='{$}' contains=revaHelpStuff
-
-
-syn case match
-" basic mathematical and logical operators
-syn keyword revaoperators + - * / mod /mod negate abs min max umin umax
-syn keyword revaoperators and or xor not invert 1+ 1-
-syn keyword revaoperators m+ */ */mod m* um* m*/ um/mod fm/mod sm/rem
-syn keyword revaoperators d+ d- dnegate dabs dmin dmax > < = >> << u< <>
-
-
-" stack manipulations
-syn keyword revastack drop nip dup over tuck swap rot -rot ?dup pick roll
-syn keyword revastack 2drop 2nip 2dup 2over 2swap 2rot 3drop
-syn keyword revastack >r r> r@ rdrop
-" syn keyword revastack sp@ sp! rp@ rp!
-
-" address operations
-syn keyword revamemory @ ! +! c@ c! 2@ 2! align aligned allot allocate here free resize
-syn keyword revaadrarith chars char+ cells cell+ cell cell- 2cell+ 2cell- 3cell+ 4cell+
-syn keyword revamemblks move fill
-
-" conditionals
-syn keyword revacond if else then =if >if <if <>if if0 ;; catch throw
-
-" iterations
-syn keyword revaloop while repeat until again
-syn keyword revaloop do loop i j leave unloop skip more
-
-" new words
-syn match revaColonDef '\<noname:\|\<:\s+' contains=revaComment
-syn keyword revaEndOfColonDef ; ;inline
-syn keyword revadefine constant constant, variable create variable,
-syn keyword revadefine user value to +to defer! defer@ defer is does> immediate
-syn keyword revadefine compile literal ' [']
-
-" Built in words
-com! -nargs=+ Builtin syn keyword revaBuiltin <args>
-Builtin execute ahead interp bye >body here pad words make
-Builtin accept close cr creat delete ekey emit fsize ioerr key?
-Builtin mtime open/r open/rw read rename seek space spaces stat
-Builtin tell type type_ write (seek) (argv) (save) 0; 0drop;
-Builtin >class >lz >name >xt alias alias: appname argc asciiz, asciizl,
-Builtin body> clamp depth disassemble findprev fnvhash getenv here,
-Builtin iterate last! last@ later link lz> lzmax os parse/ peek
-Builtin peek-n pop prior push put rp@ rpick save setenv slurp
-Builtin stack-empty? stack-iterate stack-size stack: THROW_BADFUNC
-Builtin THROW_BADLIB THROW_GENERIC used xt>size z,
-Builtin +lplace +place -chop /char /string bounds c+lplace c+place
-Builtin chop cmp cmpi count lc lcount lplace place quote rsplit search split
-Builtin zcount zt \\char
-Builtin chdir g32 k32 u32 getcwd getpid hinst osname stdin stdout
-Builtin (-lib) (bye) (call) (else) (find) (func) (here) (if (lib) (s0) (s^)
-Builtin (to~) (while) >in >rel ?literal appstart cold compiling? context? d0 default_class
-Builtin defer? dict dolstr dostr find-word h0 if) interp isa onexit
-Builtin onstartup pdoes pop>ebx prompt rel> rp0 s0 src srcstr state str0 then,> then> tib
-Builtin tp vector vector! word? xt? .ver revaver revaver# && '' 'constant 'context
-Builtin 'create 'defer 'does 'forth 'inline 'macro 'macront 'notail 'value 'variable
-Builtin (.r) (context) (create) (header) (hide) (inline) (p.r) (words~) (xfind)
-Builtin ++ -- , -2drop -2nip -link -swap . .2x .classes .contexts .funcs .libs .needs .r
-Builtin .rs .x 00; 0do 0if 1, 2, 3, 2* 2/ 2constant 2variable 3dup 4dup ;then >base >defer
-Builtin >rr ? ?do @execute @rem appdir argv as back base base! between chain cleanup-libs
-Builtin cmove> context?? ctrl-c ctx>name data: defer: defer@def dictgone do_cr eleave
-Builtin endcase endof eval exception exec false find func: header heapgone help help/
-Builtin hex# hide inline{ last lastxt lib libdir literal, makeexename mnotail ms ms@
-Builtin newclass noop nosavedict notail nul of off on p: padchar parse parseln
-Builtin parsews rangeof rdepth remains reset reva revaused rol8 rr> scratch setclass sp
-Builtin strof super> temp time&date true turnkey? undo vfunc: w! w@
-Builtin xchg xchg2 xfind xt>name xwords { {{ }} } _+ _1+ _1- pathsep case \||
-" p[ [''] [ [']
-
-
-" debugging
-syn keyword revadebug .s dump see
-
-" basic character operations
-" syn keyword revaCharOps (.) CHAR EXPECT FIND WORD TYPE -TRAILING EMIT KEY
-" syn keyword revaCharOps KEY? TIB CR
-" syn match revaCharOps '\<char\s\S\s'
-" syn match revaCharOps '\<\[char\]\s\S\s'
-" syn region revaCharOps start=+."\s+ skip=+\\"+ end=+"+
-
-" char-number conversion
-syn keyword revaconversion s>d >digit digit> >single >double >number >float
-
-" contexts
-syn keyword revavocs forth macro inline
-syn keyword revavocs context:
-syn match revavocs /\<\~[^~ ]*/
-syn match revavocs /[^~ ]*\~\>/
-
-" numbers
-syn keyword revamath decimal hex base binary octal
-syn match revainteger '\<-\=[0-9.]*[0-9.]\+\>'
-" recognize hex and binary numbers, the '$' and '%' notation is for greva
-syn match revainteger '\<\$\x*\x\+\>' " *1* --- dont't mess
-syn match revainteger '\<\x*\d\x*\>' " *2* --- this order!
-syn match revainteger '\<%[0-1]*[0-1]\+\>'
-syn match revainteger "\<'.\>"
-
-" Strings
-" syn region revaString start=+\.\?\"+ end=+"+ end=+$+
-syn region revaString start=/"/ skip=/\\"/ end=/"/
-
-" Comments
-syn region revaComment start='\\S\s' end='.*' contains=revaTodo
-syn match revaComment '\.(\s[^)]\{-})' contains=revaTodo
-syn region revaComment start='(\s' skip='\\)' end=')' contains=revaTodo
-syn match revaComment '(\s[^\-]*\-\-[^\-]\{-})' contains=revaTodo
-syn match revaComment '\<|\s.*$' contains=revaTodo
-syn match revaColonDef '\<:m\?\s*[^ \t]\+\>' contains=revaComment
-
-" Include files
-syn match revaInclude '\<\(include\|needs\)\s\+\S\+'
-
-
-" Define the default highlighting.
-if !exists("did_reva_syntax_inits")
- let did_reva_syntax_inits=1
- " The default methods for highlighting. Can be overriden later.
- hi def link revaEOF cIf0
- hi def link revaHelpStuff special
- hi def link revaHelpDesc Comment
- hi def link revaTodo Todo
- hi def link revaOperators Operator
- hi def link revaMath Number
- hi def link revaInteger Number
- hi def link revaStack Special
- hi def link revaFStack Special
- hi def link revaSP Special
- hi def link revaMemory Operator
- hi def link revaAdrArith Function
- hi def link revaMemBlks Function
- hi def link revaCond Conditional
- hi def link revaLoop Repeat
- hi def link revaColonDef Define
- hi def link revaEndOfColonDef Define
- hi def link revaDefine Define
- hi def link revaDebug Debug
- hi def link revaCharOps Character
- hi def link revaConversion String
- hi def link revaForth Statement
- hi def link revaVocs Statement
- hi def link revaString String
- hi def link revaComment Comment
- hi def link revaClassDef Define
- hi def link revaEndOfClassDef Define
- hi def link revaObjectDef Define
- hi def link revaEndOfObjectDef Define
- hi def link revaInclude Include
- hi def link revaBuiltin Keyword
-endif
-
-let b:current_syntax = "reva"
-let &cpo = s:cpo_save
-unlet s:cpo_save
-
-" vim: ts=8:sw=4:nocindent:smartindent:
-
-endif