From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugzilla@gcc.gnu.org>
Received: by sourceware.org (Postfix, from userid 48)
	id 1BDC53858404; Sat, 24 Jun 2023 19:16:50 +0000 (GMT)
DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 1BDC53858404
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org;
	s=default; t=1687634211;
	bh=ggykO2RuOzVeglsePyEJtcunBCMVeYxqyd86gojBJCE=;
	h=From:To:Subject:Date:In-Reply-To:References:From;
	b=KQFQjhnnRq8TQTA/buKOOaD1BMz1XHxz5taNg5okcR+D4zOY+UIMmVOELlvn+EXCF
	 SzRcaUSSF+5ZdHznDRXMpoXirqCGvBkVvDxLc4oO0EqOSk1/94osSfH53vubpppFlB
	 yRMXf3/78VD0j1fmCL3td2oB2dQUD6EUdqlqCqBE=
From: "anlauf at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug tree-optimization/110311] [14 Regression] regression in
 tree-optimizer
Date: Sat, 24 Jun 2023 19:16:50 +0000
X-Bugzilla-Reason: CC
X-Bugzilla-Type: changed
X-Bugzilla-Watch-Reason: None
X-Bugzilla-Product: gcc
X-Bugzilla-Component: tree-optimization
X-Bugzilla-Version: 14.0
X-Bugzilla-Keywords: 
X-Bugzilla-Severity: normal
X-Bugzilla-Who: anlauf at gcc dot gnu.org
X-Bugzilla-Status: UNCONFIRMED
X-Bugzilla-Resolution: 
X-Bugzilla-Priority: P3
X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org
X-Bugzilla-Target-Milestone: 14.0
X-Bugzilla-Flags: 
X-Bugzilla-Changed-Fields: 
Message-ID: <bug-110311-4-pFRyifW1N7@http.gcc.gnu.org/bugzilla/>
In-Reply-To: <bug-110311-4@http.gcc.gnu.org/bugzilla/>
References: <bug-110311-4@http.gcc.gnu.org/bugzilla/>
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/
Auto-Submitted: auto-generated
MIME-Version: 1.0
List-Id: <gcc-bugs.sourceware.org>

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D110311

--- Comment #23 from anlauf at gcc dot gnu.org ---
You could check the input arguments for validity, e.g. using ieee_is_finite
from the intrinsic ieee_arithmetic module.

  use, intrinsic :: ieee_arithmetic, only: ieee_is_finite

...

  if (.not. ieee_is_finite (a)) then
     print *, "bad: a=3D", a
     stop 1
  end if

As last resort I still recommend what I wrote in comment#15: build (=3Dlink)
your executable from *.o from your project build tree with known-good objec=
ts
but replacing one candidate.o by the one from the build tree showing the
problem.

And I really mean: link only und run.=