summaryrefslogtreecommitdiffstats
path: root/swig/chicken
diff options
context:
space:
mode:
authorDavid Robillard <d@drobilla.net>2011-05-16 18:57:02 +0000
committerDavid Robillard <d@drobilla.net>2011-05-16 18:57:02 +0000
commit0beb80fdfc298401b3d55a190984fda49142c330 (patch)
tree17a6166dba507b4f68a606cfec0e660daa51bc59 /swig/chicken
parent111b1a4cb83dbd0c1812bca412e43f6f326d6580 (diff)
downloadlilv-0beb80fdfc298401b3d55a190984fda49142c330.tar.gz
lilv-0beb80fdfc298401b3d55a190984fda49142c330.tar.bz2
lilv-0beb80fdfc298401b3d55a190984fda49142c330.zip
Remove crusty old SWIG stuff
git-svn-id: http://svn.drobilla.net/lad/trunk/lilv@3267 a436a847-0d15-0410-975c-d299462d15a1
Diffstat (limited to 'swig/chicken')
-rw-r--r--swig/chicken/Makefile.am15
-rw-r--r--swig/chicken/lilv.setup2
-rw-r--r--swig/chicken/lv2_list.scm13
3 files changed, 0 insertions, 30 deletions
diff --git a/swig/chicken/Makefile.am b/swig/chicken/Makefile.am
deleted file mode 100644
index da3645d..0000000
--- a/swig/chicken/Makefile.am
+++ /dev/null
@@ -1,15 +0,0 @@
-EXTRA_DIST = lilv.setup lv2_list.scm
-
-if WITH_CHICKEN
-all:
- rm -f lilv.scm lilv_wrap.c
- swig -DCHICKEN -Wall -chicken -proxy -nounit -I../.. -o lilv_wrap.c -oh lilv_wrap.h ../lilv.i
- tar -czf lilv.egg lilv.setup lilv.scm lilv_wrap.c
-
-#install-exec-local:
-# chicken-setup ./lilv.egg
-
-clean-local:
- rm -f *.[ch] *.so *.o lilv.egg lilv.scm
-endif
-
diff --git a/swig/chicken/lilv.setup b/swig/chicken/lilv.setup
deleted file mode 100644
index bac6aa3..0000000
--- a/swig/chicken/lilv.setup
+++ /dev/null
@@ -1,2 +0,0 @@
-(run (csc -s -o lilv.so lilv.scm lilv_wrap.c -llilv))
-(install-extension 'lilv '("lilv.so"))
diff --git a/swig/chicken/lv2_list.scm b/swig/chicken/lv2_list.scm
deleted file mode 100644
index 3978a12..0000000
--- a/swig/chicken/lv2_list.scm
+++ /dev/null
@@ -1,13 +0,0 @@
-; Least idiomatic scheme bindings ever. Work in progress...
-
-(require-extension lilv)
-
-(define world (lilv-world-new))
-(lilv-world-load-all world)
-
-(define plugins (lilv-world-get-all-plugins world))
-
-(let ((p (lilv-plugins-get-at plugins 0)))
- (display (lilv-value-as-string (lilv-plugin-get-uri p)))
- (newline))
-