Ada Image server Code

--  AWSRes v1.2 - Genarated on September 06 2007 at 19:15:18

with res.BB_png;
with res.BR_png;
with res.Logoimgsvr_png;
with res.Logoimgsvrbackground_png;
with res.Makefile;
with res.RR_png;
with res.diaporama_tpl;
with res.image_css;
with res.image_tpl;
with res.index_tpl;
with res.redirect_tpl;
with res.selection_tpl;
with res.selection_2m_tpl;
with res.selection_full_tpl;
with res.selectionlist_tpl;

with AWS.Resources.Embedded;
with GNAT.Calendar;

package body res is

   Initialized : Boolean := False;

   procedure Init is
      use AWS.Resources.Embedded;
   begin
      if not Initialized then
         Initialized := True;
         Register
            ("BB.png.gz",
             res.BB_png.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 05, 15, 26, 12, 0.0));
         Register
            ("BR.png.gz",
             res.BR_png.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 05, 15, 39, 28, 0.0));
         Register
            ("Logoimgsvr.png.gz",
             res.Logoimgsvr_png.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 11, 12, 37, 18, 0.0));
         Register
            ("Logoimgsvrbackground.png.gz",
             res.Logoimgsvrbackground_png.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 25, 15, 42, 18, 0.0));
         Register
            ("Makefile.gz",
             res.Makefile.Content'Access,
             GNAT.Calendar.Time_Of (2006, 12, 17, 17, 14, 14, 0.0));
         Register
            ("RR.png.gz",
             res.RR_png.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 05, 15, 25, 48, 0.0));
         Register
            ("diaporama.tpl.gz",
             res.diaporama_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2007, 09, 06, 18, 13, 24, 0.0));
         Register
            ("image.css.gz",
             res.image_css.Content'Access,
             GNAT.Calendar.Time_Of (2007, 01, 20, 14, 15, 44, 0.0));
         Register
            ("image.tpl.gz",
             res.image_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2007, 02, 20, 18, 22, 22, 0.0));
         Register
            ("index.tpl.gz",
             res.index_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2007, 09, 06, 18, 07, 42, 0.0));
         Register
            ("redirect.tpl.gz",
             res.redirect_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 11, 10, 42, 26, 0.0));
         Register
            ("selection.tpl.gz",
             res.selection_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2007, 02, 20, 18, 20, 56, 0.0));
         Register
            ("selection_2m.tpl.gz",
             res.selection_2m_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2007, 02, 10, 10, 00, 22, 0.0));
         Register
            ("selection_full.tpl.gz",
             res.selection_full_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2006, 12, 27, 09, 58, 08, 0.0));
         Register
            ("selectionlist.tpl.gz",
             res.selectionlist_tpl.Content'Access,
             GNAT.Calendar.Time_Of (2006, 11, 11, 16, 13, 06, 0.0));
      end if;
   end Init;

begin
   Init;
end res;