Re: output of enumeration types

["Steve" <nospam_steved94@comcast.net>]

It doesn't look that tedious to me:

   function To_String( Value : Roman_Number ) return String is
       result : String( Value'range );
   begin
       for idx in Value'range loop
           result( idx ) := Roman_Digit'Image( Value( idx ) )(2);
       end loop;
       return result;
   end To_String;

... and please say that this is not a homework assignment.

Steve
(The Duck)

"Staszek Goldstein" <goldstei@math.uni.lodz.pl> wrote in message 
news:d41ars$3eo$1@achot.icm.edu.pl...
>I have got the following problem: having defined
> type roman_digit is ('I','V','X','L','C','D','M');
> type roman_number is array (positive range <>) of roman_digit;
> I want to print, say, "MMV" of type roman_number on the standard output. I 
> have no idea how to do it, at least without tedious step-by-step 
> conversion routines between roman numbers and strings.Can you help me?
>