From 6e70f33a440fe6c7420c7406af83981be8691ef7 Mon Sep 17 00:00:00 2001
From: mescalinum <mescalinum@users.sourceforge.net>
Date: Thu, 17 Nov 2011 10:36:08 +0000
Subject: minimal test system. more testcases to come.

svn path=/trunk/externals/loaders/tclpd/; revision=15783
---
 tests/runtest.pd.in | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 tests/runtest.pd.in

(limited to 'tests/runtest.pd.in')

diff --git a/tests/runtest.pd.in b/tests/runtest.pd.in
new file mode 100644
index 0000000..308b934
--- /dev/null
+++ b/tests/runtest.pd.in
@@ -0,0 +1,17 @@
+#N canvas 0 0 473 353 10;
+#X obj 188 235 textfile;
+#X obj 37 124 list prepend add;
+#X obj 37 150 list trim;
+#X msg 188 196 write %OUTPUT%;
+#X msg 161 274 \; pd quit;
+#X obj 37 37 loadbang;
+#X obj 37 63 %TESTCASE%;
+#X obj 161 124 t b b;
+#X connect 1 0 2 0;
+#X connect 2 0 0 0;
+#X connect 3 0 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 1 0;
+#X connect 6 1 7 0;
+#X connect 7 0 4 0;
+#X connect 7 1 3 0;
-- 
cgit v1.2.1