|
@@ -23,6 +23,8 @@ unit fppu;
|
|
|
|
|
|
{$i fpcdefs.inc}
|
|
|
|
|
|
+{ $define DEBUG_UNIT_CRC_CHANGES}
|
|
|
+
|
|
|
{ close ppufiles on system that are
|
|
|
short on file handles like DOS system PM }
|
|
|
{$ifdef GO32V2}
|
|
@@ -1477,7 +1479,7 @@ var
|
|
|
{ we can now derefence all pointers to the implementation parts }
|
|
|
tstoredsymtable(globalsymtable).derefimpl;
|
|
|
if assigned(localsymtable) then
|
|
|
- tstoredsymtable(localsymtable).derefimpl;
|
|
|
+ tstoredsymtable(localsymtable).derefimpl;
|
|
|
|
|
|
{ read whole program optimisation-related information }
|
|
|
wpoinfo:=tunitwpoinfo.ppuload(ppufile);
|