diff options
| author | David Robillard <d@drobilla.net> | 2008-07-30 21:16:51 +0000 |
|---|---|---|
| committer | David Robillard <d@drobilla.net> | 2008-07-30 21:16:51 +0000 |
| commit | 2cd12ad217c63068c0e33cd70e80ee6344af3216 (patch) | |
| tree | 03ce118eec13f707e888219f5b078ed896445f5f /swig/chicken/lv2_list.scm | |
| parent | 69557918d1492853483be5aa904652edf094384f (diff) | |
| download | lilv-2cd12ad217c63068c0e33cd70e80ee6344af3216.tar.gz lilv-2cd12ad217c63068c0e33cd70e80ee6344af3216.tar.bz2 lilv-2cd12ad217c63068c0e33cd70e80ee6344af3216.zip | |
Move stuff for various binding languages to own directories.
git-svn-id: http://svn.drobilla.net/lad/slv2@1315 a436a847-0d15-0410-975c-d299462d15a1
Diffstat (limited to 'swig/chicken/lv2_list.scm')
| -rw-r--r-- | swig/chicken/lv2_list.scm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/swig/chicken/lv2_list.scm b/swig/chicken/lv2_list.scm new file mode 100644 index 0000000..cc23e0d --- /dev/null +++ b/swig/chicken/lv2_list.scm @@ -0,0 +1,13 @@ +; Least idiomatic scheme bindings ever. Work in progress... + +(require-extension slv2) + +(define world (slv2-world-new)) +(slv2-world-load-all world) + +(define plugins (slv2-world-get-all-plugins world)) + +(let ((p (slv2-plugins-get-at plugins 0))) + (display (slv2-value-as-string (slv2-plugin-get-uri p))) + (newline)) + |