mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 04:02:25 +00:00
Fix import of SYSTEM.INT64 type on 32 bit platforms.
This commit is contained in:
parent
dc699db9f5
commit
21964471d8
13 changed files with 53 additions and 36 deletions
|
|
@ -167,11 +167,14 @@ OPT_Struct OPT_IntType (int32 size)
|
|||
OPT_Struct _o_result;
|
||||
int16 i;
|
||||
i = 1;
|
||||
while ((OPT_IntTypes[__X(i, 20)]->size < size && OPT_IntTypes[__X(i + 1, 20)] != NIL)) {
|
||||
while (i < 19) {
|
||||
if ((OPT_IntTypes[__X(i, 20)] != NIL && OPT_IntTypes[__X(i, 20)]->size >= size)) {
|
||||
_o_result = OPT_IntTypes[__X(i, 20)];
|
||||
return _o_result;
|
||||
}
|
||||
i += 1;
|
||||
}
|
||||
_o_result = OPT_IntTypes[__X(i, 20)];
|
||||
return _o_result;
|
||||
__RETCHK;
|
||||
}
|
||||
|
||||
OPT_Struct OPT_ShorterOrLongerType (OPT_Struct x, int16 dir)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue