pike.git/
lib/
master.pike.in
Branch:
Tag:
Non-build tags
All tags
No tags
1999-04-08
1999-04-08 22:18:21 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
67276cd02a3fb9e4bfb5b95082c2c1782ed1b536 (
10
lines) (+
8
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
better error message
Rev: lib/master.pike.in:1.45
1:
-
/* $Id: master.pike.in,v 1.
44
1999/
03
/
26
19
:
58
:
39
hubbe Exp $
+
/* $Id: master.pike.in,v 1.
45
1999/
04
/
08
22
:
18
:
21
hubbe Exp $
* * Master-file for Pike. *
328:
object new(mixed prog, mixed ... args) { if(stringp(prog))
-
prog
=cast_to_program(prog,backtrace()[-2][0]);
+
{
+
if(program p
=cast_to_program(prog,backtrace()[-2][0])
)
+
return p(@args)
;
+
else
+
error(sprintf("new: failed to find program %s.\n",prog));
+
}
return prog(@args); }