c_o3.t 700 B

1234567891011121314151617181920212223242526272829
  1. #! /usr/bin/env perl
  2. # better use testc.sh -O3 for debugging
  3. BEGIN {
  4. #unless (-d '.git' and !$ENV{NO_AUTHOR}) {
  5. # print "1..0 #SKIP Only if -d .git\n";
  6. # exit;
  7. #}
  8. if ($ENV{PERL_CORE}) {
  9. unshift @INC, ('t', '../../lib');
  10. } else {
  11. unshift @INC, 't';
  12. }
  13. require TestBC;
  14. }
  15. use strict;
  16. my $DEBUGGING = ($Config{ccflags} =~ m/-DDEBUGGING/);
  17. #my $ITHREADS = ($Config{useithreads});
  18. $ENV{SKIP_SLOW_TESTS} = 1 if $Config{ccflags} =~ /-flto|-fsanitize/;
  19. prepare_c_tests();
  20. my @todo = todo_tests_default("c_o3");
  21. my @skip = (
  22. $DEBUGGING ? () : 29, # issue 78 if not DEBUGGING > 5.15
  23. );
  24. push @skip, (21,38) if $^O eq 'cygwin'; #hangs
  25. run_c_tests("C,-O3", \@todo, \@skip);