You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@hyperreal.org on 1998/06/12 00:13:38 UTC

cvs commit: modperl/t/net/perl test

dougm       98/06/11 15:13:38

  Modified:    t/net/perl test
  Log:
  Brian Millet reports this exit is also broken under _66/threads/solaris
  
  Revision  Changes    Path
  1.8       +8 -0      modperl/t/net/perl/test
  
  Index: test
  ===================================================================
  RCS file: /export/home/cvs/modperl/t/net/perl/test,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -r1.7 -r1.8
  --- test	1998/05/17 23:31:55	1.7
  +++ test	1998/06/11 22:13:37	1.8
  @@ -114,6 +114,14 @@
   test_exit(); # unless $ENV{CONTENT_LENGTH};
   
   sub test_exit {
  +    if ($USE_THREAD) {
  +	warn "XXX: need to fix exit in t/net/header.t w/ threads\n";
  +    }
  +    else {
  +	exit;
  +	die "shouldn't get this far!\n";
  +    }
  +
       exit;
       die "shouldn't get this far!\n";
   }