From 8807fbcbc2a2116511eacaf49cc0345f236da966 Mon Sep 17 00:00:00 2001
From: David Schmenk <dschmenk@gmail.com>
Date: Tue, 29 Apr 2014 17:10:15 -0700
Subject: [PATCH] Sample library

---
 PLASMA/src/testlib.pla | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100755 PLASMA/src/testlib.pla

diff --git a/PLASMA/src/testlib.pla b/PLASMA/src/testlib.pla
new file mode 100755
index 00000000..4e4dda9b
--- /dev/null
+++ b/PLASMA/src/testlib.pla
@@ -0,0 +1,23 @@
+;
+; Declare all imported modules and their data/functions.
+;
+import stdlib
+  predef cls, gotoxy, puts, putc
+end
+;
+; Define functions.
+;
+export def puti(i)
+  if i < 0
+    putc('-')
+    i = -i
+  fin
+  if i < 10
+    putc(i + '0')
+  else
+    puti(i / 10)
+    putc(i % 10 + '0')
+  fin
+end
+
+done