pike.git/ lib/ master.pike.in

2001-12-13

2001-12-13 11:05:57 by Martin Stjernholm <mast@lysator.liu.se>

• c6cf603a04bbd3096e9d455ccbe8924d67b10c88 (8 lines) (+7/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Fixed error handling and leaks when a delayed compile fails.

Rev: lib/master.pike.in:1.180
Rev: src/encode.c:1.134
Rev: src/program.c:1.389
Rev: src/program.h:1.148

1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.179 2001/11/19 00:15:18 nilsson Exp $ +  * $Id: master.pike.in,v 1.180 2001/12/13 11:05:56 mast Exp $    *    * Master-file for Pike.    *
560:   {    if(string fname=search(programs,p))    m_delete(programs, fname); +  if (zero_type(objects[p]) != 1) +  m_delete(objects, p); +  foreach (fc; string name; mixed mod) +  if (objectp(mod) && object_program(mod) == p) +  m_delete(fc, name);   }      static program findprog(string pname,