From 5828c45ef729d5f0eed6cb4f2b241e91d9c29c93 Mon Sep 17 00:00:00 2001
From: Kyle Gunger <kgunger12@gmail.com>
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