pike.git/ lib/ master.pike.in

2001-10-26

2001-10-26 15:21:09 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• f645f040e25c15925a3167e514af5779beeed356 (20 lines) (+13/-7) ^{[ Show | Annotate ]}
  Branch: 7.9

Made Describer->describe() somewhat more paranoid.
Fixes [bug 1553 (#1553)].

Rev: lib/master.pike.in:1.172

1:   /* -*- Pike -*-    * -  * $Id: master.pike.in,v 1.171 2001/10/14 19:25:41 mast Exp $ +  * $Id: master.pike.in,v 1.172 2001/10/26 15:21:09 grubba Exp $    *    * Master-file for Pike.    *
516:   #if constant(load_module)    case ".so":    if (fname == "") { -  werror(sprintf("low_find_prog(\"%s\", \"%s\") => load_module(\"\")\n" +  werror(sprintf("low_findprog(\"%s\", \"%s\") => load_module(\"\")\n"    "%s\n", pname, ext, describe_backtrace(backtrace())));    }   
2034:    ident[m] = "@" + identcount++;       string res, typ; +  catch {    if (catch (typ=sprintf("%t",m)))    typ = "object"; // Object with a broken _sprintf(), probably.    switch(typ)
2068:    }    res = typ;    } -  +  }; +  if (!res) { +  // Extra paranoia case. +  res = sprintf("Instance of %O", _typeof(m)); +  }    if (stringp (ident[m]))    return ident[m] + "=" + res;    return res;