Clean up compilation warnings.

simonjwright · simonjwright · commit a7046f9aa242 · 2020-08-02T17:35:28.000+01:00
* src/tcl-ada.adb: remove pragma Ada_2005.
  * src/tcl-ada.ads: likewise.
  * src/tcl-tk.ads: likewise.
  * src/tcl.adb: likewise.
  * src/tcl.ads: likewise.
  * demos/twashell.adb: remove unnecessary 'use type'.
diff --git a/demos/twashell.adb b/demos/twashell.adb
@@ -20,7 +20,6 @@ with TWashApp;
 procedure TWASHell is --  Tcl Windowing Ada SHell
 
    package C renames Interfaces.C;
-   use type C.int;
 
    --  Argc and Argv include the command name
    Argc : C.int;
diff --git a/src/tcl-ada.adb b/src/tcl-ada.adb
@@ -31,8 +31,6 @@
 --
 --------------------------------------------------------------------
 
-pragma Ada_2005;
-
 with Ada.Exceptions;
 with Ada.Unchecked_Conversion;
 with CHelper;
diff --git a/src/tcl-ada.ads b/src/tcl-ada.ads
@@ -45,8 +45,6 @@
 --
 --------------------------------------------------------------------
 
-pragma Ada_2005;
-
 with CArgv;
 
 package Tcl.Ada is
diff --git a/src/tcl-tk.ads b/src/tcl-tk.ads
@@ -36,8 +36,6 @@
 --
 --------------------------------------------------------------------
 
-pragma Ada_2005;
-
 with CHelper;
 
 package Tcl.Tk is
diff --git a/src/tcl.adb b/src/tcl.adb
@@ -31,8 +31,6 @@
 --
 --------------------------------------------------------------------
 
-pragma Ada_2005;
-
 with Ada.Text_IO;
 
 package body Tcl is
diff --git a/src/tcl.ads b/src/tcl.ads
@@ -39,8 +39,6 @@
 --
 --------------------------------------------------------------------
 
-pragma Ada_2005;
-
 with CArgv;
 with Interfaces.C.Pointers;
 with Interfaces.C.Strings;
