From 2ec32dac56b544bc4851a3efddf75ee5fd9314ed Mon Sep 17 00:00:00 2001
From: Kyle Gunger <kgunger12@gmail.com>
Date: Sat, 17 Dec 2022 10:56:18 -0500
Subject: Change charp to uint8 + Change charp to uint8 + Start value
 abstraction

---
 tnslc/parse/parse.tnsl |  6 +++---
 tnslc/parse/token.tnsl | 36 ++++++++++++++++++------------------
 2 files changed, 21 insertions(+), 21 deletions(-)

(limited to 'tnslc/parse')

diff --git a/tnslc/parse/parse.tnsl b/tnslc/parse/parse.tnsl
index 5fb1a18..8919c3a 100644
--- a/tnslc/parse/parse.tnsl
+++ b/tnslc/parse/parse.tnsl
@@ -19,7 +19,7 @@
 	:include "parse/tokenizer.tnsl"
 ;/
 
-/; create_panic ({}charp err)
+/; create_panic ({}uint8 err)
 	;tnsl.io.println("ABOUT TO INDUCE PANIC... STAND BY")
 	;tnsl.io.print("Error code given: ")
 	;tnsl.io.println(err)
@@ -47,7 +47,7 @@
 		line,
 		col,
 
-	~{}charp
+	~{}uint8
 		data
 }
 
@@ -69,7 +69,7 @@
 		;delete self.data
 	;/
 
-	/; add_char (~{}charp part)
+	/; add_char (~{}uint8 part)
 		# ;uint l = len self.data`
 		# ;realloc self.data, l + len part
 		/; loop (int i = 0; i < len part`) [i++]
diff --git a/tnslc/parse/token.tnsl b/tnslc/parse/token.tnsl
index c2c3d89..fecc7f7 100644
--- a/tnslc/parse/token.tnsl
+++ b/tnslc/parse/token.tnsl
@@ -19,7 +19,7 @@
 	helper funcs for checking their token types.
 #/
 
-;{}{}charp PREWORDS = {
+;{}{}uint8 PREWORDS = {
 	"include",
 	"define",
 	"extern",
@@ -32,7 +32,7 @@
 	"abi"
 }
 
-;{}{}charp KEYTYPES = {
+;{}{}uint8 KEYTYPES = {
 	"int8",
 	"int16",
 	"int32",
@@ -54,7 +54,7 @@
 	"type"
 }
 
-;{}{}charp KEYWORDS = {
+;{}{}uint8 KEYWORDS = {
 	"struct",
 	"interface",
 	"enum",
@@ -96,7 +96,7 @@
 	"export"
 }
 
-;{}{}charp LITERALS = {
+;{}{}uint8 LITERALS = {
 	"true",
 	"false",
 	
@@ -106,14 +106,14 @@
 	"super"
 }
 
-;{}charp RESERVED = "`~!#%^&*()-=+[]{}|;:,.<>/"
+;{}uint8 RESERVED = "`~!#%^&*()-=+[]{}|;:,.<>/"
 
-;{}charp DELIMITS = "()[]{}"
-;{}charp LINESEPS = ";:#"
-;{}charp INLNSEPS = ","
-;{}charp AUGMENTS = "~`.&|^><!+-*/%"
+;{}uint8 DELIMITS = "()[]{}"
+;{}uint8 LINESEPS = ";:#"
+;{}uint8 INLNSEPS = ","
+;{}uint8 AUGMENTS = "~`.&|^><!+-*/%"
 
-;{}{}charp MDELIMITS = {
+;{}{}uint8 MDELIMITS = {
 	# Code block
 	"/;",
 	";/",
@@ -135,7 +135,7 @@
 	"#:"
 }
 
-;{}{}charp MAUGMENTS = {
+;{}{}uint8 MAUGMENTS = {
 	# Boolean
 	"==",
 	"&&",
@@ -183,7 +183,7 @@
 /##
 	Checks if the character point p is in the string cmp
 
-#; is_in_string (~{}charp cmp, charp p) [bool]
+#; is_in_string (~{}uint8 cmp, uint8 p) [bool]
 
 	/; loop (int i = 0; i < len cmp`) [i++]
 		/; if (p == cmp`{i})
@@ -197,7 +197,7 @@
 /##
 	Checks if the string s is in the list cmp
 
-#; is_in_string_list (~{}{}charp cmp, ~{}charp s) [bool]
+#; is_in_string_list (~{}{}uint8 cmp, ~{}uint8 s) [bool]
 
 	/; loop (int i = 0; i < len cmp`) [i++]
 
@@ -218,7 +218,7 @@
 	;return false
 ;/
 
-/; is_numeric_literal(~{}charp dat) [bool]
+/; is_numeric_literal(~{}uint8 dat) [bool]
 	/; if (len dat` == 0)
 		;return false
 	;/
@@ -250,19 +250,19 @@
 	;return true
 ;/
 
-/; is_text_literal(~{}charp dat) [bool]
+/; is_text_literal(~{}uint8 dat) [bool]
 	/; if (len dat` < 1)
 		;return false
 	;/
 	;return dat`{0} == '"' || dat`{0} == '\''
 ;/
 
-/; string_closed ({}charp dat, charp c) [bool]
+/; string_closed ({}uint8 dat, uint8 c) [bool]
 	/; if (len dat < 2)
 		;return false
 	;/
 
-	;charp closing = dat{0}
+	;uint8 closing = dat{0}
 	;bool escaping = false
 
 	/; loop (int i = 1; i < len dat) [i++]
@@ -281,7 +281,7 @@
 /#
 	Get the token_type value for a given string of character points
 
-#; get_token_type (~{}charp s) [int]
+#; get_token_type (~{}uint8 s) [int]
 
 	/; if (len s` > 1)
 
-- 
cgit v1.2.3