From e1da63276dc159532c0e5258f69a5365568f598f Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Thu, 15 Dec 2005 07:43:25 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r4219, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/externals/pdp/; revision=4220
---
 guile/example.scm | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 guile/example.scm

(limited to 'guile/example.scm')

diff --git a/guile/example.scm b/guile/example.scm
new file mode 100644
index 0000000..3963c76
--- /dev/null
+++ b/guile/example.scm
@@ -0,0 +1,12 @@
+; load event handler
+(load "pdp_guile.scm")
+
+
+; input - output video plug
+(add-input! 'in-vid
+	    (lambda (thing)
+	      (out 'out-vid thing)))
+
+
+; start the input loop
+(start)
-- 
cgit v1.2.1