From owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org Tue Mar 13 21:52:15 2012 Return-Path: X-Original-To: sc22wg5-dom8 Delivered-To: sc22wg5-dom8@www.open-std.org Received: by www.open-std.org (Postfix, from userid 521) id 924D19DB118; Tue, 13 Mar 2012 21:52:15 +0100 (CET) Delivered-To: sc22wg5@open-std.org Received: from mailrelay1.lrz-muenchen.de (mailrelay1.lrz-muenchen.de [129.187.254.106]) by www.open-std.org (Postfix) with ESMTP id DF7F59DB112 for ; Tue, 13 Mar 2012 21:52:14 +0100 (CET) Received: from postout1.mail.lrz.de ([10.156.6.18] [10.156.6.18]) by mailrelay1.lrz-muenchen.de with ESMTP; Tue, 13 Mar 2012 21:52:09 +0100 Received: from BADWLRZ-SWHBT2.ads.mwn.de (BADWLRZ-SWHBT2.ads.mwn.de [IPv6:2001:4ca0:0:108::126]) (using TLSv1 with cipher AES128-SHA (128/128 bits)) (No client certificate requested) by postout1.mail.lrz.de (Postfix) with ESMTPS id 514E1C5823; Tue, 13 Mar 2012 21:52:09 +0100 (CET) Received: from BADWLRZ-SWMBX1.ads.mwn.de ([fe80::11b4:b130:c4e2:2d0e]) by BADWLRZ-SWHBT2.ads.mwn.de ([fe80::5951:9dc3:7b2b:14ba%13]) with mapi id 14.01.0355.002; Tue, 13 Mar 2012 21:52:09 +0100 From: "Bader, Reinhold" To: John Reid CC: WG5 Subject: AW: (SC22WG5.4635) Part 2 of the standard Thread-Topic: (SC22WG5.4635) Part 2 of the standard Thread-Index: AQHNAVR6MenibGzM7U2DKJIeC9eYcZZos1ng Date: Tue, 13 Mar 2012 20:52:08 +0000 Message-Id: <166ED263DF83324D9A3BA67FB6772B2B47FF8F4B@BADWLRZ-SWMBX1.ads.mwn.de> References: <20120313200407.EBAB39DB112@www.open-std.org> In-Reply-To: <20120313200407.EBAB39DB112@www.open-std.org> Accept-Language: de-DE, en-US Content-Language: de-DE X-MS-Has-Attach: X-MS-TNEF-Correlator: x-originating-ip: [2001:4ca0:0:fe00:200:5efe:129.187.48.245] Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 Sender: owner-sc22wg5@open-std.org Precedence: bulk On Walt's web site there exists a link to a test suite by Lawrie: http://www.fortran.com/vst_95a.zip HTH Reinhold > -----Urspr=FCngliche Nachricht----- > Von: owner-sc22wg5@open-std.org [mailto:owner-sc22wg5@open-std.org] Im > Auftrag von John Reid > Gesendet: Dienstag, 13. M=E4rz 2012 21:04 > An: WG5 > Betreff: (SC22WG5.4635) Part 2 of the standard >=20 > WG5, >=20 > I promised at Garching to look into the conversion to Fortran 2003 of > the procedures of the varying length strings module that are not > included in Part 1 of the Standard. These are the I/O procedures GET, > PUT and PUT_LINE and the substring manipulation procedures EXTRACT, > INSERT, REMOVE, REPLACE, and INSERT. >=20 > I have made a new module that compiles under the Nag compiler but I have > tested it only with new versions of the two example programs that are in > Part 2. >=20 > Most occurrences of > type(VARYING_STRING) > were replaced by > CHARACTER(LEN=3D:),ALLOCATABLE > but > type(VARYING_STRING),INTENT(IN) > was replaced by > CHARACTER(LEN=3D*),INTENT(IN) > This resulted in arguments that were previously documented as either of > type CHARACTER or VARYING_STRING become only of type CHARACTER. The > number of specific procedures reduced from 40 to 15. >=20 > There were obvious mechanical changes needed within the procedures. >=20 > The subroutine SPLIT cannot be elemental because of having an > allocatable argument. Note that all the elements of a character array > have to have the same character length, so this restriction really is > needed. >=20 > A similar problem occurs in the vocabulary test, where an array holds > words of varying length. I got round this by using a linked list. >=20 > This has taken me a day and a bit of work. To get it all tested and > documented will be quite a bit more work, probably at least a week. How > valuable will this be? >=20 > Lawrie, do you have a view? Can you help? For instance, do you have a > test deck for the old code? >=20 > Cheers, >=20 > John.