Branch: Tag:

2000-10-25

2000-10-25 21:50:36 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

possible Oracle bugfix

Rev: src/object.c:1.110
Rev: src/program.c:1.229

5:   \*/   /**/   #include "global.h" - RCSID("$Id: program.c,v 1.228 2000/10/01 08:55:04 hubbe Exp $"); + RCSID("$Id: program.c,v 1.229 2000/10/25 21:50:36 hubbe Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
4072:    }    }    +  if(Pike_fp->fun == -1) +  error("Cannot access parent storage!\n"); +     loc.parent_identifier=Pike_fp->fun;    loc.inherit=INHERIT_FROM_INT(p, Pike_fp->fun);