Add suil_instance_get_handle (patch from Rui Nuno Capela) (#925).

git-svn-id: http://svn.drobilla.net/lad/trunk/suil@5201 a436a847-0d15-0410-975c-d299462d15a1

4 files changed, 27 insertions, 3 deletions

diff --git a/NEWS b/NEWS
index bea782c..5a43026 100644
--- a/NEWS
+++ b/NEWS
@@ -1,9 +1,10 @@
-suil 0.6.17 unstable;
+suil 0.7.0 unstable;
 
+  * Add suil_instance_get_handle (patch from Rui Nuno Capela)
   * Fix compilation errors on some systems
   * Upgrade to waf 1.7.14
   
- -- David Robillard <d@drobilla.net>  Wed, 25 Dec 2013 00:16:55 -0500
+ -- David Robillard <d@drobilla.net>  Wed, 25 Dec 2013 00:57:05 -0500
 
 suil (0.6.16) stable;
 
diff --git a/src/instance.c b/src/instance.c
index 7f651d9..b72f65f 100644
--- a/src/instance.c
+++ b/src/instance.c
@@ -296,6 +296,13 @@ suil_instance_free(SuilInstance* instance)
 }
 
 SUIL_API
+SuilHandle
+suil_instance_get_handle(SuilInstance* instance)
+{
+	return instance->handle;
+}
+
+SUIL_API
 LV2UI_Widget
 suil_instance_get_widget(SuilInstance* instance)
 {
diff --git a/suil/suil.h b/suil/suil.h
index 6d6981d..d13a3bc 100644
--- a/suil/suil.h
+++ b/suil/suil.h
@@ -75,6 +75,9 @@ typedef struct SuilHostImpl SuilHost;
 /** An instance of an LV2 plugin UI. */
 typedef struct SuilInstanceImpl SuilInstance;
 
+/** Opaque pointer to a UI handle. */
+typedef void* SuilHandle;
+
 /** Opaque pointer to a UI widget. */
 typedef void* SuilWidget;
 
@@ -213,6 +216,19 @@ void
 suil_instance_free(SuilInstance* instance);
 
 /**
+   Get the handle for a UI instance.
+
+   Returns the handle to the UI instance.  The returned handle has opaque type
+   to insulate the Suil API from LV2 extensions, but in pactice it is currently
+   of type @ref LV2UI_Handle.  This should not normally be needed.
+
+   The returned handle is shared and must not be deleted.
+*/
+SUIL_API
+SuilHandle
+suil_instance_get_handle(SuilInstance* instance);
+
+/**
    Get the widget for a UI instance.
 
    Returns an opaque pointer to a widget, the type of which matches the @c
diff --git a/wscript b/wscript
index 1f3203a..80898e8 100644
--- a/wscript
+++ b/wscript
@@ -9,7 +9,7 @@ import waflib.extras.autowaf as autowaf
 # major increment <=> incompatible changes
 # minor increment <=> compatible changes (additions)
 # micro increment <=> no interface changes
-SUIL_VERSION       = '0.6.17'
+SUIL_VERSION       = '0.7.0'
 SUIL_MAJOR_VERSION = '0'
 
 # Mandatory waf variables