1<?php
2/*************************************************************************************
3 * pli.php
4 * --------
5 * Author: Robert AH Prins (robert@prino.org)
6 * Copyright: (c) 2011 Robert AH Prins (http://hitchwiki.org/en/User:Prino)
7 * Release Version: 1.0.9.1
8 * Date Started: 2011/02/09
9 *
10 * PL/I language file for GeSHi.
11 *
12 * CHANGES
13 * -------
14 * 2011/02/09 (1.0.8.10)
15 *  -  First Release - machine(ish) generated by http://rosettacode.org/geshi/
16 *
17 * TODO (updated 2011/02/09)
18 * -------------------------
19 *
20 *
21 *************************************************************************************
22 *
23 *     This file is part of GeSHi.
24 *
25 *   GeSHi is free software; you can redistribute it and/or modify
26 *   it under the terms of the GNU General Public License as published by
27 *   the Free Software Foundation; either version 2 of the License, or
28 *   (at your option) any later version.
29 *
30 *   GeSHi is distributed in the hope that it will be useful,
31 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
32 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
33 *   GNU General Public License for more details.
34 *
35 *   You should have received a copy of the GNU General Public License
36 *   along with GeSHi; if not, write to the Free Software
37 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
38 *
39 ************************************************************************************/
40
41$language_data = array(
42    'LANG_NAME' => 'PL/I',
43    'COMMENT_SINGLE' => array(),
44    'COMMENT_MULTI' => array('/*' => '*/'),
45    'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
46    'QUOTEMARKS' => array('"', '\''),
47    'ESCAPE_CHAR' => '',
48    'KEYWORDS' => array(
49        1 => array(
50            'abnormal', 'abs', 'acos', 'acosf', 'add', 'addbuff', 'addr',
51            'addrdata', 'alias', 'aligned', 'all', 'alloc', 'allocate',
52            'allocation', 'allocn', 'allocsize', 'any', 'anycondition', 'area',
53            'ascii', 'asin', 'asinf', 'asm', 'asmtdli', 'assembler',
54            'assignable', 'atan', 'atand', 'atanf', 'atanh', 'attach',
55            'attention', 'attn', 'auto', 'automatic', 'availablearea',
56            'backwards', 'based', 'begin', 'bigendian', 'bin', 'binary',
57            'binaryvalue', 'bind', 'binvalue', 'bit', 'bitloc', 'bitlocation',
58            'bkwd', 'blksize', 'bool', 'buf', 'buffered', 'buffers', 'bufnd',
59            'bufni', 'bufoff', 'bufsp', 'builtin', 'bx', 'by', 'byaddr', 'byte',
60            'byvalue', 'b4', 'call', 'cast', 'cds', 'ceil', 'center',
61            'centerleft', 'centerright', 'centre', 'centreleft', 'centreright',
62            'char', 'character', 'charg', 'chargraphic', 'charval', 'check',
63            'checkstg', 'close', 'cmpat', 'cobol', 'col', 'collate', 'column',
64            'comment', 'compare', 'compiledate', 'compiletime', 'completion',
65            'complex', 'cond', 'condition', 'conjg', 'conn', 'connected',
66            'consecutive', 'controlled', 'conv', 'conversion', 'copy', 'cos',
67            'cosd', 'cosf', 'cosh', 'count', 'counter', 'cpln', 'cplx', 'cs',
68            'cstg', 'ctl', 'ctlasa', 'ctl360', 'currentsize', 'currentstorage',
69            'data', 'datafield', 'date', 'datetime', 'days', 'daystodate',
70            'daystosecs', 'db', 'dcl', 'dec', 'decimal', 'declare', 'def',
71            'default', 'define', 'defined', 'delay', 'delete', 'descriptor',
72            'descriptors', 'detach', 'dft', 'dim', 'dimacross', 'dimension',
73            'direct', 'display', 'divide', 'do', 'downthru', 'edit', 'else',
74            'empty', 'end', 'endfile', 'endpage', 'entry', 'entryaddr', 'env',
75            'environment', 'epsilon', 'erf', 'erfc', 'error', 'event', 'excl',
76            'exclusive', 'exit', 'exp', 'expf', 'exponent', 'exports', 'ext',
77            'external', 'fb', 'fbs', 'fetch', 'file', 'fileddint', 'fileddtest',
78            'fileddword', 'fileid', 'fileopen', 'fileread', 'fileseek',
79            'filetell', 'filewrite', 'finish', 'first', 'fixed', 'fixedbin',
80            'fixeddec', 'fixedoverflow', 'float', 'floatbin', 'floatdec',
81            'floor', 'flush', 'fofl', 'format', 'fortran', 'free', 'from',
82            'fromalien', 'fs', 'gamma', 'generic', 'genkey', 'get', 'getenv',
83            'go', 'goto', 'graphic', 'gx', 'handle', 'hbound', 'hex', 'hexadec',
84            'heximage', 'high', 'huge', 'iand', 'ieee', 'ieor', 'if', 'ignore',
85            'imag', 'in', 'index', 'indexarea', 'indexed', 'init', 'initial',
86            'inline', 'inonly', 'inot', 'inout', 'input', 'int', 'inter',
87            'internal', 'into', 'invalidop', 'ior', 'irred', 'irreducible',
88            'isfinite', 'isigned', 'isinf', 'isll', 'ismain', 'isnan',
89            'isnormal', 'isrl', 'iszero', 'iunsigned', 'key', 'keyed',
90            'keyfrom', 'keylength', 'keyloc', 'keyto', 'label', 'last',
91            'lbound', 'leave', 'left', 'length', 'like', 'limited', 'line',
92            'lineno', 'linesize', 'linkage', 'list', 'littleendian', 'loc',
93            'locate', 'location', 'log', 'logf', 'loggamma', 'log10', 'log10f',
94            'log2', 'low', 'lowercase', 'lower2', 'maccol', 'maclmar',
95            'macname', 'macrmar', 'main', 'max', 'maxexp', 'maxlength',
96            'memconvert', 'memcu12', 'memcu14', 'memcu21', 'memcu24', 'memcu41',
97            'memcu42', 'memindex', 'memsearch', 'memsearchr', 'memverify',
98            'memverifyr', 'min', 'minexp', 'mod', 'mpstr', 'multiply', 'name',
99            'native', 'ncp', 'new', 'nocharg', 'nochargraphic', 'nocheck',
100            'nocmpat', 'noconv', 'noconversion', 'nodescriptor', 'noexecops',
101            'nofixedoverflow', 'nofofl', 'noinline', 'nolock', 'nomap',
102            'nomapin', 'nomapout', 'nonasgn', 'nonassignable', 'nonconnected',
103            'nonnative', 'noofl', 'nooverflow', 'norescan', 'normal', 'nosize',
104            'nostrg', 'nostringrange', 'nostringsize', 'nostrz', 'nosubrg',
105            'nosubscriptrange', 'noufl', 'nounderflow', 'nowrite', 'nozdiv',
106            'nozerodivide', 'null', 'offset', 'offsetadd', 'offsetdiff',
107            'offsetsubtract', 'offsetvalue', 'ofl', 'omitted', 'on', 'onarea',
108            'onchar', 'oncode', 'oncondcond', 'oncondid', 'oncount', 'onfile',
109            'ongsource', 'onkey', 'online', 'onloc', 'onoffset', 'onsource',
110            'onsubcode', 'onwchar', 'onwsource', 'open', 'optional', 'options',
111            'order', 'ordinal', 'ordinalname', 'ordinalpred', 'ordinalsucc',
112            'other', 'otherwise', 'outonly', 'output', 'overflow', 'package',
113            'packagename', 'page', 'pageno', 'pagesize', 'parameter', 'parmset',
114            'password', 'pending', 'pic', 'picspec', 'picture', 'places',
115            'pliascii', 'plicanc', 'plickpt', 'plidelete', 'plidump',
116            'pliebcdic', 'plifill', 'plifree', 'plimove', 'pliover', 'plirest',
117            'pliretc', 'pliretv', 'plisaxa', 'plisaxb', 'plisaxc', 'plisaxd',
118            'plisrta', 'plisrtb', 'plisrtc', 'plisrtd', 'plitdli', 'plitran11',
119            'plitran12', 'plitran21', 'plitran22', 'pointer', 'pointeradd',
120            'pointerdiff', 'pointersubtract', 'pointervalue', 'poly', 'pos',
121            'position', 'prec', 'precision', 'pred', 'present', 'print',
122            'priority', 'proc', 'procedure', 'procedurename', 'procname',
123            'prod', 'ptr', 'ptradd', 'ptrdiff', 'ptrsubtract', 'ptrvalue',
124            'put', 'putenv', 'quote', 'radix', 'raise2', 'random', 'range',
125            'rank', 'read', 'real', 'record', 'recsize', 'recursive', 'red',
126            'reducible', 'reentrant', 'refer', 'regional', 'reg12', 'release',
127            'rem', 'reorder', 'repattern', 'repeat', 'replaceby2', 'reply',
128            'reread', 'rescan', 'reserved', 'reserves', 'resignal', 'respec',
129            'retcode', 'return', 'returns', 'reuse', 'reverse', 'revert',
130            'rewrite', 'right', 'round', 'rounddec', 'samekey', 'scalarvarying',
131            'scale', 'search', 'searchr', 'secs', 'secstodate', 'secstodays',
132            'select', 'seql', 'sequential', 'serialize4', 'set', 'sign',
133            'signal', 'signed', 'sin', 'sind', 'sinf', 'sinh', 'sis', 'size',
134            'skip', 'snap', 'sourcefile', 'sourceline', 'sqrt', 'sqrtf',
135            'stackaddr', 'statement', 'static', 'status', 'stg', 'stmt', 'stop',
136            'storage', 'stream', 'strg', 'string', 'stringrange', 'stringsize',
137            'structure', 'strz', 'subrg', 'subscriptrange', 'substr',
138            'subtract', 'succ', 'sum', 'suppress', 'sysin', 'sysnull',
139            'sysparm', 'sysprint', 'system', 'sysversion', 'tally', 'tan',
140            'tand', 'tanf', 'tanh', 'task', 'then', 'thread', 'threadid',
141            'time', 'tiny', 'title', 'to', 'total', 'tpk', 'tpm', 'transient',
142            'translate', 'transmit', 'trim', 'trkofl', 'trunc', 'type', 'ufl',
143            'ulength', 'ulength16', 'ulength8', 'unal', 'unaligned',
144            'unallocated', 'unbuf', 'unbuffered', 'undefinedfile', 'underflow',
145            'undf', 'unlock', 'unsigned', 'unspec', 'until', 'update', 'upos',
146            'uppercase', 'upthru', 'usubstr', 'usurrogate', 'uvalid', 'uwidth',
147            'valid', 'validdate', 'value', 'var', 'varglist', 'vargsize',
148            'variable', 'varying', 'varyingz', 'vb', 'vbs', 'verify', 'verifyr',
149            'vs', 'vsam', 'wait', 'wchar', 'wcharval', 'weekday', 'when',
150            'whigh', 'while', 'widechar', 'wlow', 'write', 'xmlchar', 'y4date',
151            'y4julian', 'y4year', 'zdiv', 'zerodivide'
152            )
153        ),
154    'SYMBOLS' => array(
155        1 => array(
156            '+', '-', '*', '/', '=', '<', '>', '&', '^', '|', ':', '(', ')', ';', ','
157            )
158        ),
159    'CASE_SENSITIVE' => array(
160        GESHI_COMMENTS => false,
161        1 => false
162        ),
163    'STYLES' => array(
164        'KEYWORDS' => array(
165            1 => 'color: #b1b100;'
166            ),
167        'COMMENTS' => array(
168            'MULTI' => 'color: #666666; font-style: italic;'
169            ),
170        'ESCAPE_CHAR' => array(
171            0 => 'color: #000099; font-weight: bold;'
172            ),
173        'BRACKETS' => array(
174            0 => 'color: #009900;'
175            ),
176        'STRINGS' => array(
177            0 => 'color: #0000ff;'
178            ),
179        'NUMBERS' => array(
180            0 => 'color: #cc66cc;',
181            ),
182        'METHODS' => array(
183            0 => 'color: #004000;'
184            ),
185        'SYMBOLS' => array(
186            1 => 'color: #339933;'
187            ),
188        'REGEXPS' => array(),
189        'SCRIPT' => array()
190        ),
191    'URLS' => array(1 => ''),
192    'OOLANG' => true,
193    'OBJECT_SPLITTERS' => array(1 => '.'),
194    'REGEXPS' => array(),
195    'STRICT_MODE_APPLIES' => GESHI_NEVER,
196    'SCRIPT_DELIMITERS' => array(),
197    'HIGHLIGHT_STRICT_BLOCK' => array()
198);
199