created stdlib/debug.sl and moved int3 there as well as an improved version of debug thats now called dump

2025-12-25 21:30:11 +01:00
parent ff72bc8207
commit f76ef276e9
2 changed files with 24 additions and 13 deletions
--- a/stdlib/debug.sl
+++ b/stdlib/debug.sl
@@ -0,0 +1,22 @@
+# : dump ( n -- )
+
+# dump takes the firts element from the stack
+# and prints that much consequent elements
+# from the stack while not modifying it
+
+: dump
+    1 swap
+	for
+        dup pick
+		puti cr
+        1 +
+	next
+    drop
+;
+
+# : int3 ( -- )
+:asm int3 {
+	int3
+}
+;
+