From a8967c654b6ee09dce89fe83bcafff2181a1952f Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Tue, 24 Dec 2024 18:51:07 +1300
Subject: Added Fl_Display_Device

---
 src/fltk-devices-surface.ads | 3 ---
 1 file changed, 3 deletions(-)

(limited to 'src/fltk-devices-surface.ads')

diff --git a/src/fltk-devices-surface.ads b/src/fltk-devices-surface.ads
index 68d0df7..f70d1e8 100644
--- a/src/fltk-devices-surface.ads
+++ b/src/fltk-devices-surface.ads
@@ -12,9 +12,6 @@ with
 package FLTK.Devices.Surface is
 
 
-    pragma Elaborate_Body (FLTK.Devices.Surface);
-
-
     type Surface_Device is new Device with private;
 
     type Surface_Device_Reference (Data : not null access Surface_Device'Class) is
-- 
cgit