paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 23:39:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* handle classrefdefs properly, according to the memory model in i8086's

Browse Source 
thlcgobj.getaddressregister. This should fix several regressions in the
  compact, large and huge memory models after r33591

git-svn-id: trunk@33637 -
This commit is contained in:
nickysn 2016-05-03 15:11:32 +00:00
parent 18538494b9
commit ce66597df8
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/i8086/hlcgcpu.pas
View File

@ -245,7 +245,8 @@ implementation
begin
{ implicit pointer types on i8086 follow the default data pointer size for
the current memory model }
if is_implicit_pointer_object_type(size) or is_implicit_array_pointer(size) then
if is_implicit_pointer_object_type(size) or is_implicit_array_pointer(size) or
(size.typ=classrefdef) then
size:=voidpointertype;
{ procvars follow the default code pointer size for the current memory model }