Hi,
I’m using the gluttimerfunc to update my graph and I have some problems using it in a recursive subroutine.
PROGRAM MAIN
…
USE timer_update
…
CALL gluttimerfunc(2000_glcuint,timer,0_glcint)
…
END PROGRAM MAIN
MODULE timer_update
IMPLICIT NONE
CONTAINS
RECURSIVE SUBROUTINE timer(selection)
USE opengl_gl
USE opengl_glut
INTEGER(glcint), INTENT(IN OUT) :: selection
CALL update_graph ! Subroutine for updating …
CALL gluttimerfunc(2000_glcuint,timer,0_glcint)
END SUBROUTINE timer
END MODULE timer_update
When the timer is called in the subroutine, the program just crashes !
Is someone have an idea on that ?
Thanks !
PODallaire