45b
@verb #16:"inspect inspect_forked" this none this rxdo #55
@program #16:"inspect inspect_forked" this none this
this.inspections = {{args[1], callers("With Line #s")}, @this.inspections[1..9]}
cverb = callers()[1][2]
cobj = callers()[1][4]
if (cobj != #-1)
  try
    cline = callers("Line #s")[1][$]
    ccode = verb_code(cobj, cverb)[cline]
    ccodeindices = match(ccode, tostr(":", verb, "(%(.*%))"))[3][1]
    carg = ccode[ccodeindices[1]..ccodeindices[2]]
  except (ANY)
    carg = "quack!"
  endtry
else
  carg = "EVAL"
  cverb = "eval()"
endif
if (verb == "inspect_forked")
  fork (0)
    this:notify($html_utils:literal_text(tostr("[", cobj, ":", cverb, "]: ", carg, " = ", toliteral(args[1]))))
  endfork
else
  this:notify($html_utils:literal_text(tostr("[", cobj, ":", cverb, "]: ", carg, " = ", toliteral(args[1]))))
endif
"Last modified by manta (#7165) on Tue Oct 16 06:29:19 2001 MDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."
.

0