diff options
Diffstat (limited to 'gcc/ada/get_targ.ads')
| -rw-r--r-- | gcc/ada/get_targ.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/get_targ.ads b/gcc/ada/get_targ.ads index 35cf00d..4b658f1 100644 --- a/gcc/ada/get_targ.ads +++ b/gcc/ada/get_targ.ads @@ -113,7 +113,7 @@ package Get_Targ is type C_String is array (0 .. 255) of aliased Character; pragma Convention (C, C_String); - type Register_Type_Proc is access procedure + type Register_Type_Proc is not null access procedure (C_Name : C_String; -- Nul-terminated string with name of type Digs : Natural; -- Digits for floating point, 0 otherwise Complex : Boolean; -- True iff type has real and imaginary parts |