ExtUtils-ParseXS/t/001-basic.t

11 my ($source_file, $obj_file, $lib_file);
41 $source_file = 'XSTest.c';
44 $pxs->process_file(filename => 'XSTest.xs', output => $source_file, prototypes => 0);
45 ok -e $source_file, "Create an output file";
53   $obj_file = $b->compile( source => $source_file );
86 open my $IN, '<', $source_file
87   or die "Unable to open $source_file: $!";
133 close $IN or die "Unable to close $source_file: $!";
136   for ( $obj_file, $lib_file, $source_file) {
157 $source_file = 'XSTest.c';
162     output => $source_file,
166 ok -e $source_file, "Create an output file";
170 open my $IN, '<', $source_file
171   or die "Unable to open $source_file: $!";
175 close $IN or die "Unable to close $source_file: $!";
179   for ( $obj_file, $lib_file, $source_file) {