diff options
| -rw-r--r-- | gcc/ada/libgnat/a-cbhase.adb | 2 | ||||
| -rw-r--r-- | gcc/ada/libgnat/a-cbmutr.ads | 2 | ||||
| -rw-r--r-- | gcc/ada/libgnat/a-cborse.adb | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/libgnat/a-cbhase.adb b/gcc/ada/libgnat/a-cbhase.adb index 293d722..75b9667 100644 --- a/gcc/ada/libgnat/a-cbhase.adb +++ b/gcc/ada/libgnat/a-cbhase.adb @@ -1783,7 +1783,7 @@ is -- Read -- ---------- - procedure Read + procedure Read (Stream : not null access Root_Stream_Type'Class; Item : out Reference_Type) is diff --git a/gcc/ada/libgnat/a-cbmutr.ads b/gcc/ada/libgnat/a-cbmutr.ads index a9fb55a..d9a4a9a 100644 --- a/gcc/ada/libgnat/a-cbmutr.ads +++ b/gcc/ada/libgnat/a-cbmutr.ads @@ -333,7 +333,7 @@ private Node : Count_Type'Base := No_Node; end record; - procedure Read + procedure Read (Stream : not null access Root_Stream_Type'Class; Position : out Cursor); for Cursor'Read use Read; diff --git a/gcc/ada/libgnat/a-cborse.adb b/gcc/ada/libgnat/a-cborse.adb index e4a2de8..41f0859 100644 --- a/gcc/ada/libgnat/a-cborse.adb +++ b/gcc/ada/libgnat/a-cborse.adb @@ -908,7 +908,7 @@ is -- Read -- ---------- - procedure Read + procedure Read (Stream : not null access Root_Stream_Type'Class; Item : out Reference_Type) is |