mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-04 02:39:40 +01:00
14 lines
260 B
ObjectPascal
14 lines
260 B
ObjectPascal
{ Should give '(' expected in line 6 }
|
|
|
|
const
|
|
replaces=4;
|
|
replacetab : array[1..replaces,1..2] of string[32]=(
|
|
':',' or colon',
|
|
'mem8','mem or bits8',
|
|
'mem16','mem or bits16',
|
|
'mem32','mem or bits32'
|
|
)
|
|
begin
|
|
end.
|
|
|