From 02d24d9f114db84cac6be172e0dfcf641ed169d7 Mon Sep 17 00:00:00 2001 From: Jesper Quorning Date: Mon, 1 Jun 2020 13:58:58 +0200 Subject: [PATCH] Update Ada example (#755) The Text_IO package was Ada 83. Afterwards it is Ada.Text_IO. The package is 'opened' with 'use Ada.Text_IO' Conforming to usual style. --- a/ada.ada | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/a/ada.ada b/a/ada.ada index d2278bc..3a56193 100755 --- a/a/ada.ada +++ b/a/ada.ada @@ -1,5 +1,7 @@ -with Text_IO; +with Ada.Text_IO; + procedure Hello_World is - begin - Text_IO.Put_line("Hello World"); - end Hello_World; + use Ada.Text_IO; +begin + Put_line ("Hello World"); +end Hello_World;