This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: Some experiences with "CASE"


Thanks a lot for your comments!

Regarding my first point: if you believe that a case can be made for the thinsg as they are, I see also advantages, though I would have rather expected a warning...

I'm sorry I made such a misleading example for my second point... (see second try). I take it that there is no special provision for extented ASCII characters in the standard, i.e.: this is a bug, right?

Thanks!

Philippe

PS: a better example (I hope!)
!
      PROGRAM Test
!
      CHARACTER ( LEN = 1 ) :: Letter
!
      Letter = "c"
      SELECT CASE ( Letter )
      CASE ( "c", "ç" )
        WRITE ( 6, "(A)" ) "Expected"
      CASE DEFAULT
        WRITE ( 6, "(A)" ) "Surprising"
      END SELECT
!
      END PROGRAM Test
!
PPS: so this lands in the default!


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]