package TestCase::CompileError::Bool::NotNumericObject {

  sub main : int () {
    my $num = 1;
    my $num_ref = \$num;
    
    if ($num_ref) {
      
    }
  }
}