------- Additional Comments From laurent at guerby dot net  2004-11-24 20:54 
-------
Works for me when I change a bity the code as follows:

                declare
                        Message : String (1..5);
                begin
                        String'Read (Channel, Message);
                        Ada.Text_IO.Put_Line (Message);
                end;

I believe the behaviour of the original code is not very well defined
per stream and socket semantics.

-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17960

Reply via email to