X-Git-Url: https://oss.titaniummirror.com/gitweb?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fg77.f-torture%2Fexecute%2F5122.f;fp=gcc%2Ftestsuite%2Fg77.f-torture%2Fexecute%2F5122.f;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=bdf955acac92ee6aa33e523239b36832483f1e94;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/testsuite/g77.f-torture/execute/5122.f b/gcc/testsuite/g77.f-torture/execute/5122.f deleted file mode 100644 index bdf955ac..00000000 --- a/gcc/testsuite/g77.f-torture/execute/5122.f +++ /dev/null @@ -1,8 +0,0 @@ - CHARACTER*20 PARTD(6) - INTEGER*2 L - DATA (PARTD(L),L=1,6)/'A','B','C','D','E','F'/ - IF ( PARTD(1) .NE. 'A' .OR. PARTD(2) .NE. 'B' - , .OR. PARTD(3) .NE. 'C' .OR. PARTD(4) .NE. 'D' - , .OR. PARTD(5) .NE. 'E' .OR. PARTD(6) .NE. 'F') - , CALL ABORT - END