From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 26413 invoked by alias); 11 Jun 2011 10:06:15 -0000 Received: (qmail 26396 invoked by uid 22791); 11 Jun 2011 10:06:14 -0000 X-SWARE-Spam-Status: No, hits=-2.4 required=5.0 tests=AWL,BAYES_00,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,FREEMAIL_FROM,RCVD_IN_DNSWL_LOW,RFC_ABUSE_POST X-Spam-Check-By: sourceware.org Received: from mail-pz0-f47.google.com (HELO mail-pz0-f47.google.com) (209.85.210.47) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Sat, 11 Jun 2011 10:05:57 +0000 Received: by pzk36 with SMTP id 36so1659443pzk.20 for ; Sat, 11 Jun 2011 03:05:56 -0700 (PDT) MIME-Version: 1.0 Received: by 10.68.14.226 with SMTP id s2mr1335190pbc.252.1307786756580; Sat, 11 Jun 2011 03:05:56 -0700 (PDT) Received: by 10.68.58.225 with HTTP; Sat, 11 Jun 2011 03:05:56 -0700 (PDT) Date: Sat, 11 Jun 2011 10:22:00 -0000 Message-ID: Subject: [Patch, libfortran] PR 49296 List read of file without EOR From: Janne Blomqvist To: Fortran List , GCC Patches Content-Type: multipart/mixed; boundary=bcaec520edad11657104a56cd5b8 Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org X-SW-Source: 2011-06/txt/msg00898.txt.bz2 --bcaec520edad11657104a56cd5b8 Content-Type: text/plain; charset=UTF-8 Content-length: 312 Hi, attached patch fixes PR 49296. A new test for the testsuite is also included. Regtested on x86_64-unknown-linux-gnu, Ok for trunk? 2011-06-11 Janne Blomqvist PR libfortran/49296 * io/list_read.c (read_character): Accept EOF as a separator when reading string. -- Janne Blomqvist --bcaec520edad11657104a56cd5b8 Content-Type: text/x-patch; charset=US-ASCII; name="read_list_eof.diff" Content-Disposition: attachment; filename="read_list_eof.diff" Content-Transfer-Encoding: base64 X-Attachment-Id: f_goseew3c0 Content-length: 1525 ZGlmZiAtLWdpdCBhL2xpYmdmb3J0cmFuL2lvL2xpc3RfcmVhZC5jIGIvbGli Z2ZvcnRyYW4vaW8vbGlzdF9yZWFkLmMKaW5kZXggMzhhOTJlMS4uYmFmMmY1 NCAxMDA2NDQKLS0tIGEvbGliZ2ZvcnRyYW4vaW8vbGlzdF9yZWFkLmMKKysr IGIvbGliZ2ZvcnRyYW4vaW8vbGlzdF9yZWFkLmMKQEAgLTEwMjIsNyArMTAy Miw3IEBAIHJlYWRfY2hhcmFjdGVyIChzdF9wYXJhbWV0ZXJfZHQgKmR0cCwg aW50IGxlbmd0aCBfX2F0dHJpYnV0ZV9fICgodW51c2VkKSkpCiAgIGZvciAo OzspCiAgICAgewogICAgICAgaWYgKChjID0gbmV4dF9jaGFyIChkdHApKSA9 PSBFT0YpCi0JZ290byBlb2Y7CisJZ290byBkb25lX2VvZjsKICAgICAgIHN3 aXRjaCAoYykKIAl7CiAJY2FzZSAnIic6CkBAIC0xMDY4LDI2ICsxMDY4LDI2 IEBAIHJlYWRfY2hhcmFjdGVyIChzdF9wYXJhbWV0ZXJfZHQgKmR0cCwgaW50 IGxlbmd0aCBfX2F0dHJpYnV0ZV9fICgodW51c2VkKSkpCiAgICAgIGludmFs aWQuICAqLwogIGRvbmU6CiAgIGMgPSBuZXh0X2NoYXIgKGR0cCk7Ci0gZW9m OgotICBpZiAoaXNfc2VwYXJhdG9yIChjKSB8fCBjID09ICchJykKKyBkb25l X2VvZjoKKyAgaWYgKGlzX3NlcGFyYXRvciAoYykgfHwgYyA9PSAnIScgfHwg YyA9PSBFT0YpCiAgICAgewogICAgICAgdW5nZXRfY2hhciAoZHRwLCBjKTsK ICAgICAgIGVhdF9zZXBhcmF0b3IgKGR0cCk7CiAgICAgICBkdHAtPnUucC5z YXZlZF90eXBlID0gQlRfQ0hBUkFDVEVSOwogICAgICAgZnJlZV9saW5lIChk dHApOwogICAgIH0KLSAgZWxzZQorICBlbHNlIAogICAgIHsKICAgICAgIGZy ZWVfc2F2ZWQgKGR0cCk7Ci0gICAgICBpZiAoYyA9PSBFT0YpCi0JewotCSAg aGl0X2VvZiAoZHRwKTsKLQkgIHJldHVybjsKLQl9CiAgICAgICBzbnByaW50 ZiAobWVzc2FnZSwgTVNHTEVOLCAiSW52YWxpZCBzdHJpbmcgaW5wdXQgaW4g aXRlbSAlZCIsCiAJCSAgZHRwLT51LnAuaXRlbV9jb3VudCk7CiAgICAgICBn ZW5lcmF0ZV9lcnJvciAoJmR0cC0+Y29tbW9uLCBMSUJFUlJPUl9SRUFEX1ZB TFVFLCBtZXNzYWdlKTsKICAgICB9CisgIHJldHVybjsKKworIGVvZjoKKyAg ZnJlZV9zYXZlZCAoZHRwKTsKKyAgaGl0X2VvZiAoZHRwKTsKIH0KIAogCg== --bcaec520edad11657104a56cd5b8 Content-Type: text/x-fortran; charset=US-ASCII; name="read_list_eof_1.f90" Content-Disposition: attachment; filename="read_list_eof_1.f90" Content-Transfer-Encoding: base64 X-Attachment-Id: f_gosefawc1 Content-length: 907 ISB7IGRnLWRvIHJ1biB9CiEgUFIgNDkyOTYgTGlzdCBmb3JtYXR0ZWQgcmVh ZCBvZiBmaWxlIHdpdGhvdXQgRU9SIG1hcmtlciAoXG4pLgpwcm9ncmFtIHJl YWRfbGlzdF9lb2ZfMQogIGltcGxpY2l0IG5vbmUKICBpbnRlZ2VyLCBwYXJh bWV0ZXIgOjogc3RybXggPSAyNTUKICBjaGFyYWN0ZXIobGVuPXN0cm14KSA6 OiBzMSwgczIKICBjYWxsIGdlbmZpbCAoKQogIG9wZW4gKHVuaXQ9MjAsIGZp bGU9J3JlYWQuZGF0JywgZm9ybT0nRk9STUFUVEVEJywgYWN0aW9uPSdSRUFE JywgJgogICAgICAgc3RhdHVzPSdPTEQnKQogIHJlYWQgKDIwLCBmbXQ9Kikg czEsIHMyCiAgY2xvc2UgKDIwLCBzdGF0dXM9J2RlbGV0ZScpCiAgaWYgKHRy aW0oczEpIC89ICJhYmNkIiAub3IuIHRyaW0oczIpIC89ICJlZmdoIikgdGhl bgogICAgIGNhbGwgYWJvcnQgKCkKICBlbmQgaWYKCmNvbnRhaW5zCiAgc3Vi cm91dGluZSBnZW5maWwKICAgIG9wZW4oMTAsIGZpbGU9J3JlYWQuZGF0Jywg Zm9ybT0ndW5mb3JtYXR0ZWQnLCBhY3Rpb249J3dyaXRlJywgJgogICAgICAg ICBzdGF0dXM9J3JlcGxhY2UnLCBhY2Nlc3M9J3N0cmVhbScpCiAgICB3cml0 ZSgxMCkgJ2FiY2QgZWZnaCcKICAgIGNsb3NlKDEwKQogIGVuZCBzdWJyb3V0 aW5lIGdlbmZpbAplbmQgcHJvZ3JhbSByZWFkX2xpc3RfZW9mXzEK --bcaec520edad11657104a56cd5b8--