https://gcc.gnu.org/bugzilla/show_bug.cgi?id=111578
Bug ID: 111578
Summary: GNAT ada.textio.setline gives incorrect result
Product: gcc
Version: 11.4.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: ada
Assignee: unassigned at gcc dot gnu.org
Reporter: thiebauddick2 at aol dot com
CC: dkm at gcc dot gnu.org
Target Milestone: ---
building the following program with gnatmake:
with ada.text_io; use ada.text_io;
procedure Cursor is
begin
Put(ASCII.ESC & "[2J" & ASCII.ESC & "[;H");
set_col(1);
set_line(6);
put ("aaaaaaaa");
set_col(1);
set_line(7);
put ("bbbbbbbb");
set_col(3);
set_line(5);
put ("cccccccc");
end Cursor;
Gives the result:
aaaaaaaa
bbbbbbbb
cccccccc
It should give the result
cccccccc
aaaaaaaa
bbbbbbbbb
GNAT 10.5.0 on Linux Mint 21.2
