From 2d00fe01eb5fb245d0ca4be020e5e08895631805 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Fri, 28 Jul 2017 10:57:19 +1000
Subject: Forgot to add exceptions to derivative Image constructors

---
 src/fltk-images.ads | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'src/fltk-images.ads')

diff --git a/src/fltk-images.ads b/src/fltk-images.ads
index 3e47ee6..a3138e9 100644
--- a/src/fltk-images.ads
+++ b/src/fltk-images.ads
@@ -87,5 +87,13 @@ private
            (This : in out Image);
 
 
+
+
+    function fl_image_fail
+           (I : in System.Address)
+        return Interfaces.C.int;
+    pragma Import (C, fl_image_fail, "fl_image_fail");
+
+
 end FLTK.Images;
 
-- 
cgit