This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [gfortran,patch] Inline remaining allocation/deallocation routines
- From: "François-Xavier Coudert" <fxcoudert at gmail dot com>
- To: "Tobias Burnus" <burnus at net-b dot de>
- Cc: "Richard Guenther" <richard dot guenther at gmail dot com>, "fortran at gcc dot gnu dot org" <fortran at gcc dot gnu dot org>, gcc-patches <gcc-patches at gcc dot gnu dot org>
- Date: Tue, 28 Aug 2007 14:32:02 +0100
- Subject: Re: [gfortran,patch] Inline remaining allocation/deallocation routines
- Dkim-signature: a=rsa-sha1; c=relaxed/relaxed; d=gmail.com; s=beta; h=domainkey-signature:received:received:message-id:date:from:to:subject:cc:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references; b=k2Ya1YLy0Xmf8onrAzErfJFMirWE+ErRmhq06f2Dqcw3Z1P0v6T+BFS6MY3OTdwySAVX3LpzACBeybRGIO3G9zOeB2zpKvMj7Yho0k59LVoRAWYT7083VyVbRGBqruL9ujzrT50WfbUT+Wtupq5J2HwIpdqICKWOz8b0sejztjM=
- Domainkey-signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:message-id:date:from:to:subject:cc:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references; b=S6pEWifX6IP9HhnrnX4vMZBWSsNiu4x2pTdPboQnm8HXlvM5q2NaZ22LzeIcu5Y0FTVwrBY50tx5ksYfpZsgkZi9KTb/XMHyHccwiJSqJbZbeEelz2SmQt2UEH1UChXR8ccyESDXbApBZ6jrVe9D5xzA8iWuBOF/RDpdTLhMdtc=
- References: <19c433eb0708270522m6211e7dx80381c39e8ac9b55@mail.gmail.com> <46D301C3.4040701@net-b.de> <19c433eb0708280458n5eaf9faaq8c2f718aca27f56c@mail.gmail.com> <84fc9c000708280504n3dfaf4e1mb83be9c89ee28210@mail.gmail.com> <46D4226C.1010108@net-b.de>
> Additionally, is there the possibility to mark the
> "_gfortran_os_error()" as a routine having no side effects - or in this
> special case - as not returning?
"Not returning" is already done (trans-decl.c):
gfor_fndecl_os_error =
gfc_build_library_function_decl (get_identifier (PREFIX("os_error")),
void_type_node, 1, pchar_type_node);
/* The runtime_error function does not return. */
TREE_THIS_VOLATILE (gfor_fndecl_os_error) = 1;