rss layout now fully separated m/v/c
[dylansserver.git] / includes / syntax / scripts / shBrushVb.js
1 /**
2 * SyntaxHighlighter
3 * http://alexgorbatchev.com/SyntaxHighlighter
4 *
5 * SyntaxHighlighter is donationware. If you are using it, please donate.
6 * http://alexgorbatchev.com/SyntaxHighlighter/donate.html
7 *
8 * @version
9 * 3.0.83 (July 02 2010)
10 *
11 * @copyright
12 * Copyright (C) 2004-2010 Alex Gorbatchev.
13 *
14 * @license
15 * Dual licensed under the MIT and GPL licenses.
16 */
17 ;(function()
18 {
19 // CommonJS
20 typeof(require) != 'undefined' ? SyntaxHighlighter = require('shCore').SyntaxHighlighter : null;
21
22 function Brush()
23 {
24 var keywords = 'AddHandler AddressOf AndAlso Alias And Ansi As Assembly Auto ' +
25 'Boolean ByRef Byte ByVal Call Case Catch CBool CByte CChar CDate ' +
26 'CDec CDbl Char CInt Class CLng CObj Const CShort CSng CStr CType ' +
27 'Date Decimal Declare Default Delegate Dim DirectCast Do Double Each ' +
28 'Else ElseIf End Enum Erase Error Event Exit False Finally For Friend ' +
29 'Function Get GetType GoSub GoTo Handles If Implements Imports In ' +
30 'Inherits Integer Interface Is Let Lib Like Long Loop Me Mod Module ' +
31 'MustInherit MustOverride MyBase MyClass Namespace New Next Not Nothing ' +
32 'NotInheritable NotOverridable Object On Option Optional Or OrElse ' +
33 'Overloads Overridable Overrides ParamArray Preserve Private Property ' +
34 'Protected Public RaiseEvent ReadOnly ReDim REM RemoveHandler Resume ' +
35 'Return Select Set Shadows Shared Short Single Static Step Stop String ' +
36 'Structure Sub SyncLock Then Throw To True Try TypeOf Unicode Until ' +
37 'Variant When While With WithEvents WriteOnly Xor';
38
39 this.regexList = [
40 { regex: /'.*$/gm, css: 'comments' }, // one line comments
41 { regex: SyntaxHighlighter.regexLib.doubleQuotedString, css: 'string' }, // strings
42 { regex: /^\s*#.*$/gm, css: 'preprocessor' }, // preprocessor tags like #region and #endregion
43 { regex: new RegExp(this.getKeywords(keywords), 'gm'), css: 'keyword' } // vb keyword
44 ];
45
46 this.forHtmlScript(SyntaxHighlighter.regexLib.aspScriptTags);
47 };
48
49 Brush.prototype = new SyntaxHighlighter.Highlighter();
50 Brush.aliases = ['vb', 'vbnet'];
51
52 SyntaxHighlighter.brushes.Vb = Brush;
53
54 // CommonJS
55 typeof(exports) != 'undefined' ? exports.Brush = Brush : null;
56 })();