cvs commit: parrot Configure.pl

[simon]

cvsuser     01/09/23 07:50:48

  Modified:    .        Configure.pl
  Log:
  Fixed typo. Parrot might work again on non-8.3 filesystems. :)
  
  Revision  Changes    Path
  1.19      +4 -2      parrot/Configure.pl
  
  Index: Configure.pl
  ===================================================================
  RCS file: /home/perlcvs/parrot/Configure.pl,v
  retrieving revision 1.18
  retrieving revision 1.19
  diff -u -w -r1.18 -r1.19
  --- Configure.pl      2001/09/23 01:03:59     1.18
  +++ Configure.pl      2001/09/23 14:50:48     1.19
  @@ -19,7 +19,7 @@
   );
   
   if($opt_version) {
  -     print '$Id: Configure.pl,v 1.18 2001/09/23 01:03:59 ask Exp $' . "\n";
  +     print '$Id: Configure.pl,v 1.19 2001/09/23 14:50:48 simon Exp $' . "\n";
        exit;
   }
   
  @@ -134,7 +134,9 @@
   
   buildfile("test_c");
   system("$c{cc} $c{ccflags} -o test_siz$c{exe} test.c") and die "C compiler died!";
  -(@c{qw(ivsize longsize nvsize)})=split('/', `./test_sizes$c{exe}`);
  +(@c{qw(ivsize longsize nvsize)})=split('/', `./test_siz$c{exe}`);
  +die "Something wicked happened!" 
  +    unless defined $c{ivsize} and defined $c{longsize} and defined $c{nvsize};
   unlink('test.c', "test_siz$c{exe}", "test$c{o}");
   
   print <<"END";