Unused Argument Removal fails with classes

use StdIO: all;
use Array: all;

int main ()
{
  print (foo( tof ([1,1,1,1])));
  return 0;
}

float[*] foo (float[*] y)
{
  print (y);
  return y;
}

** 21: Generating Code ...


OOOOOOOPS, your program crashed the compiler 8-((

Please, submit the bug report online at
https://gitlab.sac-home.org/sac-group/sac2c/-/issues.

For your convenience, the compiler has pre-fabricated a bug report
in the file "./error.sacbugreport" !

Besides some infos concerning the compiler version and its
usage it contains the specified source file.

If you want to send that bug report to us, you may simply type
  mail bugs@sac-home.org < error.sacbugreport

If you decide to file a bug on our bug-tracker, please go to
  https://gitlab.sac-home.org/sac-group/sac2c/-/issues.

When filing a bug report, please copy/paste the initial comment section of
the bug report into the plain text comment section of the bug-tracker, and add
the whole bug report file as an attachment.

Abort
-sbs-n142129-> sac2c -V
sac2c 1.3.3-MijasCosta-1175-g9b80b
build-type: RELEASE
built-by: "sbs" at 2024-03-22T10:08:43