string - Printing Out Characters in Ada -
i have these declared:
subtype num_char natural range 1 .. definitions.page_width + 1; subtype number_of_rows definitions.number_of_rows; type chars array (number_of_rows, num_char) of character; the_chars : chars;
what best way print out screen using ada.text_io.put_line()?
assuming want use ada.text_io
, not put_line
specifically, , assuming number_of_rows
meant integer range num_char
, be
for r in the_chars'range (1) loop c in the_chars'range (2) loop ada.text_io.put (the_chars (r, c)); end loop; ada.text_io.new_line; end loop;
Comments
Post a Comment