lisp-take-1/parse/tokenizer/free.c

27 lines
352 B
C

#include <stdlib.h>
#include <debug.h>
#include "../istream/free.h"
#include "struct.h"
#include "free.h"
void free_tokenizer(
struct tokenizer* this)
{
ENTER;
if (this && !--this->refcount)
{
free(this->rawtoken.data);
free_istream(this->stream);
free(this);
}
EXIT;
}