Set the token to null after freeing

diff --git a/source/sclpl/parser.c b/source/sclpl/parser.c
index 93175943d13c7bf14cd9ad91ce47fe6f07701f81..57362a8786dbd0e8a1499a8b71cacf786a8c2806 100644 (file)
--- a/source/sclpl/parser.c
+++ b/source/sclpl/parser.c
@@ -62,8 +62,10 @@ bool parser_eof(parser_t* p_parser) {
 }
 
 void parser_resume(parser_t* p_parser) {
-    if (NULL != p_parser->p_tok)
+    if (NULL != p_parser->p_tok) {
         mem_release(p_parser->p_tok);
+        p_parser->p_tok = NULL;
+    }
     vec_clear(p_parser->p_tok_buf);
     lexer_skipline(p_parser->p_lexer);
 }