1999-11-14
1999-11-14 18:48:13 by Henrik Grubbström (Grubba) <grubba@grubba.org>
-
bcc9183eaee94461b2f6c1825d45505cda9cd265
(19 lines)
(+18/-1)
[
Show
| Annotate
]
Branch: 7.9
Added _optimizer_debug().
Rev: src/builtin_functions.c:1.206
5:
\*/
/**/
#include "global.h"
- RCSID("$Id: builtin_functions.c,v 1.205 1999/11/12 07:33:36 hubbe Exp $");
+ RCSID("$Id: builtin_functions.c,v 1.206 1999/11/14 18:48:13 grubba Exp $");
#include "interpret.h"
#include "svalue.h"
#include "pike_macros.h"
2314: Inside #if defined(PIKE_DEBUG)
d_flag = d;
}
+ void f__optimizer_debug(INT32 args)
+ {
+ INT_TYPE l;
+
+ CHECK_SECURITY_OR_ERROR(SECURITY_BIT_SECURITY,
+ ("_optimizer_debug: permission denied.\n"));
+
+ get_all_args("_optimizer_debug", args, "%i", &l);
+ pop_n_elems(args);
+ push_int(l_flag);
+ l_flag = l;
+ }
+
#ifdef YYDEBUG
void f__compiler_trace(INT32 args)
5370: Inside #if defined(PIKE_DEBUG)
/* function(int:int) */
ADD_EFUN("_debug",f__debug,tFunc(tInt,tInt),OPT_SIDE_EFFECT|OPT_EXTERNAL_DEPEND);
+
+ /* function(int:int) */
+ ADD_EFUN("_optimizer_debug",f__optimizer_debug,tFunc(tInt,tInt),OPT_SIDE_EFFECT|OPT_EXTERNAL_DEPEND);
#ifdef YYDEBUG
/* function(int:int) */