use strict;
use Test::More tests => 4;
foreach my $type (qw( memory exe dll obj ))
{
subtest $type => sub {
my $tcc = FFI::TinyCC->new;
eval { $tcc->set_output_type($type) };
is $@, '', 'tcc.set_output_type';
};
}