/**
* gtags_flush: Flush the pool for compact format.
*
* @param[in] gtop descripter of #GTOP
* @param[in] fid file id
*/
void
gtags_flush(GTOP *gtop, const char *fid)
{
if (gtop->format & GTAGS_COMPACT) {
flush_pool(gtop, fid);
strhash_reset(gtop->path_hash);
}
}
void main (int argc, char **argv) {
byte *buffer;
block *base;
int size;
fin=fopen (argv[1],"rb");
fout=fopen (argv[2],"wb");
size=filelength (fileno (fin));
fflush (stdout);
buffer=(byte *) malloc (size);
fread (buffer,1,size,fin);
fclose (fin);
fflush (stdout);
base=compress (buffer,size);
fflush (stdout);
flush_pool (base);
/* free_frame (base);*/
fclose (fout);
}
/**
* gtags_close: close tag file
*
* @param[in] gtop #GTOP structure
*/
void
gtags_close(GTOP *gtop)
{
if (gtop->format & GTAGS_COMPRESS)
abbrev_close();
if (gtop->format & GTAGS_COMPACT && gtop->cur_path[0])
flush_pool(gtop, NULL);
if (gtop->segment_pool)
pool_close(gtop->segment_pool);
if (gtop->path_array)
free(gtop->path_array);
if (gtop->sb)
strbuf_close(gtop->sb);
if (gtop->vb)
varray_close(gtop->vb);
if (gtop->path_hash)
strhash_close(gtop->path_hash);
gpath_close();
dbop_close(gtop->dbop);
if (gtop->gtags)
dbop_close(gtop->gtags);
free(gtop);
}
