org.eclipse.photran.core.vpg.tests/parser-test-code/reg_tests/bug329745a2.F90

program test_preprocessor
    implicit none

#   ifdef __linux
     character, parameter :: sep = '/'
#   else
     character, parameter :: sep = '\'
#   endif

end program test_preprocessor