pike.git/ src/ program.c

1999-07-01

1999-07-01 18:58:53 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 5dbbf8c9530f6377162d1c969dd69b217c37d2b9 (10 lines) (+9/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Added some more PIKE_DEBUG.

Rev: src/program.c:1.127

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.126 1999/07/01 18:43:53 grubba Exp $"); + RCSID("$Id: program.c,v 1.127 1999/07/01 18:58:53 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
1965:    CDFPRINTF((stderr,"Trying to find %s see_static=%d\n",    name->str, see_static));    + #ifdef PIKE_DEBUG +  if (!prog) { +  fatal("really_low_find_shared_string_identifier(\"%s\", NULL, %d)\n" +  "prog is NULL!\n", name, see_static); +  } + #endif /* PIKE_DEBUG */ +     for(i=0;i<(int)prog->num_identifier_references;i++)    {    funp = prog->identifier_references + i;