summaryrefslogtreecommitdiffstats
path: root/syntax/natural.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/natural.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 '')
-rw-r--r--syntax/natural.vim205
1 files changed, 0 insertions, 205 deletions
diff --git a/syntax/natural.vim b/syntax/natural.vim
deleted file mode 100644
index ca2bba68..00000000
--- a/syntax/natural.vim
+++ /dev/null
@@ -1,205 +0,0 @@
-if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'vim') == -1
-
-" Vim syntax file
-"
-" Language: NATURAL
-" Version: 2.1.0.5
-" Maintainer: Marko von Oppen <marko@von-oppen.com>
-" Last Changed: 2012-02-05 18:50:43
-" Support: http://www.von-oppen.com/
-
-" quit when a syntax file was already loaded
-if exists("b:current_syntax")
- finish
-endif
-setlocal iskeyword+=-,*,#,+,_,/
-
-let s:cpo_save = &cpo
-set cpo&vim
-
-" NATURAL is case insensitive
-syntax case ignore
-
-" preprocessor
-syn keyword naturalInclude include nextgroup=naturalObjName skipwhite
-
-" define data
-syn keyword naturalKeyword define data end-define
-syn keyword naturalKeyword independent global parameter local redefine view
-syn keyword naturalKeyword const[ant] init initial
-
-" loops
-syn keyword naturalLoop read end-read end-work find end-find histogram end-histogram
-syn keyword naturalLoop end-all sort end-sort sorted descending ascending
-syn keyword naturalRepeat repeat end-repeat while until for step end-for
-syn keyword naturalKeyword in file with field starting from ending at thru by isn where
-syn keyword naturalError on error end-error
-syn keyword naturalKeyword accept reject end-enddata number unique retain as release
-syn keyword naturalKeyword start end-start break end-break physical page top sequence
-syn keyword naturalKeyword end-toppage end-endpage end-endfile before processing
-syn keyword naturalKeyword end-before
-
-" conditionals
-syn keyword naturalConditional if then else end-if end-norec
-syn keyword naturalConditional decide end-decide value when condition none any
-
-" assignment / calculation
-syn keyword naturalKeyword reset assign move left right justified compress to into edited
-syn keyword naturalKeyword add subtract multiply divide compute name
-syn keyword naturalKeyword all giving remainder rounded leaving space numeric
-syn keyword naturalKeyword examine full replace giving separate delimiter modified
-syn keyword naturalKeyword suspend identical suppress
-
-" program flow
-syn keyword naturalFlow callnat fetch return enter escape bottom top stack formatted
-syn keyword naturalFlow command call
-syn keyword naturalflow end-subroutine routine
-
-" file operations
-syn keyword naturalKeyword update store get delete end transaction work once close
-
-" other keywords
-syn keyword naturalKeyword first every of no record[s] found ignore immediate
-syn keyword naturalKeyword set settime key control stop terminate
-
-" in-/output
-syn keyword naturalKeyword write display input reinput notitle nohdr map newpage
-syn keyword naturalKeyword alarm text help eject index window base size
-syn keyword naturalKeyword format printer skip lines
-
-" functions
-syn keyword naturalKeyword abs atn cos exp frac int log sgn sin sqrt tan val old
-syn keyword naturalKeyword pos
-
-" report mode keywords
-syn keyword naturalRMKeyword same loop obtain indexed do doend
-
-" Subroutine name
-syn keyword naturalFlow perform subroutine nextgroup=naturalFunction skipwhite
-syn match naturalFunction "\<[a-z][-_a-z0-9]*\>"
-
-syn keyword naturalFlow using nextgroup=naturalKeyword,naturalObjName skipwhite
-syn match naturalObjName "\<[a-z][-_a-z0-9]\{,7}\>"
-
-" Labels
-syn match naturalLabel "\<[+#a-z][-_#a-z0-9]*\."
-syn match naturalRef "\<[+#a-z][-_#a-z0-9]*\>\.\<[+#a-z][*]\=[-_#a-z0-9]*\>"
-
-" mark keyword special handling
-syn keyword naturalKeyword mark nextgroup=naturalMark skipwhite
-syn match naturalMark "\<\*[a-z][-_#.a-z0-9]*\>"
-
-" System variables
-syn match naturalSysVar "\<\*[a-z][-a-z0-9]*\>"
-
-"integer number, or floating point number without a dot.
-syn match naturalNumber "\<-\=\d\+\>"
-"floating point number, with dot
-syn match naturalNumber "\<-\=\d\+\.\d\+\>"
-"floating point number, starting with a dot
-syn match naturalNumber "\.\d\+"
-
-" Formats in write statement
-syn match naturalFormat "\<\d\+[TX]\>"
-
-" String and Character contstants
-syn match naturalString "H'\x\+'"
-syn region naturalString start=+"+ end=+"+
-syn region naturalString start=+'+ end=+'+
-
-" Type definition
-syn match naturalAttribute "\<[-a-z][a-z]=[-a-z0-9_\.,]\+\>"
-syn match naturalType contained "\<[ABINP]\d\+\(,\d\+\)\=\>"
-syn match naturalType contained "\<[CL]\>"
-
-" "TODO" / other comments
-syn keyword naturalTodo contained todo test
-syn match naturalCommentMark contained "[a-z][^ \t/:|]*\(\s[^ \t/:'"|]\+\)*:\s"he=e-1
-
-" comments
-syn region naturalComment start="/\*" end="$" contains=naturalTodo,naturalLineRef,naturalCommentMark
-syn region naturalComment start="^\*[ *]" end="$" contains=naturalTodo,naturalLineRef,naturalCommentMark
-syn region naturalComment start="^\d\{4} \*[\ \*]"lc=5 end="$" contains=naturalTodo,naturalLineRef,naturalCommentMark
-syn match naturalComment "^\*$"
-syn match naturalComment "^\d\{4} \*$"lc=5
-" /* is legal syntax in parentheses e.g. "#ident(label./*)"
-syn region naturalPComment contained start="/\*\s*[^),]" end="$" contains=naturalTodo,naturalLineRef,naturalCommentMark
-
-" operators
-syn keyword naturalOperator and or not eq ne gt lt ge le mask scan modified
-
-" constants
-syn keyword naturalBoolean true false
-syn match naturalLineNo "^\d\{4}"
-
-" identifiers
-syn match naturalIdent "\<[+#a-z][-_#a-z0-9]*\>[^\.']"me=e-1
-syn match naturalIdent "\<[+#a-z][-_#a-z0-9]*$"
-syn match naturalLegalIdent "[+#a-z][-_#a-z0-9]*/[-_#a-z0-9]*"
-
-" parentheses
-syn region naturalPar matchgroup=naturalParGui start="(" end=")" contains=naturalLabel,naturalRef,naturalOperator,@naturalConstant,naturalType,naturalSysVar,naturalPar,naturalLineNo,naturalPComment
-syn match naturalLineRef "(\d\{4})"
-
-" build syntax groups
-syntax cluster naturalConstant contains=naturalString,naturalNumber,naturalAttribute,naturalBoolean
-
-" folding
-if v:version >= 600
- set foldignore=*
-endif
-
-
-" The default methods for highlighting. Can be overridden later
-
-" Constants
-hi def link naturalFormat Constant
-hi def link naturalAttribute Constant
-hi def link naturalNumber Number
-hi def link naturalString String
-hi def link naturalBoolean Boolean
-
-" All kinds of keywords
-hi def link naturalConditional Conditional
-hi def link naturalRepeat Repeat
-hi def link naturalLoop Repeat
-hi def link naturalFlow Keyword
-hi def link naturalError Keyword
-hi def link naturalKeyword Keyword
-hi def link naturalOperator Operator
-hi def link naturalParGui Operator
-
-" Labels
-hi def link naturalLabel Label
-hi def link naturalRefLabel Label
-
-" Comments
-hi def link naturalPComment Comment
-hi def link naturalComment Comment
-hi def link naturalTodo Todo
-hi def link naturalCommentMark PreProc
-
-hi def link naturalInclude Include
-hi def link naturalSysVar Identifier
-hi def link naturalLineNo LineNr
-hi def link naturalLineRef Error
-hi def link naturalSpecial Special
-hi def link naturalComKey Todo
-
-" illegal things
-hi def link naturalRMKeyword Error
-hi def link naturalLegalIdent Error
-
-hi def link naturalType Type
-hi def link naturalFunction Function
-hi def link naturalObjName PreProc
-
-
-let b:current_syntax = "natural"
-
-let &cpo = s:cpo_save
-unlet s:cpo_save
-
-" vim:set ts=8 sw=8 noet ft=vim list:
-
-endif