summaryrefslogtreecommitdiffstats
path: root/syntax/ibasic.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/ibasic.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/ibasic.vim')
-rw-r--r--syntax/ibasic.vim180
1 files changed, 0 insertions, 180 deletions
diff --git a/syntax/ibasic.vim b/syntax/ibasic.vim
deleted file mode 100644
index 27ce4caf..00000000
--- a/syntax/ibasic.vim
+++ /dev/null
@@ -1,180 +0,0 @@
-if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'vim') == -1
-
-" Vim syntax file
-" Language: ibasic
-" Maintainer: Mark Manning <markem@airmail.net>
-" Originator: Allan Kelly <Allan.Kelly@ed.ac.uk>
-" Created: 10/1/2006
-" Updated: 10/21/2006
-" Description: A vim file to handle the IBasic file format.
-" Notes:
-" Updated by Mark Manning <markem@airmail.net>
-" Applied IBasic support to the already excellent support for standard
-" basic syntax (like QB).
-"
-" First version based on Micro$soft QBASIC circa 1989, as documented in
-" 'Learn BASIC Now' by Halvorson&Rygmyr. Microsoft Press 1989.
-" This syntax file not a complete implementation yet.
-" Send suggestions to the maintainer.
-"
-" This version is based upon the commands found in IBasic (www.pyxia.com).
-" MEM 10/6/2006
-"
-" Quit when a (custom) syntax file was already loaded (Taken from c.vim)
-"
-if exists("b:current_syntax")
- finish
-endif
-"
-" Be sure to turn on the "case ignore" since current versions of basic
-" support both upper as well as lowercase letters.
-"
-syn case ignore
-"
-" A bunch of useful BASIC keywords
-"
-syn keyword ibasicStatement beep bload bsave call absolute chain chdir circle
-syn keyword ibasicStatement clear close cls color com common const data
-syn keyword ibasicStatement loop draw end environ erase error exit field
-syn keyword ibasicStatement files function get gosub goto
-syn keyword ibasicStatement input input# ioctl key kill let line locate
-syn keyword ibasicStatement lock unlock lprint using lset mkdir name
-syn keyword ibasicStatement on error open option base out paint palette pcopy
-syn keyword ibasicStatement pen play pmap poke preset print print# using pset
-syn keyword ibasicStatement put randomize read redim reset restore resume
-syn keyword ibasicStatement return rmdir rset run seek screen
-syn keyword ibasicStatement shared shell sleep sound static stop strig sub
-syn keyword ibasicStatement swap system timer troff tron type unlock
-syn keyword ibasicStatement view wait width window write
-syn keyword ibasicStatement date$ mid$ time$
-"
-" Do the basic variables names first. This is because it
-" is the most inclusive of the tests. Later on we change
-" this so the identifiers are split up into the various
-" types of identifiers like functions, basic commands and
-" such. MEM 9/9/2006
-"
-syn match ibasicIdentifier "\<[a-zA-Z_][a-zA-Z0-9_]*\>"
-syn match ibasicGenericFunction "\<[a-zA-Z_][a-zA-Z0-9_]*\>\s*("me=e-1,he=e-1
-"
-" Function list
-"
-syn keyword ibasicBuiltInFunction abs asc atn cdbl cint clng cos csng csrlin cvd cvdmbf
-syn keyword ibasicBuiltInFunction cvi cvl cvs cvsmbf eof erdev erl err exp fileattr
-syn keyword ibasicBuiltInFunction fix fre freefile inp instr lbound len loc lof
-syn keyword ibasicBuiltInFunction log lpos mod peek pen point pos rnd sadd screen seek
-syn keyword ibasicBuiltInFunction setmem sgn sin spc sqr stick strig tab tan ubound
-syn keyword ibasicBuiltInFunction val valptr valseg varptr varseg
-syn keyword ibasicBuiltInFunction chr\$ command$ date$ environ$ erdev$ hex$ inkey$
-syn keyword ibasicBuiltInFunction input$ ioctl$ lcases$ laft$ ltrim$ mid$ mkdmbf$ mkd$
-syn keyword ibasicBuiltInFunction mki$ mkl$ mksmbf$ mks$ oct$ right$ rtrim$ space$
-syn keyword ibasicBuiltInFunction str$ string$ time$ ucase$ varptr$
-syn keyword ibasicTodo contained TODO
-syn cluster ibasicFunctionCluster contains=ibasicBuiltInFunction,ibasicGenericFunction
-
-syn keyword Conditional if else then elseif endif select case endselect
-syn keyword Repeat for do while next enddo endwhile wend
-
-syn keyword ibasicTypeSpecifier single double defdbl defsng
-syn keyword ibasicTypeSpecifier int integer uint uinteger int64 uint64 defint deflng
-syn keyword ibasicTypeSpecifier byte char string istring defstr
-syn keyword ibasicDefine dim def declare
-"
-"catch errors caused by wrong parenthesis
-"
-syn cluster ibasicParenGroup contains=ibasicParenError,ibasicIncluded,ibasicSpecial,ibasicTodo,ibasicUserCont,ibasicUserLabel,ibasicBitField
-syn region ibasicParen transparent start='(' end=')' contains=ALLBUT,@bParenGroup
-syn match ibasicParenError ")"
-syn match ibasicInParen contained "[{}]"
-"
-"integer number, or floating point number without a dot and with "f".
-"
-syn region ibasicHex start="&h" end="\W"
-syn region ibasicHexError start="&h\x*[g-zG-Z]" end="\W"
-syn match ibasicInteger "\<\d\+\(u\=l\=\|lu\|f\)\>"
-"
-"floating point number, with dot, optional exponent
-"
-syn match ibasicFloat "\<\d\+\.\d*\(e[-+]\=\d\+\)\=[fl]\=\>"
-"
-"floating point number, starting with a dot, optional exponent
-"
-syn match ibasicFloat "\.\d\+\(e[-+]\=\d\+\)\=[fl]\=\>"
-"
-"floating point number, without dot, with exponent
-"
-syn match ibasicFloat "\<\d\+e[-+]\=\d\+[fl]\=\>"
-"
-"hex number
-"
-syn match ibasicIdentifier "\<[a-zA-Z_][a-zA-Z0-9_]*\>"
-syn match ibasicFunction "\<[a-zA-Z_][a-zA-Z0-9_]*\>\s*("me=e-1,he=e-1
-syn case match
-syn match ibasicOctalError "\<0\o*[89]"
-"
-" String and Character contstants
-"
-syn region ibasicString start='"' end='"' contains=ibasicSpecial,ibasicTodo
-syn region ibasicString start="'" end="'" contains=ibasicSpecial,ibasicTodo
-"
-" Comments
-"
-syn match ibasicSpecial contained "\\."
-syn region ibasicComment start="^rem" end="$" contains=ibasicSpecial,ibasicTodo
-syn region ibasicComment start=":\s*rem" end="$" contains=ibasicSpecial,ibasicTodo
-syn region ibasicComment start="\s*'" end="$" contains=ibasicSpecial,ibasicTodo
-syn region ibasicComment start="^'" end="$" contains=ibasicSpecial,ibasicTodo
-"
-" Now do the comments and labels
-"
-syn match ibasicLabel "^\d"
-syn region ibasicLineNumber start="^\d" end="\s"
-"
-" Pre-compiler options : FreeBasic
-"
-syn region ibasicPreCondit start="^\s*#\s*\(if\>\|ifdef\>\|ifndef\>\|elif\>\|else\>\|endif\>\)" skip="\\$" end="$" contains=ibasicString,ibasicCharacter,ibasicNumber,ibasicCommentError,ibasicSpaceError
-syn match ibasicInclude "^\s*#\s*include\s*"
-"
-" Create the clusters
-"
-syn cluster ibasicNumber contains=ibasicHex,ibasicInteger,ibasicFloat
-syn cluster ibasicError contains=ibasicHexError
-"
-" Used with OPEN statement
-"
-syn match ibasicFilenumber "#\d\+"
-"
-"syn sync ccomment ibasicComment
-"
-syn match ibasicMathOperator "[\+\-\=\|\*\/\>\<\%\()[\]]" contains=ibasicParen
-"
-" The default methods for highlighting. Can be overridden later
-"
-hi def link ibasicLabel Label
-hi def link ibasicConditional Conditional
-hi def link ibasicRepeat Repeat
-hi def link ibasicHex Number
-hi def link ibasicInteger Number
-hi def link ibasicFloat Number
-hi def link ibasicError Error
-hi def link ibasicHexError Error
-hi def link ibasicStatement Statement
-hi def link ibasicString String
-hi def link ibasicComment Comment
-hi def link ibasicLineNumber Comment
-hi def link ibasicSpecial Special
-hi def link ibasicTodo Todo
-hi def link ibasicGenericFunction Function
-hi def link ibasicBuiltInFunction Function
-hi def link ibasicTypeSpecifier Type
-hi def link ibasicDefine Type
-hi def link ibasicInclude Include
-hi def link ibasicIdentifier Identifier
-hi def link ibasicFilenumber ibasicTypeSpecifier
-hi def link ibasicMathOperator Operator
-
-let b:current_syntax = "ibasic"
-
-" vim: ts=8
-
-endif