Re: calling C from fortran

On 23 juil, 16:06, rudra <bnrj.ru...@[EMAIL PROTECTED]
> wrote:
> dear fj, while i am running the code by c-p your code, i am getting
> error promp:
>
> $ gcc -c operating_system.c
> $ gfortran test.f90 operating_system.o
> test.f90:6.24:
>
>        USE iso_c_binding
>                        1
> test.f90:5.31:
>
> BIND(C,name="operating_system")
>                               2
> Error: USE statement at (1) cannot follow attribute declaration
> statement at (2)
> test.f90:7.15:
>
>        INTEGER(C_INT) :: r
>               1
> Error: Parameter 'c_int' at (1) has not been declared or is a
> variable, which does not reduce to a constant expression
> test.f90:13.6:
>
>   bit=operating_system()
>      1
> f951: internal compiler error: Segmentation fault
> Please submit a full bug re****t,
> with preprocessed source if appropriate.
> See <http://gcc.gnu.org/bugs.html>
for instructions.
>
> while gfortran is 4.4    ....will you plz check thes?

As explained by James, the lines
      FUNCTION operating_system() RESULT(r)
and
      BIND(C,name="operating_system")

should compose a single instruction (and then a single line) : the
editor has unfortunately wrapped  that single instruction into two
lines ...

So merge them together and the program will work (I have already
tested it).