From fb37523537cdb69a31dede401a604981ce8b7b9d Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sat, 17 Jun 2017 11:28:39 +1000 Subject: Updated coding style, added progress log --- src/fltk-images-bitmaps-xbm.ads | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/fltk-images-bitmaps-xbm.ads') diff --git a/src/fltk-images-bitmaps-xbm.ads b/src/fltk-images-bitmaps-xbm.ads index fedbd69..4848576 100644 --- a/src/fltk-images-bitmaps-xbm.ads +++ b/src/fltk-images-bitmaps-xbm.ads @@ -6,6 +6,8 @@ package FLTK.Images.Bitmaps.XBM is type XBM_Image is new Bitmap with private; + + function Create (Filename : in String) return XBM_Image; @@ -16,7 +18,6 @@ private type XBM_Image is new Bitmap with null record; - overriding procedure Finalize (This : in out XBM_Image); -- cgit