From 5828c45ef729d5f0eed6cb4f2b241e91d9c29c93 Mon Sep 17 00:00:00 2001 From: Kyle Gunger Date: Sun, 21 Jul 2024 10:59:12 -0400 Subject: fix error causing double file closes --- tnslc/parse/ast.tnsl | 8 +++----- tnslc/parse/parse.tnsl | 1 + tnslc/parse/tokenizer.tnsl | 1 + 3 files changed, 5 insertions(+), 5 deletions(-) (limited to 'tnslc/parse') diff --git a/tnslc/parse/ast.tnsl b/tnslc/parse/ast.tnsl index cdd0ae2..49c2f0f 100644 --- a/tnslc/parse/ast.tnsl +++ b/tnslc/parse/ast.tnsl @@ -9,7 +9,6 @@ uint16 NTYPE_POST_OP = 6 uint16 NTYPE_FUNCTION = 7 uint16 NTYPE_METHOD = 8 - struct Node { uint16 _type, ~uint8 data, @@ -107,11 +106,10 @@ struct Node { _ast_file(~_import, mod) _import.end() - ;; else - first = produce_next_token(fin, tmp) - tmp.end() - tmp = first ;/ + first = produce_next_token(fin, tmp) + tmp.end() + tmp = first ;/ fin`.close() diff --git a/tnslc/parse/parse.tnsl b/tnslc/parse/parse.tnsl index c225cf9..f6664d1 100644 --- a/tnslc/parse/parse.tnsl +++ b/tnslc/parse/parse.tnsl @@ -2,3 +2,4 @@ :import "tokenizer.tnsl" :import "ast.tnsl" ;/ + diff --git a/tnslc/parse/tokenizer.tnsl b/tnslc/parse/tokenizer.tnsl index c2ef091..d78fa40 100644 --- a/tnslc/parse/tokenizer.tnsl +++ b/tnslc/parse/tokenizer.tnsl @@ -373,6 +373,7 @@ uint MAX_MULTI = 3 com.end() ;/ ;/ + fin`.close() return out ;/ -- cgit v1.2.3