From 606ab9da9e4231564c91e4613bfbbb8883f7eb9d Mon Sep 17 00:00:00 2001
From: Kyle Gunger <kgunger12@gmail.com>
Date: Fri, 29 Mar 2024 16:55:01 -0400
Subject: File read test

---
 tnslc/utils/algo.tnsl | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 tnslc/utils/algo.tnsl

(limited to 'tnslc/utils/algo.tnsl')

diff --git a/tnslc/utils/algo.tnsl b/tnslc/utils/algo.tnsl
new file mode 100644
index 0000000..c501e35
--- /dev/null
+++ b/tnslc/utils/algo.tnsl
@@ -0,0 +1,10 @@
+
+/; strcmp(~uint8 a, b) [bool]
+	/; loop (a` == b` && a` !== 0 && b` !== 0) [a++; b++] ;/
+
+	/; if (b` == 0 && a` == 0)
+		return true
+	;/
+	return false
+;/
+
-- 
cgit v1.2.3