aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/s-finimp.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-finimp.adb')
-rw-r--r--gcc/ada/s-finimp.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/s-finimp.adb b/gcc/ada/s-finimp.adb
index 9a5e534..050f799 100644
--- a/gcc/ada/s-finimp.adb
+++ b/gcc/ada/s-finimp.adb
@@ -332,10 +332,10 @@ package body System.Finalization_Implementation is
P : Finalizable_Ptr := L;
Q : Finalizable_Ptr;
- type Fake_Exception_Occurence is record
+ type Fake_Exception_Occurrence is record
Id : Exception_Id;
end record;
- type Ptr is access all Fake_Exception_Occurence;
+ type Ptr is access all Fake_Exception_Occurrence;
function To_Ptr is new
Ada.Unchecked_Conversion (Exception_Occurrence_Access, Ptr);