cvs commit: parrot/languages/imcc main.c

[Leopold Toetsch]

cvsuser     03/01/13 10:12:38

  Modified:    languages/imcc main.c
  Log:
  call fatal if no packfile
  
  Revision  Changes    Path
  1.5       +2 -0      parrot/languages/imcc/main.c
  
  Index: main.c
  ===================================================================
  RCS file: /cvs/public/parrot/languages/imcc/main.c,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -w -r1.4 -r1.5
  --- main.c    13 Jan 2003 17:46:47 -0000      1.4
  +++ main.c    13 Jan 2003 18:12:38 -0000      1.5
  @@ -218,6 +218,8 @@
       }
       if (pbc == 2) {
           pf = Parrot_readbc(interpreter, sourcefile);
  +        if (!pf)
  +            fatal(1, "main", "Packfile loading failed\n");
           Parrot_loadbc(interpreter, pf);
       }
       else {