pike.git / src / builtin.cmod

version» Context lines:

pike.git/src/builtin.cmod:1:   /* -*- c -*-   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: builtin.cmod,v 1.201 2008/05/29 20:40:21 mast Exp $ + || $Id: builtin.cmod,v 1.202 2008/05/29 21:58:44 mast Exp $   */      #include "global.h"   #include "interpret.h"   #include "svalue.h"   #include "pike_macros.h"   #include "object.h"   #include "program.h"   #include "array.h"   #include "pike_error.h"
pike.git/src/builtin.cmod:1260:    CVAR INT32 lineno;       INIT    {    THIS->pc = NULL;    THIS->lineno = -1;    THIS->filename = NULL;    }       EXIT +  gc_trivial;    {    if (THIS->filename) {    free_string(THIS->filename);    THIS->filename = NULL;    }    THIS->pc = NULL;    THIS->lineno = -1;    }       /*! @decl int(0..1) _is_type(string t)
pike.git/src/builtin.cmod:1999:    RETURN str->str.s ? str->str.s->len : 0;    }       INIT    {    struct Buffer_struct *str = THIS;    MEMSET( str, 0, sizeof( *str ) );    }       EXIT +  gc_trivial;    {    struct Buffer_struct *str = THIS;    if( str->str.s )    free_string_builder( &str->str );    }   }      /*! @endclass    */   
pike.git/src/builtin.cmod:2150:    }       INIT    {    MEMSET(&THIS->ctx, 0, sizeof(struct replace_many_context));    THIS->from = NULL;    THIS->to = NULL;    }       EXIT +  gc_trivial;    {    if (THIS->from) free_array(THIS->from);    if (THIS->to) free_array(THIS->to);    free_replace_many_context(&THIS->ctx);    }   }      /*! @endclass    */   
pike.git/src/builtin.cmod:2185:       INIT    {    THIS->mojt.vtab = NULL;    THIS->mojt.data = NULL;    THIS->del = NULL;    THIS->to = NULL;    }       EXIT +  gc_trivial;    {    if (THIS->mojt.vtab) {    THIS->mojt.vtab->freeme(THIS->mojt.data);    THIS->mojt.vtab = NULL;    THIS->mojt.data = NULL;    }    if (THIS->del) {    free_string(THIS->del);    THIS->del = NULL;    }
pike.git/src/builtin.cmod:3089:    INIT    {    THIS->tail = NULL;    THIS->head = TAIL_SENTINEL(THIS);    THIS->tail_pred = HEAD_SENTINEL(THIS);    THIS->head_sentinel_refs = THIS->tail_sentinel_refs = 2;    THIS->num_elems = 0;    }       EXIT +  gc_trivial;    {    struct pike_list_node *node = THIS->head;    struct pike_list_node *next;    while ((next = node->next)) {   #ifdef PIKE_DEBUG    if (node->refs != 2) {    Pike_fatal("Unexpected number of references for node: %d\n",    node->refs);    }   #endif /* PIKE_DEBUG */
pike.git/src/builtin.cmod:3368:    loc.inherit->storage_offset);    }       INIT    {    add_ref(THIS->cur = List__get_iterator_find_parent()->head);    THIS->ind = 0;    }       EXIT +  gc_trivial;    {    if (THIS->cur) {    free_list_node(THIS->cur);    THIS->cur = NULL;    }    }       /* Called at gc_check time. */    GC_CHECK    {