Home
last modified time | relevance | path

Searched refs:I64_MSH (Results 1 – 7 of 7) sorted by relevance

/dports/math/libpgmath/flang-d07daf3/runtime/flang/
H A Dftni64.h37 #define I64_MSH(t) t[1] macro
55 I64_MSH(int64d.i) = m; \
65 I64_MSH(int64d.i) = m; \
H A Dassign.c64 I64_MSH(valp->val.i8) = 0; in __fortio_assign()
212 I64_MSH(valp->val.i8) = 0; in __fortio_assign()
303 I64_MSH(valp->val.i8) = 0xFFFFFFFF; in to_int8()
305 I64_MSH(valp->val.i8) = 0; in to_int8()
315 I64_MSH(valp->val.ui8) = 0; in to_log8()
H A Dutilsi64.c305 if (sign == 0 && I64_MSH(from) == 0x80000000 && I64_LSH(from) == 0) { in __fort_i64toax()
317 temp.ovl8.msw = I64_MSH(from); in __fort_i64toax()
333 temp.ovl8.msw = I64_MSH(from); in __fort_i64toax()
355 temp_from[0] = I64_MSH(from); in __fort_i64toax()
357 if ((sign == 0) && (I64_MSH(from) < 0)) in __fort_i64toax()
405 if ((msd == -1) || ((sign == 0) && (msd == 0) && (I64_MSH(from) < 0))) in __fort_i64toax()
411 if ((sign == 0) && (I64_MSH(from) < 0)) { in __fort_i64toax()
546 I64_MSH(toi) = to[0]; in toi64()
H A Dftni64bitsup.c51 val[0] = I64_MSH(u.i);
200 u_arg[0] = I64_MSH(src);
211 I64_MSH(dest) = (I64_MSH(dest) & (~maski8[0])) | tmpi8[0];
H A Dfmtconv.c401 I64_MSH(value) = -1; in conv_int8()
403 I64_MSH(value) = 0; in conv_int8()
404 } else if (I64_MSH(value) < 0) { in conv_int8()
405 if (I64_MSH(value) == 0x80000000 && I64_LSH(value) == 0) { in conv_int8()
412 I64_MSH(value) = ~I64_MSH(value); in conv_int8()
415 I64_MSH(value)++; in conv_int8()
H A Dglobal.h35 #define I64_MSH(t) t[1] macro
H A Dfmtread.c2371 I64_MSH(i8val) = 0; in fr_assign()
2377 I64_MSH(i8val) = 0; in fr_assign()