aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/xeinfo.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/xeinfo.adb')
-rw-r--r--gcc/ada/xeinfo.adb5
1 files changed, 0 insertions, 5 deletions
diff --git a/gcc/ada/xeinfo.adb b/gcc/ada/xeinfo.adb
index 120bf39..b451d0b 100644
--- a/gcc/ada/xeinfo.adb
+++ b/gcc/ada/xeinfo.adb
@@ -63,9 +63,6 @@ procedure XEinfo is
Err : exception;
- pragma Warnings (Off);
- -- These seem not to be referenced, but they are (by * operator)
-
A : VString := Nul;
B : VString := Nul;
C : VString := Nul;
@@ -88,8 +85,6 @@ procedure XEinfo is
Rtn : VString := Nul;
Term : VString := Nul;
- pragma Warnings (On);
-
InB : File_Type;
-- Used to read initial header from body