pike.git/
src/
las.cmod
Branch:
Tag:
Non-build tags
All tags
No tags
2022-05-07
2022-05-07 15:03:19 by Henrik Grubbström (Grubba) <grubba@grubba.org>
f0d7256468bc154a8079f4009e6b4073b407a202 (
17
lines) (+
17
/-
0
)
[
Show
|
Annotate
]
Branch:
master
Compiler: Improved #pragma compiler_trace.
4097:
struct pike_type *s; /* Actual type */ struct pike_string *name = NULL; INT32 args;
+
#ifdef PIKE_DEBUG
+
int save_l_flag = l_flag;
-
+
if (c->lex.pragmas & ID_COMPILER_TRACE) {
+
l_flag = 3;
+
}
+
#endif
+
args = 0; name = get_name_of_function(CAR(n));
4113:
if (!f) { /* Errors have been generated. */
+
#ifdef PIKE_DEBUG
+
l_flag = save_l_flag;
+
#endif
copy_pike_type(n->type, mixed_type_string); break; }
4134:
free_type(n->type); n->type = pop_unfinished_type(); }
+
#ifdef PIKE_DEBUG
+
l_flag = save_l_flag;
+
#endif
break; }
4157:
name); } free_type(f);
+
#ifdef PIKE_DEBUG
+
l_flag = save_l_flag;
+
#endif
break; } copy_pike_type(n->type, mixed_type_string);