Home
last modified time | relevance | path

Searched refs:COB_FIELD_HAVE_SIGN (Results 1 – 9 of 9) sorted by relevance

/dports/lang/gnu-cobol/gnucobol-3.1.2/libcob/
H A Dtermio.c69 size = digits + (COB_FIELD_HAVE_SIGN (f) ? 1 : 0); in display_numeric()
78 if (COB_FIELD_HAVE_SIGN (f)) { in display_numeric()
100 int size = digits + !!COB_FIELD_HAVE_SIGN (f) + !!scale; in pretty_display_numeric()
117 if (COB_FIELD_HAVE_SIGN (f)) { in pretty_display_numeric()
146 if (COB_FIELD_HAVE_SIGN (f)) { in pretty_display_numeric()
H A Dnumeric.c826 if (!COB_FIELD_HAVE_SIGN (f) || COB_FIELD_NO_SIGN_NIBBLE (f)) { in cob_packed_get_sign()
991 if (!COB_FIELD_HAVE_SIGN (f)) { in cob_set_packed_zero()
1161 if (!COB_FIELD_HAVE_SIGN (f)) { in cob_decimal_get_packed()
1193 if (!COB_FIELD_HAVE_SIGN (f)) { in cob_set_packed_int()
1359 if (COB_FIELD_HAVE_SIGN (f) && (f->data[sizeb] & 0x80U)) {
1370 if (COB_FIELD_HAVE_SIGN (f)) {
1378 if (COB_FIELD_HAVE_SIGN (f)) {
1389 if (COB_FIELD_HAVE_SIGN (f)) {
1396 if (COB_FIELD_HAVE_SIGN (f)) {
1438 if (COB_FIELD_HAVE_SIGN (f)) {
[all …]
H A Dcoblocal.h169 (COB_FIELD_HAVE_SIGN (f) ? cob_real_get_sign (f) : 0)
171 do { if (COB_FIELD_HAVE_SIGN (f)) cob_real_put_sign (f, s); } ONCE_COB
H A Dmove.c115 if (!COB_FIELD_HAVE_SIGN (f)) { in cob_packed_get_sign()
162 if (COB_FIELD_HAVE_SIGN (f)) { in cob_binary_mget_sint64()
172 if (COB_FIELD_HAVE_SIGN (f)) { in cob_binary_mget_sint64()
181 if (COB_FIELD_HAVE_SIGN (f)) { in cob_binary_mget_sint64()
488 if (!COB_FIELD_HAVE_SIGN (f2)) { in cob_move_display_to_packed()
565 if (COB_FIELD_HAVE_SIGN (f1)) { in cob_move_binary_to_binary()
579 if (COB_FIELD_HAVE_SIGN (f2)) { in cob_move_binary_to_binary()
618 if (COB_FIELD_HAVE_SIGN (f2)) { in cob_move_display_to_binary()
643 if (COB_FIELD_HAVE_SIGN (f1)) { in cob_move_binary_to_display()
H A Dcall.c1933 return COB_FIELD_HAVE_SIGN (f); in cob_get_field_sign()
H A Dintrinsic.c5880 if (!COB_FIELD_HAVE_SIGN (srcfield)) { in cob_intr_lowest_algebraic()
5912 if (!COB_FIELD_HAVE_SIGN (srcfield)) { in cob_intr_lowest_algebraic()
5961 if (COB_FIELD_HAVE_SIGN (srcfield)) { in cob_intr_highest_algebraic()
H A Dcommon.c2567 if (COB_FIELD_HAVE_SIGN (f)) { in cob_correct_numeric()
2755 if (COB_FIELD_HAVE_SIGN (f)) { in cob_check_numdisp()
3057 if (COB_FIELD_HAVE_SIGN (f)) { in cob_is_numeric()
H A Dcommon.h755 #define COB_FIELD_HAVE_SIGN(f) ((f)->attr->flags & COB_FLAG_HAVE_SIGN) macro
H A DChangeLog4063 (COB_FIELD_HAVE_SIGN): New macro.