mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 01:09:31 +02:00
* Use new instead of getmem
This commit is contained in:
parent
07a2c6b37e
commit
e33f720fa5
@ -2955,7 +2955,7 @@ Implementation
|
||||
if assigned(asminfos[t]) then
|
||||
writeln('Warning: Assembler is already registered!')
|
||||
else
|
||||
Getmem(asminfos[t],sizeof(tasminfo));
|
||||
new(asminfos[t]);
|
||||
asminfos[t]^:=r;
|
||||
CAssembler[t]:=c;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user