Parameters of get_im_info$

According to manual, WIDTH, **HEIGHT **and **NB_COLOURS **parameters of get_im_info@ should be integer arrays. However, in clrwin$ these parameters (in get_im_info$) are declared as integer. Therefore, third party compilers complain about array arguments and return an error. It would be great, if you could fix this issue.

Maybe I didn't explain the problem properly. Here is the syntax of the GET_IM_INFO@ subroutine:

SUBROUTINE GET_IM_INFO@( FILENAME, WIDTH, HEIGHT
+  NB_COLOURS, NB_IMAGES, FORMAT, ERROR )
 CHARACTER(*) FILENAME,FORMAT
 INTEGER WIDTH(n), HEIGHT(n), NB_COLOURS(n)
 INTEGER NB_IMAGES, ERROR

However, in the clrwin.f95 the corresponding syntax is:

subroutine get_im_info$(filename,width,height,nb_colours,nb_images,format,ercode)
  use ISO_C_BINDING
  character(len=*)::filename,format
  integer(C_INT)::width,height,nb_colours,nb_images,ercode

As it can be seen, WIDTH, HEIGHT and NB_COLOURS have different declaration in these subroutines.

moji

Thanks for the feedback. I have made a note that this needs fixing.

In the meantime do you know how to fix it in your copy of clrwin.f95?

Thank you so much. In **get_im_info$ **and get_im_info$$, I just changed the declaration to:

integer(C_INT)::width(*),height(*),nb_colours(*)

I guess that should do the work.