with Ada.Text_IO; procedure GNAT_Debug_Info_Test is begin Ada.Text_IO.Put_Line("Hello, world!"); end GNAT_Debug_Info_Test;