Clipboard: Simple regression testie

Signed-off-by: Søren Løvborg <soeren.j.loevborg@siemens.com>

DISTFILES

@@ -683,6 +683,7 @@ deviceup-01.testie
 ./test/standard:
 BandwidthRatedUnqueue-01.testie
 Classifier-01.testie
+Clipboard-01.testie
 DelayShaper-notifier-01.testie
 FullNoteQueue-upstream-notifier-01.testie
 Hub-01.testie

test/standard/Clipboard-01.testie

@@ -0,0 +1,29 @@
+%info
+Test Clipboard.
+
+%script
+click CONFIG
+
+%file CONFIG
+clipboard :: Clipboard(0/1, 2/1, 9/1);
+
+TimedSource(0.002, "Simplistic")
+-> [0]clipboard[0]
+-> Discard();
+
+TimedSource(0.003, "Dance tour")
+-> [0]clipboard;
+
+TimedSource(0.004, "Ionize tub")
+-> [0]clipboard;
+
+TimedSource(0.001, ".a. is a .at,", LIMIT 4, STOP true)
+-> [1]clipboard[1]
+-> Print(CONTENTS ASCII)
+-> Discard();
+
+%expect stderr
+  13 |  .a. is a  .at,
+  13 |  Sam is a  cat,
+  13 |  Dan is a  rat,
+  13 |  Ian is a  bat,