-
-
Notifications
You must be signed in to change notification settings - Fork 4
/
gid-headers.ads
33 lines (29 loc) · 1.15 KB
/
gid-headers.ads
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
---------------------------------
-- GID - Generic Image Decoder --
---------------------------------
--
-- Private child of GID, with helpers for identifying
-- image formats and reading header informations.
--
private package GID.Headers is
--
-- Crude image signature detection.
-- Targa (.tga) has no signature.
--
procedure Load_Signature
(image : in out Image_Descriptor;
try_tga : Boolean := False);
--
-- Loading of various format's headers (past signature)
--
procedure Load_BMP_Header (image : in out Image_Descriptor);
procedure Load_FITS_Header (image : in out Image_Descriptor);
procedure Load_GIF_Header (image : in out Image_Descriptor);
procedure Load_JPEG_Header (image : in out Image_Descriptor);
procedure Load_PNG_Header (image : in out Image_Descriptor);
procedure Load_PNM_Header (image : in out Image_Descriptor);
procedure Load_QOI_Header (image : in out Image_Descriptor);
procedure Load_RIFF_Header (image : in out Image_Descriptor);
procedure Load_TGA_Header (image : in out Image_Descriptor);
procedure Load_TIFF_Header (image : in out Image_Descriptor);
end GID.Headers;