pike.git
/
src
/
pike_types.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/pike_types.c:134:
a_markers[e]=0; } if(b_markers[e]) { free_type(b_markers[e]); b_markers[e]=0; } } }
-
void
compiler
_discard_type (void)
+
static
void
low
_discard_type (void)
{ ptrdiff_t len = pop_stack_mark();
-
TYPE_STACK_DEBUG("
paranoid
_
pop_
type");
+
TYPE_STACK_DEBUG("
discard
_type");
for (;len > 0; len--) { /* Get rid of excess junk. */ free_type(*(Pike_compiler->type_stackp--)); } }
-
+
void compiler_discard_type (void)
+
{
+
low_discard_type();
+
type_stack_mark();
+
}
+
struct pike_type *debug_pop_type(void) { struct pike_type *t = pop_unfinished_type(); TYPE_STACK_DEBUG("pop_type"); type_stack_mark(); return t; } struct pike_type *debug_compiler_pop_type(void) {