X-Recipient: archive-cygwin AT delorie DOT com
DomainKey-Signature: a=rsa-sha1; c=nofws; d=sourceware.org; h=list-id
	:list-unsubscribe:list-subscribe:list-archive:list-post
	:list-help:sender:reply-to:subject:to:references:from:message-id
	:date:mime-version:in-reply-to:content-type
	:content-transfer-encoding; q=dns; s=default; b=xH2uvKRNBjH8DXf0
	iyJZmXI3LEpmlUL09iOzRtzOpf/iRKYlF4ujvqtgen94ff6LgzUzSVTkdgE17Rcf
	Q3wmiYxjOyZ493Mu0OxjRjXaffGrZfQINdT/rexF3lRfVTBvg80z5rA9M0roO3QR
	3plOBHp0OkjNJ85xTpJjgDm/Ekw=
DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=sourceware.org; h=list-id
	:list-unsubscribe:list-subscribe:list-archive:list-post
	:list-help:sender:reply-to:subject:to:references:from:message-id
	:date:mime-version:in-reply-to:content-type
	:content-transfer-encoding; s=default; bh=xs3y8U+jJJ8upBrADsLvPb
	k9WJ4=; b=obdI/1tfeLOSIpDMtZXSeXgKYEpVQRb2qWD9gxm2MYFSlIrtXHy6jB
	zG81So2HHsxLy8xhWMrme8DlNHPNsQXPAIX56Yap0lxNald4DDaVWxe/Jj2Bsui2
	4IBXW6439KKhWSuHZxRK4W2lAE4Fpx4p4PS/mu0cA9TZtaAh9SrPs=
Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Id: <cygwin.cygwin.com>
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sourceware.org/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sourceware.org/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com
Authentication-Results: sourceware.org; auth=none
X-Spam-SWARE-Status: No, score=-6.3 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_2,KAM_LAZY_DOMAIN_SECURITY,RCVD_IN_DNSWL_LOW autolearn=ham version=3.3.2 spammy=H*Ad:D*ca
X-HELO: smtp-out-no.shaw.ca
Reply-To: Brian DOT Inglis AT SystematicSw DOT ab DOT ca
Subject: Re: gfortran console I/O quit working
To: cygwin AT cygwin DOT com
References: <MWHPR06MB25910167CD750F7BF8D45DABBA220 AT MWHPR06MB2591 DOT namprd06 DOT prod DOT outlook DOT com>
From: Brian Inglis <Brian DOT Inglis AT SystematicSw DOT ab DOT ca>
Openpgp: preference=signencrypt
Message-ID: <22e20491-5132-5c10-15f7-58cbb94ea36d@SystematicSw.ab.ca>
Date: Fri, 3 Aug 2018 23:42:22 -0600
User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64; rv:52.0) Gecko/20100101 Thunderbird/52.9.1
MIME-Version: 1.0
In-Reply-To: <MWHPR06MB25910167CD750F7BF8D45DABBA220@MWHPR06MB2591.namprd06.prod.outlook.com>
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 7bit
X-IsSubscribed: yes

On 2018-08-03 22:30, Randy Dawson wrote:
> I recently upgraded/re-installed, and the following example used to work.
> uname reports:
> CYGWIN_NT-10.0
> -------------------------------
>          program test
>         write(6,700)
> 700     format('hello from write')
>         print *, 'hello from print'
>         end
> No compile errors with gfortran (gcc version 7.3.0)

To be compliant, you should start your format with "1x,".

Please show commands and output for compiling and running e.g.:

$ uname -a
CYGWIN_NT-10.0 TEST-F 2.10.0(0.325/5/3) 2018-02-02 15:16 x86_64 Cygwin
$ cat > test.f
	program test

	write(6,700)
700	format('hello from write')
	print *, 'hello from print'

	end
$ cat test.f
	program test

	write(6,700)
700	format('hello from write')
	print *, 'hello from print'

	end
$ gfortran --version
GNU Fortran (GCC) 7.3.0
Copyright (C) 2017 Free Software Foundation, Inc.
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
$ gfortran -g -Og -Wall -Wextra -o test test.f
f951: Warning: Nonconforming tab character in column 1 of line 1 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 3 [-Wtabs]
f951: Warning: Nonconforming tab character in column 4 of line 4 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 5 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 7 [-Wtabs]
$ ./test
hello from write
 hello from print
$

To provide good problem reports, please read and follow:

       http://cygwin.com/problems.html

mentioned below.

-- 
Take care. Thanks, Brian Inglis, Calgary, Alberta, Canada

--
Problem reports:       http://cygwin.com/problems.html
FAQ:                   http://cygwin.com/faq/
Documentation:         http://cygwin.com/docs.html
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple