DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org 9A0DA385B835
Subject: Re: cygwin gfortran segfaulting on valid write statements
To: cygwin@cygwin.com
References: <d04d793a-6c8b-7a11-5a9b-5cda1bb86e50.ref@bellsouth.net>
 <d04d793a-6c8b-7a11-5a9b-5cda1bb86e50@bellsouth.net>
 <e7cdd735-aa29-b255-e643-eb35e5f6693d@SystematicSw.ab.ca>
 <af654c15-29f0-144c-9d5b-d49e41713c0b@bellsouth.net>
From: Brian Inglis <Brian.Inglis@SystematicSw.ab.ca>
Autocrypt: addr=Brian.Inglis@SystematicSw.ab.ca; prefer-encrypt=mutual;
 keydata=
 mDMEXopx8xYJKwYBBAHaRw8BAQdAnCK0qv/xwUCCZQoA9BHRYpstERrspfT0NkUWQVuoePa0
 LkJyaWFuIEluZ2xpcyA8QnJpYW4uSW5nbGlzQFN5c3RlbWF0aWNTdy5hYi5jYT6IlgQTFggA
 PhYhBMM5/lbU970GBS2bZB62lxu92I8YBQJeinHzAhsDBQkJZgGABQsJCAcCBhUKCQgLAgQW
 AgMBAh4BAheAAAoJEB62lxu92I8Y0ioBAI8xrggNxziAVmr+Xm6nnyjoujMqWcq3oEhlYGAO
 WacZAQDFtdDx2koSVSoOmfaOyRTbIWSf9/Cjai29060fsmdsDLg4BF6KcfMSCisGAQQBl1UB
 BQEBB0Awv8kHI2PaEgViDqzbnoe8B9KMHoBZLS92HdC7ZPh8HQMBCAeIfgQYFggAJhYhBMM5
 /lbU970GBS2bZB62lxu92I8YBQJeinHzAhsMBQkJZgGAAAoJEB62lxu92I8YZwUBAJw/74rF
 IyaSsGI7ewCdCy88Lce/kdwX7zGwid+f8NZ3AQC/ezTFFi5obXnyMxZJN464nPXiggtT9gN5
 RSyTY8X+AQ==
Organization: Systematic Software
Message-ID: <e298bdcb-eaf8-a32d-117e-4e1e6d877f2f@SystematicSw.ab.ca>
Date: Fri, 17 Apr 2020 19:01:50 -0600
User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64; rv:68.0) Gecko/20100101
 Thunderbird/68.7.0
MIME-Version: 1.0
In-Reply-To: <af654c15-29f0-144c-9d5b-d49e41713c0b@bellsouth.net>
Content-Language: en-CA
Precedence: list
Reply-To: cygwin@cygwin.com
Content-Type: text/plain; charset="utf-8"
Errors-To: cygwin-bounces@cygwin.com
Sender: "Cygwin" <cygwin-bounces@cygwin.com>
Content-Transfer-Encoding: 8bit

On 2020-04-17 17:33, Charles Russell wrote:
> On 4/17/2020 2:46 PM, Brian Inglis wrote:
> 
>> Try running under strace:
>>
>>     $ strace -o prog.strace prog -options... args...
>>
>> or gdb:
>>
>>     $ gdb prog
>>     (gdb) run -options... args...
>>     SEGV diagnostics
>>     (gdb) bt
>>     (gdb) q
>>
>> and attach or paste all output.
> 
> The following is the case where I got an error message. Not actually a segfault.
> (Sorry, I'm not a programmer.) The executable, gdb, and strace all produce the
> same output:
> -----------
> At line 889 of file cgcrez.f (unit = 6, file = 'stdout')
> Fortran runtime error: Missing initial left parenthesis in format
> ^

> Here is the indicated line, using list mode in vim to show that there are no
> unexpected nonprinting characters:
> 
>  887           write(6,'(i6,1p3e9.2,x,e9.2,x,0pf6.3,x,1p2e10.2,''@'')')$
>  888      &       iter, reldf,reldb,$
>  889      &       gnorms, x1min, -cosag, beta(1),beta(np)$
>  890 $
> 
> This code compiled and ran on cygwin in the past, and checks out now in debian
> stable.
> 
> In my other case, which I may or may not be able to find again, the program
> failed with no explicit error message like the one above. Stepping through with
> gdb showed that it was also crashing in a valid write statement.

Do you perhaps need an extra pair of parentheses to repeat the formatted output,
perhaps from the second specifier, as you have 5 variable format specifiers and
8 variables?
Showing a bit more context with all variable declarations would help, and you
can use cat -A (== -vET) to show non-printing characters e.g.

$ egrep -nw 'iter|reldf|reldb|gnorms|x1min|cosag|beta|write' cgcrez.f | cat -A

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

This email may be disturbing to some readers as it contains
too much technical detail. Reader discretion is advised.
--
Problem reports:      https://cygwin.com/problems.html
FAQ:                  https://cygwin.com/faq/
Documentation:        https://cygwin.com/docs.html
Unsubscribe info:     https://cygwin.com/ml/#unsubscribe-simple