[Patch, libgfortran] Add const restrict to intrinsic functions

Thomas Koenig Thomas.Koenig@online.de
Sat Nov 26 14:57:00 GMT 2005


On Sat, Nov 26, 2005 at 02:58:30PM +0200, Janne Blomqvist wrote:
> Hi,
> 
> the attached patch adds const restrict to the arguments for the
> intrinsic functions in the m4/ directory.

I believe this is incorrect for cases like eoshift1, which has:

  if (ret->data == NULL)
    {
      int i;

      ret->data = internal_malloc_size (size * size0 ((array_t *)array));
      ret->offset = 0;
      ret->dtype = array->dtype;

You can't declare ret as "const" in this case.

	Thomas



More information about the Fortran mailing list