1use strict; 2use warnings; 3use Test::More; 4 5# this is needed to avoid false passes if was done first without 'info' 6use Inline CPP => config => force_build => 1, clean_after_build => 0; 7 8use Inline CPP => <<'END'; 9class Foo { 10 public: 11 Foo() {} 12 ~Foo() {} 13 char *data() const { return "Hello dolly!\n"; } 14}; 15 16END 17 18 19is( 20 Foo->new->data, "Hello dolly!\n", 21 "Constant member function." 22); 23 24done_testing(); 25