2001-11-21
2001-11-21 12:24:41 by Martin Stjernholm <mast@lysator.liu.se>
-
aa94b40ebeae33c44b06e909bdcc647bf03a09df
(10 lines)
(+8/-2)
[
Show
| Annotate
]
Branch: 5.2
Minor improvements to the DEBUG_BACKGROUND_RUN messages.
Rev: server/base_server/roxen.pike:1.758
6:
// Per Hedbor, Henrik Grubbström, Pontus Hagland, David Hedbor and others.
// ABS and suicide systems contributed freely by Francesco Chemolli
- constant cvs_version="$Id: roxen.pike,v 1.757 2001/11/14 13:12:37 grubba Exp $";
+ constant cvs_version="$Id: roxen.pike,v 1.758 2001/11/21 12:24:41 mast Exp $";
// The argument cache. Used by the image cache.
ArgCache argcache;
912: Inside #if defined(THREADS) and #if defined(DEBUG_BACKGROUND_RUN)
#ifdef DEBUG_BACKGROUND_RUN
report_debug ("background run %s (%s)\n",
functionp (task[0]) ?
- master()->describe_function (task[0]) : sprintf ("%O", task[0]),
+ sprintf ("%s: %s", Function.defined (task[0]),
+ master()->describe_function (task[0])) :
+ programp (task[0]) ?
+ sprintf ("%s: %s", Program.defined (task[0]),
+ master()->describe_program (task[0])) :
+ sprintf ("%O", task[0]),
map (task[1], lambda (mixed arg)
{return sprintf ("%O", arg);}) * ", ");
#endif