[gfortran] Fortran 2003 command line argument intrinsics.

Tobias Schlüter tobias.schlueter@physik.uni-muenchen.de
Thu Jul 8 19:22:00 GMT 2004


This patch introduced two warnings when compiling intrinsic.c.

Paul Brook wrote:
>  
>    add_sym_2 ("getarg", 0, 1, BT_UNKNOWN, 0,
> -	     NULL, NULL, NULL,
> +	     NULL, NULL, gfc_resolve_getarg,
>  	     c, BT_INTEGER, di, 0, vl, BT_CHARACTER, dc, 0);

This should be changed to add_sym_2s ...

> +  add_sym_4 ("get_command_argument", 0, 1, BT_UNKNOWN, 0,
> +	     NULL, NULL, gfc_resolve_get_command_argument,
> +	     num, BT_INTEGER, di, 0,
> +	     val, BT_CHARACTER, dc, 1,
> +	     length, BT_INTEGER, di, 1,
> +	     st, BT_INTEGER, di, 1);

... and this to add_sym_4s. That function has to be added as well.

I don't have a clean tree currently, otherwise I would have committed
the obvious fix myself.

- Tobi



More information about the Fortran mailing list