From d53ce364a7c7c0d9b0d1fa87077df2dff69688e9 Mon Sep 17 00:00:00 2001
From: David Robillard <d@drobilla.net>
Date: Sun, 3 Nov 2019 15:06:28 +0100
Subject: Add puglGetNativeWorld()

---
 pugl/detail/mac.m |  6 ++++++
 pugl/detail/win.c |  6 ++++++
 pugl/detail/x11.c |  6 ++++++
 pugl/pugl.h       | 10 ++++++++++
 4 files changed, 28 insertions(+)

diff --git a/pugl/detail/mac.m b/pugl/detail/mac.m
index e8a5d57..f530c2e 100644
--- a/pugl/detail/mac.m
+++ b/pugl/detail/mac.m
@@ -695,6 +695,12 @@ puglFreeWorldInternals(PuglWorld* world)
 	free(world->impl);
 }
 
+void*
+puglGetNativeWorld(PuglWorld* world)
+{
+	return NULL;
+}
+
 PuglInternals*
 puglInitViewInternals(void)
 {
diff --git a/pugl/detail/win.c b/pugl/detail/win.c
index e1deaf1..ee7eb01 100644
--- a/pugl/detail/win.c
+++ b/pugl/detail/win.c
@@ -130,6 +130,12 @@ puglInitWorldInternals(void)
 	return impl;
 }
 
+void*
+puglGetNativeWorld(PuglWorld* PUGL_UNUSED(world))
+{
+	return GetModuleHandle(NULL);
+}
+
 PuglInternals*
 puglInitViewInternals(void)
 {
diff --git a/pugl/detail/x11.c b/pugl/detail/x11.c
index fd47db3..e576b49 100644
--- a/pugl/detail/x11.c
+++ b/pugl/detail/x11.c
@@ -101,6 +101,12 @@ puglInitWorldInternals(void)
 	return impl;
 }
 
+void*
+puglGetNativeWorld(PuglWorld* world)
+{
+	return world->impl->display;
+}
+
 PuglInternals*
 puglInitViewInternals(void)
 {
diff --git a/pugl/pugl.h b/pugl/pugl.h
index 70d6f42..1344410 100644
--- a/pugl/pugl.h
+++ b/pugl/pugl.h
@@ -441,6 +441,16 @@ puglNewWorld(void);
 PUGL_API void
 puglFreeWorld(PuglWorld* world);
 
+/**
+   Return a pointer to the native handle of the world.
+
+   On X11, this returns a pointer to the Display.
+   On OSX, this returns NULL.
+   On Windows, this returns a handle to the calling process module.
+*/
+PUGL_API void*
+puglGetNativeWorld(PuglWorld* world);
+
 /**
    Set the class name of the application.
 
-- 
cgit v1.2.1