mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-20 23:49:44 +02:00
* Fix error in EXTDEBUG code
git-svn-id: trunk@20227 -
This commit is contained in:
parent
cf6590cc0e
commit
19e11f889f
@ -83,7 +83,7 @@ unit cpugas;
|
|||||||
begin
|
begin
|
||||||
{$ifdef extdebug}
|
{$ifdef extdebug}
|
||||||
if assigned(symbol) and
|
if assigned(symbol) and
|
||||||
not(refaddr in [addr_pic,addr_lo]) then
|
not(refaddr in [addr_pic,addr_low]) then
|
||||||
internalerror(2003052601);
|
internalerror(2003052601);
|
||||||
{$endif extdebug}
|
{$endif extdebug}
|
||||||
if base <> NR_NO then
|
if base <> NR_NO then
|
||||||
|
Loading…
Reference in New Issue
Block a user