1// This file is part of the "jQuery.Syntax" project, and is distributed under the MIT License. 2// Copyright (c) 2011 Samuel G. D. Williams. <http://www.oriontransfer.co.nz> 3 4 5Syntax.register('pascal',function(brush){var keywords=["absolute","abstract","all","and_then","as","asm","asmname","attribute","begin","bindable","c","c_language","case","class","const","constructor","destructor","dispose","do","downto","else","end","except","exit","export","exports","external","far","file","finalization","finally","for","forward","function","goto","if","implementation","import","inherited","initialization","inline","interface","interrupt","is","keywords","label","library","module","name","near","new","object","of","on","only","operator","or_else","otherwise","packed","pascal","pow","private","procedure","program","property","protected","public","published","qualified","raise","record","repeat","resident","restricted","segment","set","then","threadvar","to","try","type","unit","until","uses","value","var","view","virtual","while","with"];var operators=["+","-","*","/","div","mod","and","or","xor","shl","shr","not","=",">=",">","<>","<=","<","in",":="];var values=["true","false","nil"];brush.push(values,{klass:'constant',options:'gi'});brush.push(keywords,{klass:'keyword',options:'gi'});brush.push(operators,{klass:'operator',options:'gi'});brush.push(Syntax.lib.camelCaseType);brush.push({pattern:/\{[\s\S]*?\}/gm,klass:'comment',allow:['href']});brush.push({pattern:/\(\*[\s\S]*?\*\)/gm,klass:'comment',allow:['href']});brush.push(Syntax.lib.webLink);brush.push(Syntax.lib.singleQuotedString);brush.push(Syntax.lib.doubleQuotedString);brush.push(Syntax.lib.stringEscape);brush.push(Syntax.lib.decimalNumber);brush.push(Syntax.lib.hexNumber);brush.push(Syntax.lib.cStyleFunction);});