[EDIT] FILE: gh23533.f

SUBROUTINE EXAMPLE( ) IF( .TRUE. ) THEN CALL DO_SOMETHING() END IF ! ** .TRUE. ** END
SAVE CANCEL