aboutsummaryrefslogtreecommitdiff
path: root/src/fltk-images-pixmaps-gif.ads
diff options
context:
space:
mode:
authorJedidiah Barber <contact@jedbarber.id.au>2025-01-21 21:04:54 +1300
committerJedidiah Barber <contact@jedbarber.id.au>2025-01-21 21:04:54 +1300
commitb4438b2fbe895694be98e6e8426103deefc51448 (patch)
tree760d86cd7c06420a91dad102cc9546aee73146fc /src/fltk-images-pixmaps-gif.ads
parenta4703a65b015140cd4a7a985db66264875ade734 (diff)
Split public API and private implementation files into different directories
Diffstat (limited to 'src/fltk-images-pixmaps-gif.ads')
-rw-r--r--src/fltk-images-pixmaps-gif.ads45
1 files changed, 0 insertions, 45 deletions
diff --git a/src/fltk-images-pixmaps-gif.ads b/src/fltk-images-pixmaps-gif.ads
deleted file mode 100644
index 7084a13..0000000
--- a/src/fltk-images-pixmaps-gif.ads
+++ /dev/null
@@ -1,45 +0,0 @@
-
-
--- Programmed by Jedidiah Barber
--- Released into the public domain
-
-
-package FLTK.Images.Pixmaps.GIF is
-
-
- -------------
- -- Types --
- -------------
-
- type GIF_Image is new Pixmap with private;
-
- type GIF_Image_Reference (Data : not null access GIF_Image'Class) is
- limited null record with Implicit_Dereference => Data;
-
-
-
-
- --------------------
- -- Construction --
- --------------------
-
- package Forge is
-
- function Create
- (Filename : in String)
- return GIF_Image;
-
- end Forge;
-
-
-private
-
-
- type GIF_Image is new Pixmap with null record;
-
- overriding procedure Finalize
- (This : in out GIF_Image);
-
-
-end FLTK.Images.Pixmaps.GIF;
-