------- Comment #1 from dick dot hendrickson at gmail dot com  2008-01-15 20:49 
-------
Another example in executable code

      MODULE s_TESTS
      IMPLICIT CHARACTER (P)
      CONTAINS
      subroutine simple (u,j1)
      optional ::  j1
      if (present (j1)) stop
      end subroutine
      END MODULE s_TESTS


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34784

Reply via email to