[Fortran-Experiments]: patch
Christopher D. Rickett
crickett@lanl.gov
Tue Mar 6 18:19:00 GMT 2007
>> ! Warning printed twice:
>> ! Variable 'glutcreatemenu' at (1) may not be a C interoperable kind but it
>> is bind(c)
>> MODULE OpenGL_glut
>> IMPLICIT NONE
>> INTERFACE
>> FUNCTION glutCreateMenu(func) BIND(C,NAME="glutCreateMenu")
>> use iso_c_binding
>> INTEGER :: glutCreateMenu ! <<<< two warnings
>> INTERFACE
>> SUBROUTINE func()! <<<<<< no warning
>> END SUBROUTINE func
>> END INTERFACE
>> END FUNCTION glutCreateMenu
>> END INTERFACE
>> END MODULE OpenGL_glut
>>
>> -----------------
>
> i'll look into why it's being duplicated and why the warning for func is not
> printed. should be a simple fix.
>
this should be fixed in my next patch. the compiler was finding the error
but was not reporting it. this now reports an error because func does not
have the BIND(C) attribute and needs it to be C interoperable and one
warning for glutCreateMenu.
Chris
More information about the Fortran
mailing list