Searched refs:shift_decimal (Results 1 – 2 of 2) sorted by relevance
| /dports/lang/gnu-cobol/gnucobol-3.1.2/libcob/ |
| H A D | numeric.c | 423 shift_decimal (cob_decimal *d, const int n) in shift_decimal() function
443 shift_decimal (d1, d2->scale - d1->scale); in align_decimal()
445 shift_decimal (d2, d1->scale - d2->scale); in align_decimal()
1669 shift_decimal (d, scale - d->scale + 1);
1706 shift_decimal (d, scale - d->scale + 1);
1726 shift_decimal (d, scale - d->scale + 1);
1773 shift_decimal (d, COB_FIELD_SCALE(f) - d->scale);
1881 shift_decimal (d1, COB_MAX_DIGITS + ((d1->scale < 0) ? -d1->scale : 0));
1899 shift_decimal (d1, scale - d1->scale);
1901 shift_decimal (d1, d1->scale - scale);
[all …]
|
| /dports/emulators/simh-hp3000/simh-hp3000-3.11.0.10/SCP/HP3000/ |
| H A D | hp3000_cpu_eis.c | 558 static uint32 shift_decimal (DIGIT_ACCESS *target, DIGIT_ACCESS *source, SHIFT_MODE shift…
1008 … trap = shift_decimal (&target, &source, /* then shift the number as indicated */ in cpu_eis_dec_op()
1751 static uint32 shift_decimal (DIGIT_ACCESS *target, DIGIT_ACCESS *source, SHIFT_MODE shift) in shift_decimal() function
|