PR other/52438

[pf3gnuchains/gcc-fork.git] / gcc / ada / g-trasym-vms-ia64.adb

diff --git a/gcc/ada/g-trasym-vms-ia64.adb b/gcc/ada/g-trasym-vms-ia64.adb
index 508c18a..897e2eb 100644 (file)
--- a/gcc/ada/g-trasym-vms-ia64.adb
+++ b/gcc/ada/g-trasym-vms-ia64.adb
@@ -325,7 +325,7 @@ package body GNAT.Traceback.Symbolic is
                Len := Last;
             end;
 
-         --  Even status values
+         --  Failure (bit 0 clear)
 
          else
             Res (Len + 1 .. Len + 6) := "ERROR" & ASCII.LF;