diff options
Diffstat (limited to 'src/grt/grt-errors.adb')
-rw-r--r-- | src/grt/grt-errors.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/grt/grt-errors.adb b/src/grt/grt-errors.adb index 29da112..66dfbf1 100644 --- a/src/grt/grt-errors.adb +++ b/src/grt/grt-errors.adb @@ -259,4 +259,9 @@ package body Grt.Errors is begin Error ("overflow detected"); end Grt_Overflow_Error; + + procedure Grt_Null_Access_Error is + begin + Error ("NULL access dereferenced"); + end Grt_Null_Access_Error; end Grt.Errors; |