mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 08:07:56 +02:00
20 lines
217 B
ObjectPascal
20 lines
217 B
ObjectPascal
{ %norun }
|
|
{ %opt=-Sx }
|
|
|
|
{ this is file a.pas }
|
|
|
|
begin try write('') finally write('') end end .
|
|
|
|
{
|
|
$
|
|
$
|
|
$ fpc -Mfpc -Sx a
|
|
a.pas(3,13) Error: Identifier not found "try"
|
|
. . . .
|
|
$
|
|
$
|
|
$ fpc -Mfpc -Mexceptions a
|
|
$
|
|
$
|
|
}
|