mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 19:07:59 +02:00
060bdbcb47
* replace derefnode with resolveppuidx method that only needs to be
implemented for nodes referencing other nodes
* fix IE when a label is not defined in inline function
git-svn-id: trunk@11697 -
12 lines
81 B
ObjectPascal
12 lines
81 B
ObjectPascal
uses uw11762;
|
|
|
|
begin
|
|
i:=0;
|
|
p;
|
|
p;
|
|
p;
|
|
p;
|
|
if i<>4 then
|
|
halt(1);
|
|
end.
|