1! RUN: %f18 -funparse %s 2>&1 | FileCheck %s 2! CHECK: CALL foo("N","N") 3#ifdef transpose 4 call foo('T', 5#else 6 call foo('N', 7#endif 8 $ 'N') 9 end 10