A Test Suite for SimpleTest 1.0.0 and 'exit status'

test_suite_for_simpletest.php

<?php
class AllTests extends GroupTest {
  function AllTests() {
    $this->add( realpath('.') );
  }

  function add( $dir = null ) {
    if ( $dh = opendir( $dir ) ) {
      while ( ($e = readdir( $dh )) !== false ) {
        $path = $dir.DIRECTORY_SEPARATOR.$e;
        if ( is_dir( $path ) and !preg_match( '/\A\./', $e ) ) {
          $this->add( $path );
        } else if ( preg_match( '/\Atest_.*\.php\z/', $e ) ) {
          $this->addTestFile( $path );
        }
      }
      closedir( $dh );
    }
  }
}

if ( realpath( $_SERVER['SCRIPT_FILENAME'] ) == __FILE__ ) {
  $test     = &new AllTests();
  $reporter = null;
  if ( SimpleReporter::inCli() ) {
    $reporter =& new TextReporter();
  } else {
    $reporter = &new HtmlReporter();
  }
  exit( $test->run( $reporter ) ? 0 : 1 );
}