diff options
Diffstat (limited to 'inc/geshi/vb.php')
-rw-r--r-- | inc/geshi/vb.php | 103 |
1 files changed, 42 insertions, 61 deletions
diff --git a/inc/geshi/vb.php b/inc/geshi/vb.php index 6028b9fd2..040905823 100644 --- a/inc/geshi/vb.php +++ b/inc/geshi/vb.php @@ -3,14 +3,19 @@ * vb.php * ------ * Author: Roberto Rossi (rsoftware@altervista.org) - * Copyright: (c) 2004 Roberto Rossi (http://rsoftware.altervista.org), Nigel McNie (http://qbnz.com/highlighter) - * Release Version: 1\.0\.8 + * Copyright: (c) 2004 Roberto Rossi (http://rsoftware.altervista.org), + * Nigel McNie (http://qbnz.com/highlighter) + * Release Version: 1.0.8.3 * Date Started: 2004/08/30 * * Visual Basic language file for GeSHi. * * CHANGES * ------- + * 2008/08/27 (1.0.8.1) + * - changed keyword list for better Visual Studio compliance + * 2008/08/26 (1.0.8.1) + * - Fixed multiline comments * 2004/11/27 (1.0.1) * - Added support for multiple object splitters * 2004/08/30 (1.0.0) @@ -41,63 +46,37 @@ $language_data = array ( 'LANG_NAME' => 'Visual Basic', - 'COMMENT_SINGLE' => array(1 => "'"), + 'COMMENT_SINGLE' => array(), 'COMMENT_MULTI' => array(), + 'COMMENT_REGEXP' => array( + // Comments (either single or multiline with _ + 1 => '/\'.*(?<! _)\n/sU', + ), 'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE, 'QUOTEMARKS' => array('"'), 'ESCAPE_CHAR' => '', 'KEYWORDS' => array( 1 => array( - 'as', 'err', 'boolean', 'and', 'or', 'recordset', 'unload', 'to', - 'integer','long','single','new','database','nothing','set','close', - 'open','print','split','line','field','querydef','instrrev', - 'abs','array','asc','ascb','ascw','atn','avg','me', - 'cbool','cbyte','ccur','cdate','cdbl','cdec','choose','chr','chrb','chrw','cint','clng', - 'command','cos','count','createobject','csng','cstr','curdir','cvar','cvdate','cverr', - 'date','dateadd','datediff','datepart','dateserial','datevalue','day','ddb','dir','doevents', - 'environ','eof','error','exp', - 'fileattr','filedatetime','filelen','fix','format','freefile','fv', - 'getallstrings','getattr','getautoserversettings','getobject','getsetting', - 'hex','hour','iif','imestatus','input','inputb','inputbox','instr','instb','int','ipmt', - 'isarray','isdate','isempty','iserror','ismissing','isnull','isnumeric','isobject', - 'lbound','lcase','left','leftb','len','lenb','loadpicture','loc','lof','log','ltrim', - 'max','mid','midb','min','minute','mirr','month','msgbox', - 'now','nper','npv','oct','partition','pmt','ppmt','pv','qbcolor', - 'rate','rgb','right','rightb','rnd','rtrim', - 'second','seek','sgn','shell','sin','sln','space','spc','sqr','stdev','stdevp','str', - 'strcomp','strconv','string','switch','sum','syd', - 'tab','tan','time','timer','timeserial','timevalue','trim','typename', - 'ubound','ucase','val','var','varp','vartype','weekday','year', - 'appactivate','base','beep','call','case','chdir','chdrive','const', - 'declare','defbool','defbyte','defcur','defdate','defdbl','defdec','defint', - 'deflng','defobj','defsng','defstr','deftype','defvar','deletesetting','dim','do', - 'else','elseif','end','enum','erase','event','exit','explicit', - 'false','filecopy','for','foreach','friend','function','get','gosub','goto', - 'if','implements','kill','let','lineinput','lock','loop','lset','mkdir','name','next','not', - 'onerror','on','option','private','property','public','put','raiseevent','randomize', - 'redim','rem','reset','resume','return','rmdir','rset', - 'savepicture','savesetting','sendkeys','setattr','static','sub', - 'then','true','type','unlock','wend','while','width','with','write', - 'vbabort','vbabortretryignore','vbapplicationmodal','vbarray', - 'vbbinarycompare','vbblack','vbblue','vbboolean','vbbyte','vbcancel', - 'vbcr','vbcritical','vbcrlf','vbcurrency','vbcyan','vbdataobject', - 'vbdate','vbdecimal','vbdefaultbutton1','vbdefaultbutton2', - 'vbdefaultbutton3','vbdefaultbutton4','vbdouble','vbempty', - 'vberror','vbexclamation','vbfirstfourdays','vbfirstfullweek', - 'vbfirstjan1','vbformfeed','vbfriday','vbgeneraldate','vbgreen', - 'vbignore','vbinformation','vbinteger','vblf','vblong','vblongdate', - 'vblongtime','vbmagenta','vbmonday','vbnewline','vbno','vbnull', - 'vbnullchar','vbnullstring','vbobject','vbobjecterror','vbok','vbokcancel', - 'vbokonly','vbquestion','vbred','vbretry','vbretrycancel','vbsaturday', - 'vbshortdate','vbshorttime','vbsingle','vbstring','vbsunday', - 'vbsystemmodal','vbtab','vbtextcompare','vbthursday','vbtuesday', - 'vbusesystem','vbusesystemdayofweek','vbvariant','vbverticaltab', - 'vbwednesday','vbwhite','vbyellow','vbyes','vbyesno','vbyesnocancel', - 'vbnormal','vbdirectory' + 'AddressOf', 'Alias', 'And', 'Append', 'As', 'BF', 'Binary', + 'Boolean', 'ByRef', 'Byte', 'ByVal', 'Call', 'Case', 'CBool', + 'CByte', 'CCur', 'CDate', 'CDbl', 'CDec', 'CInt', 'CLng', + 'Close', 'Collection', 'Const', 'Control', 'CSng', 'CStr', + 'Currency', 'CVar', 'Date', 'Declare', 'Dim', 'Do', 'Double', + 'Each', 'Else', 'ElseIf', 'End', 'Enum', 'Erase', 'Error', + 'Event', 'Exit', 'Explicit', 'False', 'For', 'Friend', + 'Function', 'Get', 'GoSub', 'Goto', 'If', 'Implements', 'In', + 'Input', 'Integer', 'Is', 'LBound', 'Let', 'Lib', 'Like', + 'Line', 'Long', 'Loop', 'Mod', 'New', 'Next', 'Not', + 'Nothing', 'Object', 'On', 'Open', 'Option', 'Optional', + 'Or', 'Output', 'ParamArray', 'Preserve', 'Print', 'Private', + 'Property', 'Public', 'RaiseEvent', 'Random', 'ReDim', + 'Resume', 'Select', 'Set', 'Single', 'Static', 'Step', + 'Stop', 'String', 'Sub', 'Then', 'To', 'True', 'Type', + 'TypeOf', 'UBound', 'Until', 'Variant', 'While', 'With', + 'WithEvents', 'Xor' ) ), 'SYMBOLS' => array( - '(', ')' ), 'CASE_SENSITIVE' => array( GESHI_COMMENTS => false, @@ -105,28 +84,24 @@ $language_data = array ( ), 'STYLES' => array( 'KEYWORDS' => array( - 1 => 'color: #b1b100;' + 1 => 'color: #000080;' ), 'COMMENTS' => array( - 1 => 'color: #808080;' + 1 => 'color: #008000;' ), 'BRACKETS' => array( - 0 => 'color: #66cc66;' ), 'STRINGS' => array( - 0 => 'color: #ff0000;' + 0 => 'color: #800000;' ), 'NUMBERS' => array( - 0 => 'color: #cc66cc;' ), 'METHODS' => array( - 1 => 'color: #66cc66;' ), 'SYMBOLS' => array( - 0 => 'color: #66cc66;' ), 'ESCAPE_CHAR' => array( - 0 => 'color: #000099;' + 0 => 'color: #800000; font-weight: bold;' ), 'SCRIPT' => array( ), @@ -136,9 +111,8 @@ $language_data = array ( 'URLS' => array( 1 => '' ), - 'OOLANG' => true, + 'OOLANG' => false, 'OBJECT_SPLITTERS' => array( - 1 => '.' ), 'REGEXPS' => array( ), @@ -146,7 +120,14 @@ $language_data = array ( 'SCRIPT_DELIMITERS' => array( ), 'HIGHLIGHT_STRICT_BLOCK' => array( + ), + 'PARSER_CONTROL' => array( + 'ENABLE_FLAGS' => array( + 'BRACKETS' => GESHI_NEVER, + 'SYMBOLS' => GESHI_NEVER, + 'NUMBERS' => GESHI_NEVER + ) ) ); -?> +?>
\ No newline at end of file |