clear lex->modelname

diff --git a/lexer.c b/lexer.c
index d8fcf2e28f0a0257bfa8418ced003b206de70b4d..9956e0f7ff13927b1570147c759d764314884db7 100644 (file)
--- a/lexer.c
+++ b/lexer.c
@@ -155,6 +155,9 @@ void lex_close(lex_file *lex)
         mem_d(lex->frames[i].name);
     MEM_VECTOR_CLEAR(lex, frames);
 
+    if (lex->modelname)
+        mem_d(lex->modelname);
+
     if (lex->file)
         fclose(lex->file);
     if (lex->tok)