gcc/ada/
* libgnat/g-alleve.adb (Bit_Operation): Now a not-null type.
* libgnat/g-sechas.adb (Fill_Buffer_Access): Likewise.
* libgnat/s-dwalin.adb (Callback): Likewise.
pragma Convention (LL_Altivec, vspltisx);
type Bit_Operation is
- access function
+ not null access function
(Value : Component_Type;
Amount : Natural) return Component_Type;
"0123456789abcdef";
type Fill_Buffer_Access is
- access procedure
+ not null access procedure
(M : in out Message_State;
SEA : Stream_Element_Array;
First : Stream_Element_Offset;
Code : uint32) return String;
-- Extract a file name from the prologue
- type Callback is access procedure (C : in out Dwarf_Context);
+ type Callback is not null access procedure (C : in out Dwarf_Context);
procedure For_Each_Row (C : in out Dwarf_Context; F : Callback);
-- Traverse each .debug_line entry with a callback