1---------------------------------
2-- GID - Generic Image Decoder --
3---------------------------------
4--
5-- Private child of GID, with helpers for identifying
6-- image formats and reading header informations.
7--
8private package GID.Headers is
9
10  --
11  -- Crude image signature detection
12  --
13  procedure Load_signature (
14    image   : in out Image_descriptor;
15    try_tga :        Boolean:= False
16  );
17
18  --
19  -- Loading of various format's headers (past signature)
20  --
21
22  procedure Load_BMP_header (image: in out Image_descriptor);
23  procedure Load_FITS_header (image: in out Image_descriptor);
24  procedure Load_GIF_header (image: in out Image_descriptor);
25  procedure Load_JPEG_header (image: in out Image_descriptor);
26  procedure Load_PNG_header (image: in out Image_descriptor);
27  procedure Load_PNM_header (image: in out Image_descriptor);
28  procedure Load_TGA_header (image: in out Image_descriptor);
29  procedure Load_TIFF_header (image: in out Image_descriptor);
30
31end GID.Headers;
32