From 94130c3ff512b457f349a29633d0fafc3a6e93b6 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Wed, 23 Oct 2019 21:35:18 +0200
Subject: Add singletonShared convenience function

---
 src/Gtk/Shares.dcl | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/Gtk/Shares.dcl')

diff --git a/src/Gtk/Shares.dcl b/src/Gtk/Shares.dcl
index e05407c..3a3891b 100644
--- a/src/Gtk/Shares.dcl
+++ b/src/Gtk/Shares.dcl
@@ -13,3 +13,5 @@ share :: !ShareId a -> Shared a | shared a
 getShared :: !(Shared a) -> GtkM a | shared a
 setShared :: !(Shared a) !a -> GtkM a | shared a
 updateShared :: !(a -> a) !(Shared a) -> GtkM a | shared a
+
+singletonShared :: !String !(GtkM a) -> GtkM a | shared a
-- 
cgit v1.2.3