mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-14 13:09:22 +02:00
- rm ti8086procinfo.allocate_got_register as it isn't used on the i8086
git-svn-id: branches/i8086@24238 -
This commit is contained in:
parent
97ca0fa323
commit
c916105db8
@ -36,7 +36,6 @@ unit cpupi;
|
|||||||
procedure set_first_temp_offset;override;
|
procedure set_first_temp_offset;override;
|
||||||
function calc_stackframe_size:longint;override;
|
function calc_stackframe_size:longint;override;
|
||||||
procedure generate_parameter_info;override;
|
procedure generate_parameter_info;override;
|
||||||
procedure allocate_got_register(list: tasmlist);override;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -96,15 +95,6 @@ unit cpupi;
|
|||||||
para_stack_size := 0;
|
para_stack_size := 0;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure ti8086procinfo.allocate_got_register(list: tasmlist);
|
|
||||||
begin
|
|
||||||
if (target_info.system in [system_i386_darwin,system_i386_iphonesim]) and
|
|
||||||
(cs_create_pic in current_settings.moduleswitches) then
|
|
||||||
begin
|
|
||||||
got := cg.getaddressregister(list);
|
|
||||||
end;
|
|
||||||
end;
|
|
||||||
|
|
||||||
begin
|
begin
|
||||||
cprocinfo:=ti8086procinfo;
|
cprocinfo:=ti8086procinfo;
|
||||||
end.
|
end.
|
||||||
|
Loading…
Reference in New Issue
Block a user