diff options
| author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-03-25 13:36:19 +0000 |
|---|---|---|
| committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-03-25 13:36:19 +0000 |
| commit | e0f97db9eb84d304602eb35815ba9d188cd69e46 (patch) | |
| tree | 84bddb2ec09b31241a95c5b1ded74d60cdff6239 /gcc/ada/a-exexda.adb | |
| parent | f80df6b2af919960ad08a6f1901ddebb654f981b (diff) | |
| download | gcc-e0f97db9eb84d304602eb35815ba9d188cd69e46.tar.gz | |
2008-03-24 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk r133512
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@133515 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-exexda.adb')
| -rw-r--r-- | gcc/ada/a-exexda.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-exexda.adb b/gcc/ada/a-exexda.adb index 98d823dee6d..94f4897f3ef 100644 --- a/gcc/ada/a-exexda.adb +++ b/gcc/ada/a-exexda.adb @@ -186,7 +186,7 @@ package body Exception_Data is function Basic_Exception_Traceback (X : Exception_Occurrence) return String; -- Returns an image of the complete call chain associated with an - -- exception occurence in its most basic form, that is as a raw sequence + -- exception occurrence in its most basic form, that is as a raw sequence -- of hexadecimal binary addresses. function Tailored_Exception_Traceback @@ -327,7 +327,7 @@ package body Exception_Data is Ptr : in out Natural) is Name : String (1 .. Exception_Name_Length (X)); - -- Bufer in which to fetch the exception name, in order to check + -- Buffer in which to fetch the exception name, in order to check -- whether this is an internal _ABORT_SIGNAL or a regular occurrence. Name_Ptr : Natural := Name'First - 1; |