14 files changed, 469 insertions, 0 deletions
diff --git a/desiredata/src/tests/abstr-test.pd b/desiredata/src/tests/abstr-test.pd
new file mode 100644
index 00000000..dce22c6b
--- /dev/null
+++ b/desiredata/src/tests/abstr-test.pd
@@ -0,0 +1,3 @@
+#N canvas 0 0 450 300 10;
+#X obj 30 36 abstr;
+#X obj 101 36 abstr2;
diff --git a/desiredata/src/tests/abstr.pd b/desiredata/src/tests/abstr.pd
new file mode 100644
index 00000000..91250635
--- /dev/null
+++ b/desiredata/src/tests/abstr.pd
@@ -0,0 +1,11 @@
+#N canvas 0 0 450 300 10;
+#X obj 77 5 inlet;
+#X obj 189 6 inlet;
+#X obj 171 256 outlet;
+#X obj 133 6 inlet;
+#X obj 245 7 inlet;
+#X connect 0 0 2 0;
+#X connect 1 0 2 0;
+#X connect 3 0 2 0;
+#X connect 4 0 2 0;
+#X coords 0 0 1 1 0 0 0;
diff --git a/desiredata/src/tests/abstr2.pd b/desiredata/src/tests/abstr2.pd
new file mode 100644
index 00000000..c3a9639c
--- /dev/null
+++ b/desiredata/src/tests/abstr2.pd
@@ -0,0 +1,15 @@
+#N canvas 0 0 450 300 10;
+#X obj 19 29 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 39 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X obj 59 29 nbx 8 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 256;
+#X obj 19 52 vsl 15 128 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 19 11 hsl 128 15 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 136 29 vradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X obj 38 156 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
+-1 6;
diff --git a/desiredata/src/tests/all_guis_and_gop.pd b/desiredata/src/tests/all_guis_and_gop.pd
new file mode 100644
index 00000000..2be10062
--- /dev/null
+++ b/desiredata/src/tests/all_guis_and_gop.pd
@@ -0,0 +1,116 @@
+#N canvas 339 27 590 690 10;
+#X obj 98 29 +;
+#X floatatom 99 83 5 0 0 0 - - -;
+#X symbolatom 99 108 10 0 0 0 - - -;
+#X obj 158 27 bng 42 250 50 0 empty empty button-label 50 8 0 8 -258699
+-1 -1;
+#X obj 158 87 tgl 15 0 empty empty hello? 20 8 0 9 -24198 -1 -1 0 1
+;
+#X obj 227 140 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 0 256;
+#X obj 5 13 vsl 25 150 0 127 0 0 empty empty vslider-hello -2 -6 0
+9 -241291 -1 -1 0 0;
+#X obj 43 201 hsl 100 10 0 127 0 0 empty empty hello-hslider 10 6 0
+9 -262144 -1 -258699 0 0;
+#X obj 67 159 hradio 15 1 0 8 empty empty hello-hradio 0 -6 0 9 -261681
+-1 -1 0;
+#X obj 68 24 vradio 15 1 0 8 empty empty hello-vradio 0 -6 0 9 -262144
+-1 -1 0;
+#X obj 435 73 vu 15 120 empty vumeter-label -1 -8 0 8 -166441 -1 1
+0;
+#X obj 306 9 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#N canvas 0 0 450 300 graph2 0;
+#X array array1 100 float 1;
+#A 0 -0.0571427 -0.0428571 -0.0857141 -0.171428 -0.185714 -0.199999
+-0.206428 -0.212856 -0.219285 -0.225714 -0.232142 -0.238571 -0.244999
+-0.251428 -0.257856 -0.264285 -0.270713 -0.277142 -0.28357 -0.289999
+-0.296427 -0.302856 -0.309285 -0.315713 -0.322142 -0.32857 -0.331427
+-0.334285 -0.337142 -0.339999 -0.342856 -0.345713 -0.34857 -0.351427
+-0.354284 -0.357141 -0.359999 -0.362856 -0.365713 -0.35857 -0.351427
+-0.329999 -0.30857 -0.279999 -0.25619 -0.23238 -0.208571 -0.18 0.162856
+0.305712 0.419998 0.448569 0.491426 0.57714 0.591425 0.605711 0.305712
+0.14857 0.105713 -0.00857189 -0.122857 -0.237142 -0.322856 -0.40857
+-0.479998 -0.50857 -0.565712 -0.594283 -0.608569 -0.608569 -0.608569
+-0.594283 -0.565712 -0.546664 -0.527617 -0.494284 -0.460951 0.0342851
+-0.0514288 -0.165714 -0.201428 -0.251428 -0.265714 -0.294285 -0.337142
+-0.337142 -0.365713 -0.365713 -0.40857 -0.437141 -0.451427 -0.451427
+-0.451427 -0.479998 -0.494284 -0.477141 -0.482855 -0.48857 -0.494284
+-0.499998;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 199 178 graph;
+#X floatatom 432 22 5 0 0 0 - - -;
+#X floatatom 479 23 5 -99 42 2 floatatom-label - -;
+#X obj 225 74 nbx 5 14 -1e+37 1e+37 0 0 empty empty numbox2-label 60
+8 0 9 -260818 -62784 -1 0 256;
+#X floatatom 237 48 5 0 0 0 - - -;
+#X msg 98 57;
+#N canvas 0 0 450 300 foo 0;
+#X obj 148 99 +;
+#X floatatom 149 153 5 0 0 0 - - -;
+#X symbolatom 149 178 10 0 0 0 - - -;
+#X obj 208 97 bng 42 250 50 0 empty empty button-label 50 8 0 8 -258699
+-1 -1;
+#X obj 208 157 tgl 15 0 empty empty hello? 20 8 0 9 -24198 -1 -1 0
+1;
+#X obj 277 210 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 0 256;
+#X obj 55 83 vsl 25 150 0 127 0 0 empty empty vslider-hello -2 -6 0
+9 -241291 -1 -1 0 0;
+#X obj 93 271 hsl 100 10 0 127 0 0 empty empty hello-hslider 10 6 0
+9 -262144 -1 -258699 0 0;
+#X obj 117 229 hradio 15 1 0 8 empty empty hello-hradio 0 -6 0 9 -261681
+-1 -1 0;
+#X obj 118 94 vradio 15 1 0 8 empty empty hello-vradio 0 -6 0 9 -262144
+-1 -1 0;
+#X obj 485 143 vu 15 120 empty vumeter-label -1 -8 0 8 -166441 -1 1
+0;
+#X obj 356 79 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#N canvas 0 0 450 300 graph2 0;
+#X array array1 100 float 1;
+#A 0 -0.0571427 -0.0428571 -0.0857141 -0.171428 -0.185714 -0.199999
+-0.206428 -0.212856 -0.219285 -0.225714 -0.232142 -0.238571 -0.244999
+-0.251428 -0.257856 -0.264285 -0.270713 -0.277142 -0.28357 -0.289999
+-0.296427 -0.302856 -0.309285 -0.315713 -0.322142 -0.32857 -0.331427
+-0.334285 -0.337142 -0.339999 -0.342856 -0.345713 -0.34857 -0.351427
+-0.354284 -0.357141 -0.359999 -0.362856 -0.365713 -0.35857 -0.351427
+-0.329999 -0.30857 -0.279999 -0.25619 -0.23238 -0.208571 -0.18 0.162856
+0.305712 0.419998 0.448569 0.491426 0.57714 0.591425 0.605711 0.305712
+0.14857 0.105713 -0.00857189 -0.122857 -0.237142 -0.322856 -0.40857
+-0.479998 -0.50857 -0.565712 -0.594283 -0.608569 -0.608569 -0.608569
+-0.594283 -0.565712 -0.546664 -0.527617 -0.494284 -0.460951 0.0342851
+-0.0514288 -0.165714 -0.201428 -0.251428 -0.265714 -0.294285 -0.337142
+-0.337142 -0.365713 -0.365713 -0.40857 -0.437141 -0.451427 -0.451427
+-0.451427 -0.479998 -0.494284 -0.477141 -0.482855 -0.48857 -0.494284
+-0.499998;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 249 248 graph;
+#X floatatom 482 92 5 0 0 0 - - -;
+#X floatatom 529 93 5 -99 42 2 floatatom-label - -;
+#X obj 275 144 nbx 5 14 -1e+37 1e+37 0 0 empty empty numbox2-label
+60 8 0 9 -260818 -62784 -1 0 256;
+#X floatatom 287 118 5 0 0 0 - - -;
+#X msg 148 127;
+#X obj 15 17 bng 15 250 50 0 empty empty i_shouldn't_be_visible_in_parent
+0 -6 0 9 -262144 -1 -1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 6 0 7 0;
+#X connect 8 0 7 0;
+#X connect 9 0 8 0;
+#X connect 13 0 10 0;
+#X connect 14 0 10 1;
+#X connect 15 0 5 0;
+#X connect 16 0 15 0;
+#X coords 0 -1 1 1 400 300 1 50 50;
+#X restore 99 336 pd foo;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 6 0 7 0;
+#X connect 8 0 7 0;
+#X connect 9 0 8 0;
+#X connect 13 0 10 0;
+#X connect 14 0 10 1;
+#X connect 15 0 5 0;
+#X connect 16 0 15 0;
diff --git a/desiredata/src/tests/all_guis_and_gop.pd.gif b/desiredata/src/tests/all_guis_and_gop.pd.gif
new file mode 100644
index 00000000..288c6902
--- /dev/null
+++ b/desiredata/src/tests/all_guis_and_gop.pd.gif
diff --git a/desiredata/src/tests/bof.pd b/desiredata/src/tests/bof.pd
new file mode 100644
index 00000000..706950cf
--- /dev/null
+++ b/desiredata/src/tests/bof.pd
@@ -0,0 +1,27 @@
+#N canvas 0 0 675 450 10;
+#X obj 23 28 +;
+#X obj 35 206 adc~;
+#X obj 99 124 -;
+#X obj 142 214 * 42;
+#X msg 130 47 foo;
+#X msg 280 91 0;
+#X msg 280 70 set \$1;
+#X obj 280 46 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 0
+0;
+#X obj 228 54 vsl 15 128 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 0 0;
+#X obj 254 64 vradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X floatatom 381 79 5 0 0 0 - - -;
+#X obj 372 109 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8
+-262144 -1 -1 0 0 256;
+#X symbolatom 352 42 10 0 0 0 - - -;
+#X obj -43 -41 lop~;
+#X text 11 3 there's a [lop~] top left \, but negative coords are buggy.
+;
+#X connect 0 0 1 0;
+#X connect 0 0 2 1;
+#X connect 2 0 3 0;
+#X connect 4 0 2 0;
+#X connect 6 0 5 0;
+#X connect 7 0 6 0;
diff --git a/desiredata/src/tests/chun.pd b/desiredata/src/tests/chun.pd
new file mode 100644
index 00000000..0ee7d48a
--- /dev/null
+++ b/desiredata/src/tests/chun.pd
@@ -0,0 +1,36 @@
+#N canvas 385 550 450 300 10;
+#X obj 151 212 dac~;
+#X obj 132 139 *~ 0.02;
+#X msg 231 120 0;
+#X obj 252 95 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 235 154 0.2;
+#X obj 274 140 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 45 105 delread~ down;
+#X obj 21 26 delread~ up;
+#X obj 15 132 *~ 0.8;
+#X obj 126 41 osc~ 500;
+#X obj 133 11 osc~ 40;
+#X obj 225 19 +~ 1;
+#X obj 219 46 *~ 500;
+#X floatatom 337 69 5 0 0 0 - - -;
+#X obj 46 78 delwrite~ down 20;
+#X obj 15 156 delwrite~ up 20;
+#X text 323 50 tweak me;
+#X connect 1 0 0 0;
+#X connect 1 0 0 1;
+#X connect 2 0 1 1;
+#X connect 3 0 2 0;
+#X connect 4 0 1 1;
+#X connect 5 0 4 0;
+#X connect 6 0 8 0;
+#X connect 6 0 1 0;
+#X connect 7 0 14 0;
+#X connect 8 0 15 0;
+#X connect 9 0 14 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 9 0;
+#X connect 13 0 6 0;
+#X connect 13 0 7 0;
diff --git a/desiredata/src/tests/city.pd b/desiredata/src/tests/city.pd
new file mode 100644
index 00000000..9b30647c
--- /dev/null
+++ b/desiredata/src/tests/city.pd
@@ -0,0 +1,128 @@
+#N canvas 0 0 450 300 10;
+#X obj 23 20 +;
+#X obj 53 20 +;
+#X obj 23 50 +;
+#X obj 53 50 +;
+#X obj 83 20 +;
+#X obj 113 20 +;
+#X obj 83 50 +;
+#X obj 113 50 +;
+#X obj 23 80 +;
+#X obj 53 80 +;
+#X obj 23 110 +;
+#X obj 53 110 +;
+#X obj 83 80 +;
+#X obj 113 80 +;
+#X obj 83 110 +;
+#X obj 113 110 +;
+#X obj 143 20 +;
+#X obj 173 20 +;
+#X obj 143 50 +;
+#X obj 173 50 +;
+#X obj 203 20 +;
+#X obj 233 20 +;
+#X obj 203 50 +;
+#X obj 233 50 +;
+#X obj 143 80 +;
+#X obj 173 80 +;
+#X obj 143 110 +;
+#X obj 173 110 +;
+#X obj 203 80 +;
+#X obj 233 80 +;
+#X obj 203 110 +;
+#X obj 233 110 +;
+#X obj 23 140 +;
+#X obj 53 140 +;
+#X obj 23 170 +;
+#X obj 53 170 +;
+#X obj 83 140 +;
+#X obj 113 140 +;
+#X obj 83 170 +;
+#X obj 113 170 +;
+#X obj 23 200 +;
+#X obj 53 200 +;
+#X obj 23 230 +;
+#X obj 53 230 +;
+#X obj 83 200 +;
+#X obj 113 200 +;
+#X obj 83 230 +;
+#X obj 113 230 +;
+#X obj 143 140 +;
+#X obj 173 140 +;
+#X obj 143 170 +;
+#X obj 173 170 +;
+#X obj 203 140 +;
+#X obj 233 140 +;
+#X obj 203 170 +;
+#X obj 233 170 +;
+#X obj 143 200 +;
+#X obj 173 200 +;
+#X obj 143 230 +;
+#X obj 173 230 +;
+#X obj 203 200 +;
+#X obj 233 200 +;
+#X obj 203 230 +;
+#X obj 233 230 +;
+#X connect 0 0 1 0;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 2 0 8 0;
+#X connect 4 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 16 0;
+#X connect 6 0 7 0;
+#X connect 8 0 9 0;
+#X connect 8 0 10 0;
+#X connect 9 0 12 0;
+#X connect 10 0 11 0;
+#X connect 10 0 32 0;
+#X connect 12 0 13 0;
+#X connect 12 0 14 0;
+#X connect 14 0 15 0;
+#X connect 16 0 17 0;
+#X connect 16 0 18 0;
+#X connect 17 0 20 0;
+#X connect 18 0 19 0;
+#X connect 18 0 24 0;
+#X connect 20 0 21 0;
+#X connect 20 0 22 0;
+#X connect 22 0 23 0;
+#X connect 24 0 25 0;
+#X connect 24 0 26 0;
+#X connect 25 0 28 0;
+#X connect 26 0 27 0;
+#X connect 28 0 29 0;
+#X connect 28 0 30 0;
+#X connect 30 0 31 0;
+#X connect 32 0 33 0;
+#X connect 32 0 34 0;
+#X connect 33 0 36 0;
+#X connect 34 0 35 0;
+#X connect 34 0 40 0;
+#X connect 36 0 37 0;
+#X connect 36 0 38 0;
+#X connect 37 0 48 0;
+#X connect 38 0 39 0;
+#X connect 40 0 41 0;
+#X connect 40 0 42 0;
+#X connect 41 0 44 0;
+#X connect 42 0 43 0;
+#X connect 44 0 45 0;
+#X connect 44 0 46 0;
+#X connect 46 0 47 0;
+#X connect 48 0 49 0;
+#X connect 48 0 50 0;
+#X connect 49 0 52 0;
+#X connect 50 0 51 0;
+#X connect 50 0 56 0;
+#X connect 52 0 53 0;
+#X connect 52 0 54 0;
+#X connect 54 0 55 0;
+#X connect 56 0 57 0;
+#X connect 56 0 58 0;
+#X connect 57 0 60 0;
+#X connect 58 0 59 0;
+#X connect 60 0 61 0;
+#X connect 60 0 62 0;
+#X connect 62 0 63 0;
diff --git a/desiredata/src/tests/desiredata-presentation-piksel06.pd b/desiredata/src/tests/desiredata-presentation-piksel06.pd
new file mode 100644
index 00000000..fee64d2d
--- /dev/null
+++ b/desiredata/src/tests/desiredata-presentation-piksel06.pd
@@ -0,0 +1,26 @@
+#N canvas 0 0 640 480 10;
+#X text 100 140 Zoomable patches (and def Canvas item);
+#X text 100 160 Client-side selection and clipboard;
+#X text 100 180 Client-side undo and redo: multiple \, atomic \, labeled
+\, history;
+#X text 100 200 Class browser and class name completions;
+#X text 100 220 Internationalization (the Patching-in-Tongues project)
+;
+#X text 100 240 Keyboard-based Navigation and Edition;
+#X text 100 260 Server Preferences (.pdrc Editor);
+#X text 100 280 Client Preferences (.ddrc Editor);
+#X text 100 300 Canvas Actions;
+#X text 100 320 #V for visual attributes;
+#V bg 255 255 0;
+#X text 100 340 Dialog autogeneration with def Dialog add;
+#X text 100 360 ClientClassTreeDialog;
+#X text 100 380 Deconstructors;
+#X text 100 400 desire.h;
+#X text 100 420 what is happening to desire.c these days;
+#X obj 94 31 bng 32 250 50 0 empty empty DesireData-0.39.A 40 15 1
+19 -262088 -1 -1;
+#X text 295 270 tab support in all dialogs;
+#X obj 0 0 + 242;
+#V pretty 1;
+#X text 99 440 scaling of selection or complete patch;
+#X coords 0 0 1 1 0 0 0;
diff --git a/desiredata/src/tests/gop-one.pd b/desiredata/src/tests/gop-one.pd
new file mode 100644
index 00000000..b1414997
--- /dev/null
+++ b/desiredata/src/tests/gop-one.pd
@@ -0,0 +1,18 @@
+#N canvas 447 533 552 376 10;
+#X obj 5 24 vsl 10 50 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 20 21 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 20 58 5 0 0 0 - - -;
+#X obj 41 21 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X obj 6 124 outlet;
+#X obj 80 0 inlet;
+#X obj 136 8 inlet;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 4 0;
+#X connect 3 0 4 0;
+#X connect 5 0 0 0;
+#X connect 6 0 1 0;
+#X coords 0 0 1 1 60 85 1 0 0;
diff --git a/desiredata/src/tests/gop-three.pd b/desiredata/src/tests/gop-three.pd
new file mode 100644
index 00000000..7ab5cb13
--- /dev/null
+++ b/desiredata/src/tests/gop-three.pd
@@ -0,0 +1,41 @@
+#N canvas 238 407 695 410 10;
+#N canvas 0 0 450 300 three 0;
+#X obj 89 21 gop-two;
+#X obj 22 65 vsl 10 50 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 41 61 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 63 61 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 41 101 5 0 0 0 - - -;
+#X obj 259 3 inlet;
+#X obj 339 4 inlet;
+#X obj 51 237 outlet;
+#X connect 0 0 7 0;
+#X connect 1 0 4 0;
+#X connect 2 0 0 1;
+#X connect 4 0 0 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X coords 0 0 1 1 250 150 1 0 0;
+#X restore 182 100 pd three;
+#X obj 100 165 vsl 10 50 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 1;
+#X floatatom 121 202 5 0 0 0 - - -;
+#X obj 121 262 print A;
+#X obj 182 262 print B;
+#X obj 100 43 random 127;
+#X obj 100 21 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 100 68 t f f;
+#X obj 425 62 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 460 120 gop-two;
+#X connect 0 0 4 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 5 0 7 0;
+#X connect 6 0 5 0;
+#X connect 7 0 1 0;
+#X connect 7 1 0 0;
+#X connect 8 0 0 1;
diff --git a/desiredata/src/tests/gop-two.pd b/desiredata/src/tests/gop-two.pd
new file mode 100644
index 00000000..080cf53f
--- /dev/null
+++ b/desiredata/src/tests/gop-two.pd
@@ -0,0 +1,19 @@
+#N canvas 373 135 592 432 10;
+#X obj 80 20 gop-one;
+#X obj 9 44 vsl 10 50 0 127 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 25 40 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 50 40 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 29 82 5 0 0 0 - - -;
+#X obj 81 162 outlet;
+#X obj 168 11 inlet;
+#X obj 237 12 inlet;
+#X connect 0 0 5 0;
+#X connect 1 0 4 0;
+#X connect 2 0 0 1;
+#X connect 4 0 0 0;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X coords 0 0 1 1 150 120 1 0 0;
diff --git a/desiredata/src/tests/sub.pd b/desiredata/src/tests/sub.pd
new file mode 100644
index 00000000..1a9e570b
--- /dev/null
+++ b/desiredata/src/tests/sub.pd
@@ -0,0 +1,21 @@
+#N canvas 586 146 668 714 10;
+#X obj 86 58 +;
+#X obj 107 130 -;
+#N canvas 0 0 450 300 foo 0;
+#X obj 110 30 inlet;
+#X obj 110 100 + 1.618;
+#X obj 110 130 * 3.14159;
+#X obj 110 180 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X restore 224 153 pd foo;
+#X obj 101 73 +;
+#X obj 122 145 -;
+#X msg 220 120 42;
+#X floatatom 220 180 8 0 0 0 - - -;
+#X text 220 200 137.03;
+#X connect 0 0 1 0;
+#X connect 2 0 6 0;
+#X connect 3 0 4 0;
+#X connect 5 0 2 0;
diff --git a/desiredata/src/tests/subgop-test.pd b/desiredata/src/tests/subgop-test.pd
new file mode 100644
index 00000000..48fb0bb1
--- /dev/null
+++ b/desiredata/src/tests/subgop-test.pd
@@ -0,0 +1,8 @@
+#N canvas 0 0 450 300 10;
+#N canvas 0 0 450 300 foo 1;
+#X obj 10 24 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 276 183 print;
+#X coords 0 -1 1 1 85 60 1 0 0;
+#X restore 145 113 pd foo;
+#X obj 319 154 pack;