Пример #1
0
void SrcFile_fini( SrcFile *self )
{
    if ( self->file != NULL )
        xfclose( self->file );

	Str_delete(self->line);
    OBJ_DELETE( self->line_stack );
    OBJ_DELETE( self->file_stack );
}
Пример #2
0
Файл: re.c Проект: knaka/src
RE
RE_vnewf (
  const char * pszFmt,
  va_list args ) {
  RE self;
  Str str;
    str = Str_new("");
    Str_vappendf(str, pszFmt, args);
    self = RE_new(Str_get(str));
    Str_delete(str);
    return (self);
}
Пример #3
0
Файл: re.c Проект: knaka/src
void
RE_delete(
  RE self ) {
    regfree(& self->regex);
    if (self->pszPrevTarget) {
        Free((void *) self->pszPrevTarget);
    }
    if (self->pszTmp) {
        Free((void *) self->pszTmp);
    }
    {
      int i;
        for (i = 0; i < RE_MaxNumSubStr; i ++) {
            Str_delete(self->astr[i]);
        }
    }
    Free((void *) self);
}
Пример #4
0
Файл: scan.c Проект: z88dk/z88dk
DEFINE_dtor_module()
{
	Str_delete(input_buf);
	OBJ_DELETE(input_stack);
	utarray_free(scan_state);
}