mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 14:19:31 +02:00
* don't perform the automatic insertion of typecasts in case register
allocation hasn't been performed, because then reused "registers" could have multiple types git-svn-id: trunk@34121 -
This commit is contained in:
parent
0cce590982
commit
31b70ecfd3
@ -626,6 +626,8 @@ implementation
|
||||
i: longint;
|
||||
hal: tasmlisttype;
|
||||
begin
|
||||
if cs_no_regalloc in current_settings.globalswitches then
|
||||
exit;
|
||||
storefilepos:=current_filepos;
|
||||
current_filepos:=current_module.mainfilepos;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user