From nobody Sat Dec 11 07:09:30 2021
X-Original-To: freebsd-questions@mlmmj.nyi.freebsd.org
Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2610:1c1:1:606c::19:1])
	by mlmmj.nyi.freebsd.org (Postfix) with ESMTP id 15E3918CDE60
	for <freebsd-questions@mlmmj.nyi.freebsd.org>; Sat, 11 Dec 2021 07:09:39 +0000 (UTC)
	(envelope-from SRS0=Ikmx=Q4=lafn.org=bc979@sermon-archive.info)
Received: from mail.sermon-archive.info (sermon-archive.info [47.181.130.121])
	by mx1.freebsd.org (Postfix) with ESMTP id 4J9zRP5nwXz3M3C
	for <freebsd-questions@freebsd.org>; Sat, 11 Dec 2021 07:09:37 +0000 (UTC)
	(envelope-from SRS0=Ikmx=Q4=lafn.org=bc979@sermon-archive.info)
Received: from smtpclient.apple (unknown [10.0.1.5])
	by mail.sermon-archive.info (Postfix) with ESMTPSA id 4J9zRG6Kw7z2fjVS
	for <freebsd-questions@freebsd.org>; Fri, 10 Dec 2021 23:09:30 -0800 (PST)
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
From: Doug Hardie <bc979@lafn.org>
List-Id: User questions <freebsd-questions.freebsd.org>
List-Archive: https://lists.freebsd.org/archives/freebsd-questions
List-Help: <mailto:questions+help@freebsd.org>
List-Post: <mailto:questions@freebsd.org>
List-Subscribe: <mailto:questions+subscribe@freebsd.org>
List-Unsubscribe: <mailto:questions+unsubscribe@freebsd.org>
Sender: owner-freebsd-questions@freebsd.org
X-BeenThere: freebsd-questions@freebsd.org
Mime-Version: 1.0 (1.0)
Subject: Fortran exceptions
Message-Id: <2A944692-2C5A-4AF0-9E26-34C2142C5E3E@lafn.org>
Date: Fri, 10 Dec 2021 23:09:30 -0800
To: freebsd-questions@freebsd.org
X-Mailer: iPad Mail (19B74)
X-Virus-Scanned: clamav-milter 0.103.3 at mail
X-Virus-Status: Clean
X-Rspamd-Queue-Id: 4J9zRP5nwXz3M3C
X-Spamd-Bar: /
Authentication-Results: mx1.freebsd.org;
	dkim=none;
	dmarc=none;
	spf=pass (mx1.freebsd.org: domain of "SRS0=Ikmx=Q4=lafn.org=bc979@sermon-archive.info" designates 47.181.130.121 as permitted sender) smtp.mailfrom="SRS0=Ikmx=Q4=lafn.org=bc979@sermon-archive.info"
X-Spamd-Result: default: False [-0.37 / 15.00];
	 RCVD_VIA_SMTP_AUTH(0.00)[];
	 ARC_NA(0.00)[];
	 FROM_HAS_DN(0.00)[];
	 MV_CASE(0.50)[];
	 TO_MATCH_ENVRCPT_ALL(0.00)[];
	 MIME_GOOD(-0.10)[text/plain];
	 PREVIOUSLY_DELIVERED(0.00)[freebsd-questions@freebsd.org];
	 TO_DN_NONE(0.00)[];
	 NEURAL_SPAM_MEDIUM(1.00)[0.998];
	 RCPT_COUNT_ONE(0.00)[1];
	 NEURAL_HAM_LONG(-1.00)[-1.000];
	 DMARC_NA(0.00)[lafn.org: no valid DMARC record];
	 R_SPF_ALLOW(-0.20)[+ip4:47.181.130.121];
	 NEURAL_HAM_SHORT(-0.97)[-0.973];
	 FORGED_SENDER(0.30)[bc979@lafn.org,SRS0=Ikmx=Q4=lafn.org=bc979@sermon-archive.info];
	 RCVD_NO_TLS_LAST(0.10)[];
	 R_DKIM_NA(0.00)[];
	 MIME_TRACE(0.00)[0:+];
	 ASN(0.00)[asn:5650, ipnet:47.181.128.0/18, country:US];
	 FROM_NEQ_ENVFROM(0.00)[bc979@lafn.org,SRS0=Ikmx=Q4=lafn.org=bc979@sermon-archive.info];
	 MID_RHS_MATCH_FROM(0.00)[];
	 RCVD_COUNT_TWO(0.00)[2]
X-ThisMailContainsUnwantedMimeParts: N

=EF=BB=BFI have a fairly large fortran program that I am trying to run on fl=
ang.  It almost works, but I am sure there are a few typos in it.  I had to e=
nter it by hand from a large listing.  When it encounters a STOP, it display=
s several ieee exception messages.  Unfortunately there is no way to identif=
y where those occurred.  How can I get the runtime to stop when an exception=
 occurs.  This is on FreeBSD 13.0 release with whatever flang is in the port=
s.

-- Doug=