2017-12-01
2017-12-01 16:16:21 by Henrik Grubbström (Grubba) <grubba@grubba.org>
-
10bb00e3b98e57619556899c1a11a82b4249786b
(16 lines)
(+14/-2)
[
Show
| Annotate
]
Branch: master
Compiler: Some minor #pragma disassemble improvments.
4601: Inside #if defined(PIKE_DEBUG)
#ifdef PIKE_DEBUG
(a_flag > 1) ||
#endif
- (c->lex.pragmas & ID_DISASSEMBLE))
+ ((c->lex.pragmas & ID_DISASSEMBLE) && (Pike_compiler->compiler_pass==2)))
fprintf(stderr, "Doing function '%s' at %lx\n", name->str,
(unsigned long)PIKE_PC);
args=count_arguments(type);
-
+ #ifdef PIKE_DEBUG
+ if((a_flag > 1) || (c->lex.pragmas & ID_DISASSEMBLE))
+ fprintf(stderr, "args: %d\n", args);
+ #endif
+
if(args < 0)
{
args=~args;
4621:
vargs|=IDENTIFIER_SCOPE_USED;
#ifdef PIKE_DEBUG
- if(a_flag > 5)
+ if((a_flag > 1) || (c->lex.pragmas & ID_DISASSEMBLE))
fprintf(stderr, "Extra identifier flags:0x%02x\n", vargs);
#endif
4702:
remove_clear_locals=0x7fffffff;
Pike_compiler->compiler_frame->current_function_number = saved_fun_num;
}
+ #ifdef PIKE_DEBUG
+ if(a_flag > 2)
+ {
+ fputs("Coded\n", stderr);
}
-
+ #endif
+ }
ret=define_function(name,
type,