cvs commit: parrot assemble.pl

[jgoff]

cvsuser     02/06/09 22:40:06

  Modified:    .        assemble.pl
  Log:
  Woops... -E didn't quit before trying to print bytecode. This is bad. No
  actual tests come to mind that fit in our system though, so I'm going to scrimp
  here.
  
  Revision  Changes    Path
  1.66      +1 -0      parrot/assemble.pl
  
  Index: assemble.pl
  ===================================================================
  RCS file: /cvs/public/parrot/assemble.pl,v
  retrieving revision 1.65
  retrieving revision 1.66
  diff -u -w -r1.65 -r1.66
  --- assemble.pl       10 Jun 2002 04:29:21 -0000      1.65
  +++ assemble.pl       10 Jun 2002 05:40:06 -0000      1.66
  @@ -795,6 +795,7 @@
   $macro->preprocess();
   if(exists $args{-E}) {
     print join "\n",@{$macro->contents()};
  +  exit;
   }
   
   #