11c8f199fSFaris Rehman! RUN: %flang -E %s 2>&1 | FileCheck %s 2089adc33Speter klausler! CHECK-NOT:z = 111 3*82d7a6b2SPeter Klausler! CHECK:warning: Statement should not begin with a continuation line 4*82d7a6b2SPeter Klausler! CHECK:j=111+444 5*82d7a6b2SPeter Klausler* #define directive amid continuations. 6*82d7a6b2SPeter Klausler integer, parameter :: KWM = 222 764ab3302SCarolineConcatto integer, parameter :: z = KWM 864ab3302SCarolineConcatto#define KWM 111 9*82d7a6b2SPeter Klausler ,j=KWM+444 10*82d7a6b2SPeter Klausler if (z .EQ. 222 .AND. j .EQ. 555) then 11089adc33Speter klausler print *, 'yes' 1264ab3302SCarolineConcatto else 13*82d7a6b2SPeter Klausler print *, 'no', z, _4 1464ab3302SCarolineConcatto end if 1564ab3302SCarolineConcatto end 16