[PATCH] algol68: Add ECF_MALLOC attribute to malloc runtime function

[Pietro Monteiro]

On Tue, Apr 29, 2025, at 2:04 AM, Jose E. Marchesi wrote:
> Hi Pietro.
>
> Thanks for the patch.
> OK for both gcc/gcc-a68.

Ready for merging! https://forge.sourceware.org/gcc/gcc-a68/pulls/5

pietro.

>> gcc/algol68/ChangeLog:
>>
>> 	* algol68/a68-low-runtime.def (MALLOC): Add ECF_MALLOC to
>> 	attribute list.
>>
>> Signed-off-by: Pietro Monteiro <pietro@sociotechnical.xyz>
>> ---
>>  gcc/algol68/a68-low-runtime.def | 2 +-
>>  1 file changed, 1 insertion(+), 1 deletion(-)
>>
>> diff --git a/gcc/algol68/a68-low-runtime.def b/gcc/algol68/a68-low-runtime.def
>> index d4abb429d2a..21ec855947d 100644
>> --- a/gcc/algol68/a68-low-runtime.def
>> +++ b/gcc/algol68/a68-low-runtime.def
>> @@ -43,7 +43,7 @@ along with GCC; see the file COPYING3.  If not see
>>  
>>  DEF_A68_RUNTIME (ASSERT, "_libga68_assert", RT(VOID), P2(CONSTCHARPTR, UINT), ECF_NORETURN)
>>  DEF_A68_RUNTIME (SET_EXIT_STATUS, "_libga68_set_exit_status", RT(VOID), P1(INT), 0)
>> -DEF_A68_RUNTIME (MALLOC, "_libga68_malloc", RT(VOIDPTR), P1(SIZE), ECF_NOTHROW | ECF_LEAF)
>> +DEF_A68_RUNTIME (MALLOC, "_libga68_malloc", RT(VOIDPTR), P1(SIZE), ECF_NOTHROW | ECF_LEAF | ECF_MALLOC)
>>  DEF_A68_RUNTIME (DEREFNIL, "_libga68_derefnil", RT(VOID), P2(CONSTCHARPTR, UINT), ECF_NORETURN)
>>  DEF_A68_RUNTIME (UNREACHABLE, "_libga68_unreachable", RT(VOID), P2(CONSTCHARPTR, UINT), ECF_NORETURN)
>>  DEF_A68_RUNTIME (INVALIDCHARERROR, "_libga68_invalidcharerror", RT(VOID), P3(CONSTCHARPTR,UINT,INT), ECF_NORETURN)