use strict;
use warnings;

use Inline C => Config =>
  BUILD_NOISY => 1,
  USING => 'ParseRegExp',
  #CLEAN_AFTER_BUILD => 0,
  ;

use Inline C => <<'EOC';

#include <stdio.h>

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();

##</code><code>##

!= 0
== -0
B1C0000000000000
B1C0000000000000
31C0000000000000

##</code><code>##

== 0
== -0
B1C0000000000000
B1C0000000000000
31C0000000000000

##</code><code>##

use strict;
use warnings;

use Inline C => Config =>
  BUILD_NOISY => 1,
  USING => 'ParseRegExp',
  #CLEAN_AFTER_BUILD => 0,
  ;

use Inline C => <<'EOC';

#include <stdio.h>

void _is_zero(_Decimal64 d64) {

  _Decimal64 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;

  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");
}

int foo(void) {
  _Decimal64 d64 = 0.DD;

  d64 *= -1.DD;

  _is_zero(d64);

  return 0;
}

EOC

foo();

##</code><code>##

== 0
== -0
B1C0000000000000
B1C0000000000000
31C0000000000000