aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorGabriel Dos Reis <gdr@codesourcery.com>2002-06-02 19:06:30 +0000
committerGabriel Dos Reis <gdr@gcc.gnu.org>2002-06-02 19:06:30 +0000
commit27e511e0d56e4968abd1549b50b62071f22a224f (patch)
treebe65308bcd5fc6c907af860b48e4f96e8e84c1aa /gcc/ada
parent818b6b7fb170190ce8c9253895f200234b4a8880 (diff)
downloadgcc-27e511e0d56e4968abd1549b50b62071f22a224f.zip
gcc-27e511e0d56e4968abd1549b50b62071f22a224f.tar.gz
gcc-27e511e0d56e4968abd1549b50b62071f22a224f.tar.bz2
diagnostic.h (struct diagnostic_context): Add new member internal_error.
* diagnostic.h (struct diagnostic_context): Add new member internal_error. (internal_error_function): Remove declaration. * diagnostic.c (internal_error_function): Remove definition.. (internal_error): Adjust use. ada/ * misc.c (gnat_init): Adjust setting of internal_error_function. From-SVN: r54179
Diffstat (limited to 'gcc/ada')
-rw-r--r--gcc/ada/ChangeLog4
-rw-r--r--gcc/ada/misc.c2
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index b4b6161..a17ab03 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2002-06-02 Gabriel Dos Reis <gdr@codesourcery.com>
+
+ * misc.c (gnat_init): Adjust setting of internal_error_function.
+
2002-06-01 Joseph S. Myers <jsm28@cam.ac.uk>
* gnat_ug.texi: Use @ifnottex instead of @ifinfo.
diff --git a/gcc/ada/misc.c b/gcc/ada/misc.c
index 63ac00a..3bc01d3 100644
--- a/gcc/ada/misc.c
+++ b/gcc/ada/misc.c
@@ -384,7 +384,7 @@ gnat_init (filename)
gnat_argc++;
gnat_argv[gnat_argc] = 0;
- set_internal_error_function (internal_error_function);
+ global_dc->internal_error = &internal_error_function;
/* Show that REFERENCE_TYPEs are internal and should be Pmode. */
internal_reference_types ();