mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 11:02:24 +00:00
Fix shift/rotate for all integer types, add tests, make build order work for SYSTEM.c/h changes.
This commit is contained in:
parent
74a085dda3
commit
9baf4c9429
217 changed files with 334 additions and 2550 deletions
|
|
@ -1,4 +1,4 @@
|
|||
/* voc 1.95 [2016/09/11] for gcc LP64 on cygwin xtspkaSfF */
|
||||
/* voc 1.95 [2016/09/12] for gcc LP64 on cygwin xtspkaSfF */
|
||||
|
||||
#define INTEGER int32
|
||||
#define LONGINT int64
|
||||
|
|
@ -537,7 +537,7 @@ void OPM_err (int32 n)
|
|||
|
||||
void OPM_FPrint (int64 *fp, int64 val)
|
||||
{
|
||||
*fp = __ROTL((int64)((SET)*fp ^ (SET)val), 1, int64);
|
||||
*fp = __ROTL((int64)((SET)*fp ^ (SET)val), 1, 64);
|
||||
}
|
||||
|
||||
void OPM_FPrintSet (int64 *fp, SET set)
|
||||
|
|
@ -650,7 +650,7 @@ int64 OPM_SignedMaximum (int64 bytecount)
|
|||
int64 _o_result;
|
||||
int64 result;
|
||||
result = 1;
|
||||
result = __LSH(result, __ASHL(bytecount, 3) - 1, int64);
|
||||
result = __LSH(result, __ASHL(bytecount, 3) - 1, 64);
|
||||
_o_result = result - 1;
|
||||
return _o_result;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue