pike.git/ src/ program.c

2005-05-31

2005-05-31 11:59:04 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 29d1e60528a8fdee571ab595514541f4c860e02b (13 lines) (+12/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Added some comments.

Rev: src/program.c:1.592

2:   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: program.c,v 1.591 2005/05/30 12:36:08 mast Exp $ + || $Id: program.c,v 1.592 2005/05/31 11:59:04 grubba Exp $   */      #include "global.h"
2457:    free_program(parent);    }    +  /* fprintf(stderr, "Exiting program: %p, id:%d\n", p, p->id); */       if(id_to_program_cache[p->id & (ID_TO_PROGRAM_CACHE_SIZE-1)]==p)    id_to_program_cache[p->id & (ID_TO_PROGRAM_CACHE_SIZE-1)]=0;
3223:       exit_threads_disable(NULL);    + #if 0 + #ifdef PIKE_USE_MACHINE_CODE +  if (prog && +  (((unsigned long long *)prog->program)[-1] != 0xdeadfeedf00dfaddLL)) { +  Pike_fatal("Bad mexec magic!\n"); +  } + #endif /* PIKE_USE_MACHINE_CODE */ + #endif /* 0 */    return prog;   }   
7666:    return low_program_from_function(f->u.object->prog, f->subtype);   }    + /* NOTE: Does not add references to the return value! */   PMOD_EXPORT struct program *program_from_svalue(const struct svalue *s)   {    switch(s->type)