package TestCase::Lib::SPVM::Double {
  use SPVM::NumberUtil (INT8_MIN, INT8_MAX, INT16_MIN, INT16_MAX, INT32_MIN, INT32_MAX, INT64_MIN, INT64_MAX, FLT_MIN, FLT_MAX, DBL_MIN, DBL_MAX);
  
  sub basic : int () {
    my $oval = SPVM::Double->new(DBL_MIN());
    my $value1 = $oval->value;
    
    unless ($value1 == DBL_MIN()) {
      return 0;
    }
    
    return 1;
  }
}