mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-07 09:39:33 +01: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