use strict; use warnings; use Inline C => Config => BUILD_NOISY => 1, USING => 'ParseRegExp', #CLEAN_AFTER_BUILD => 0, ; use Inline C => <<'EOC'; #include int foo(void) { _Decimal64 d64 = 0.DD, neg_zero, pos_zero = 0.DD; void *pd64 = &d64, *pneg_zero = &neg_zero, *ppos_zero = &pos_zero; int i; neg_zero = pos_zero * -1.DD; d64 *= -1.DD; if(d64 != pos_zero) printf("!= 0\n"); else printf("== 0\n"); if(d64 != neg_zero) printf("!= -0\n"); else printf("== -0\n"); for(i = 7; i >= 0; i--) printf("%02X", ((unsigned char*)pd64)[i]); printf("\n"); for(i = 7; i >= 0; i--) printf("%02X", ((unsigned char*)pneg_zero)[i]); printf("\n"); for(i = 7; i >= 0; i--) printf("%02X", ((unsigned char*)ppos_zero)[i]); printf("\n"); return 0; } EOC foo();