]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/testsuite/g77.f-torture/compile/20000630-2.f
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / testsuite / g77.f-torture / compile / 20000630-2.f
diff --git a/gcc/testsuite/g77.f-torture/compile/20000630-2.f b/gcc/testsuite/g77.f-torture/compile/20000630-2.f
deleted file mode 100644 (file)
index 623a29a..0000000
+++ /dev/null
@@ -1,9 +0,0 @@
-      SUBROUTINE CHOUT(CHR,ICNT)
-C ICE: failed assertion `expr != NULL'
-C Reduced version of GNATS PR fortran/329 from trond.bo@dnmi.no
-      INTEGER CHR(ICNT)
-      CHARACTER*255 BUF
-      BUF(1:1)=CHAR(CHR(1))
-      CALL FPUTC(1,BUF(1:1))
-      RETURN
-      END