From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 6553 invoked by alias); 9 Jan 2003 20:27:39 -0000 Mailing-List: contact gcc-help-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-help-owner@gcc.gnu.org Received: (qmail 6522 invoked from network); 9 Jan 2003 20:27:38 -0000 Received: from unknown (HELO book.moene.indiv.nluug.nl) (195.109.255.217) by 209.249.29.67 with SMTP; 9 Jan 2003 20:27:38 -0000 Received: from local ([127.0.0.1] helo=moene.indiv.nluug.nl) by book.moene.indiv.nluug.nl with esmtp (Exim 3.36 #1 (Debian)) id 18WjHx-0002tV-00; Thu, 09 Jan 2003 21:28:29 +0100 Message-ID: <3E1DDB6C.1070508@moene.indiv.nluug.nl> Date: Thu, 09 Jan 2003 20:27:00 -0000 From: Toon Moene Organization: Moene Computational Physics, Maartensdijk, The Netherlands User-Agent: Mozilla/5.0 (X11; U; Linux ppc; en-US; rv:1.0.0) Gecko/20020622 Debian/1.0.0-0.woody.1 MIME-Version: 1.0 To: s chatterjee CC: gcc-help@gcc.gnu.org Subject: Re: Help with fortran output file References: <20030109181841.50954.qmail@web14401.mail.yahoo.com> Content-Type: multipart/mixed; boundary="------------060504030803030601020209" X-SW-Source: 2003-01/txt/msg00081.txt.bz2 This is a multi-part message in MIME format. --------------060504030803030601020209 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit Content-length: 576 s chatterjee wrote: > I want to append the output of a g77 compiled fortran > program to the contents of an existing file, (so that > the existing file is not overwritten), is there any > way of doing this? The attached program will append the string "aap" to the file fort.1 every time when run: -- Toon Moene - mailto:toon@moene.indiv.nluug.nl - phoneto: +31 346 214290 Saturnushof 14, 3738 XG Maartensdijk, The Netherlands Maintainer, GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html Join GNU Fortran 95: http://g95.sourceforge.net/ (under construction) --------------060504030803030601020209 Content-Type: text/plain; name="append.f" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="append.f" Content-length: 86 open(1,access="append") write(1,"(A)") "aap" close(1) end --------------060504030803030601020209--