c_o2.t 623 B

12345678910111213141516171819202122232425262728
  1. #! /usr/bin/env perl
  2. # better use testc.sh -O2 for debugging
  3. BEGIN {
  4. #unless (-d ".svn" or -d '.git') {
  5. # print "1..0 #SKIP Only if -d .svn|.git\n";
  6. # exit;
  7. #}
  8. if ($ENV{PERL_CORE}){
  9. chdir('t') if -d 't';
  10. @INC = ('.', '../lib');
  11. } else {
  12. unshift @INC, 't';
  13. #push @INC, "blib/arch", "blib/lib";
  14. }
  15. require 'test.pl'; # for run_perl()
  16. }
  17. use strict;
  18. #my $DEBUGGING = ($Config{ccflags} =~ m/-DDEBUGGING/);
  19. #my $ITHREADS = ($Config{useithreads});
  20. prepare_c_tests();
  21. my @todo = todo_tests_default("c_o2");
  22. my @skip;
  23. #push @skip, 29 if $] > 5.015; #hangs
  24. run_c_tests("C,-O2", \@todo, \@skip);