aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/libgnat/i-cpoint.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/libgnat/i-cpoint.adb')
-rw-r--r--gcc/ada/libgnat/i-cpoint.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/libgnat/i-cpoint.adb b/gcc/ada/libgnat/i-cpoint.adb
index 40a5834..994e639 100644
--- a/gcc/ada/libgnat/i-cpoint.adb
+++ b/gcc/ada/libgnat/i-cpoint.adb
@@ -148,7 +148,7 @@ package body Interfaces.C.Pointers is
S : Pointer := Source;
begin
- if Source = null or Target = null then
+ if Source = null or else Target = null then
raise Dereference_Error;
end if;