diff options
-rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/ada/decl.c | 2 | ||||
-rw-r--r-- | gcc/ada/utils.c | 2 |
3 files changed, 6 insertions, 2 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index da68f26..77b3355 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2006-10-03 Kazu Hirata <kazu@codesourcery.com> + + * decl.c, utils.c: Fix comment typos. + 2006-09-28 Eric Botcazou <ebotcazou@adacore.com> * decl.c (gnat_to_gnu_entity) <E_Procedure>: Do not set "const" flag diff --git a/gcc/ada/decl.c b/gcc/ada/decl.c index fac6f2f..870d5cc 100644 --- a/gcc/ada/decl.c +++ b/gcc/ada/decl.c @@ -2440,7 +2440,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition) To break the circle we first build a dummy COMPONENT_REF which represents the "get to the parent" operation and initialize each of those discriminants to a COMPONENT_REF of the above - dummy parent referencing the corresponding discrimant of the + dummy parent referencing the corresponding discriminant of the base type of the parent subtype. */ gnu_get_parent = build3 (COMPONENT_REF, void_type_node, build0 (PLACEHOLDER_EXPR, gnu_type), diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 3874e39..511391d 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -84,7 +84,7 @@ static tree handle_const_attribute (tree *, tree, tree, int, bool *); static tree handle_nothrow_attribute (tree *, tree, tree, int, bool *); /* Table of machine-independent internal attributes for Ada. We support - this minimal set ot attributes to accomodate the Alpha back-end which + this minimal set ot attributes to accommodate the Alpha back-end which unconditionally puts them on its builtins. */ const struct attribute_spec gnat_internal_attribute_table[] = { |