Re: ada calendar

[Pascal Obry <p.obry@wanadoo.fr>]

Marius Amado Alves <amado.alves@netcabo.pt> writes:

> You can do it with Ada.Calendar:
> 
>   Your_Function (Time_Of
>     (Year_Number'Value (S (7 .. 10)),
>      Month_Number'Value (S (4 .. 5)),
>      Day_Number'Value (S (1 .. 2))));
> 
> where S is your string containing "27/06/2003" or similar.

There is no guarantee that S start to 1. It should be using S'First as
offset to compute all slices.

Pascal.

-- 

--|------------------------------------------------------
--| Pascal Obry                           Team-Ada Member
--| 45, rue Gabriel Peri - 78114 Magny Les Hameaux FRANCE
--|------------------------------------------------------
--|         http://perso.wanadoo.fr/pascal.obry
--| "The best way to travel is by means of imagination"
--|
--| gpg --keyserver wwwkeys.pgp.net --recv-key C1082595