mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 05:49:12 +02:00
* return voidpointertype.size instead of sizeof(pint) in tstringdef.size in
order to return the correct size in the far data i8086 memory models git-svn-id: trunk@27241 -
This commit is contained in:
parent
2556ada8da
commit
ebdfbeaac8
@ -2237,7 +2237,7 @@ implementation
|
|||||||
st_ansistring,
|
st_ansistring,
|
||||||
st_widestring,
|
st_widestring,
|
||||||
st_unicodestring:
|
st_unicodestring:
|
||||||
Result:=sizeof(pint);
|
Result:=voidpointertype.size;
|
||||||
else
|
else
|
||||||
internalerror(2014032301);
|
internalerror(2014032301);
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user