text/x-pascal
*.p;*.pas
//
[uUrR]?'
'
\{\$
\}
Program
Library
Unit
Uses
Interface
Implementation
Initialization
Finalization
Begin
End
Var
Const
Function
Procedure
Overload
cdecl
if
then
else
is
and
and_then
not
or
or_else
xor
shr
shl
otherwise
div
mod
while
do
for
to
case
of
repeat
until
break
continue
try
except
finally
raise
downto
in
Type
Packed
Array
Record
Object
Class
Interface
Public
Private
Protected
Constructor
Destructor
Virtual
Abstract
Override
Property
ReadLn
Read
WriteLn
Write
default
With
As
self
Inherited
Forward
Implements
varargs
far
near
absolute
all
asm
attribute
bindable
export
exports
external
file
goto
import
interrupt
published
qualified
resident
restricted
segment
set
value
Char
String
Integer
Real
Boolean
Pointer
Byte
LongInt
chr
ord
succ
pred
abs
round
trunc
sqr
sqrt
arctan
cos
sin
exp
ln
odd
eof
eoln
pow
nil
False
True
(?<![\w\.])
(([0-9]+)|([0-9]+\.[0-9]+([Ee][-]?[0-9]+)?))
(?![\w\.])
(?<![\w\.])
\$[0-9a-fA-F]*
(?![\w\.])