|
@@ -126,7 +126,6 @@ interface
|
|
genericdef : tstoreddef;
|
|
genericdef : tstoreddef;
|
|
genericdefderef : tderef;
|
|
genericdefderef : tderef;
|
|
generictokenbuf : tdynamicarray;
|
|
generictokenbuf : tdynamicarray;
|
|
- generic_buf_needs_swapping : boolean;
|
|
|
|
{ this list contains references to the symbols that make up the
|
|
{ this list contains references to the symbols that make up the
|
|
generic parameters; the symbols are not owned by this list
|
|
generic parameters; the symbols are not owned by this list
|
|
Note: this list is allocated on demand! }
|
|
Note: this list is allocated on demand! }
|
|
@@ -1890,7 +1889,6 @@ implementation
|
|
fileinfo := current_filepos;
|
|
fileinfo := current_filepos;
|
|
{$endif}
|
|
{$endif}
|
|
generictokenbuf:=nil;
|
|
generictokenbuf:=nil;
|
|
- generic_buf_needs_swapping:=false;
|
|
|
|
genericdef:=nil;
|
|
genericdef:=nil;
|
|
typesymderef.reset;
|
|
typesymderef.reset;
|
|
genericdefderef.reset;
|
|
genericdefderef.reset;
|
|
@@ -1985,7 +1983,6 @@ implementation
|
|
begin
|
|
begin
|
|
sizeleft:=ppufile.getlongint;
|
|
sizeleft:=ppufile.getlongint;
|
|
initgeneric;
|
|
initgeneric;
|
|
- generic_buf_needs_swapping:=ppufile.change_endian;
|
|
|
|
while sizeleft>0 do
|
|
while sizeleft>0 do
|
|
begin
|
|
begin
|
|
if sizeleft>sizeof(buf) then
|
|
if sizeleft>sizeof(buf) then
|