aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/adaint.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2011-08-04 10:18:13 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2011-08-04 10:18:13 +0200
commit9534ab171e71fa56c4b384c5984d0d457f2eb55d (patch)
treed0172f181b3e0387bab1071971a969a1d5197954 /gcc/ada/adaint.c
parent5c0e97dd35b7d16366bbae34539edff776f0b43c (diff)
downloadgcc-9534ab171e71fa56c4b384c5984d0d457f2eb55d.zip
gcc-9534ab171e71fa56c4b384c5984d0d457f2eb55d.tar.gz
gcc-9534ab171e71fa56c4b384c5984d0d457f2eb55d.tar.bz2
[multiple changes]
2011-08-04 Yannick Moy <moy@adacore.com> * einfo.adb, einfo.ads (Formal_Proof_On): new flag set on subprogram entities whose body contains an Annotate pragma which forces formal proof on this body. * sem_ch11.adb, sem_ch2.adb, sem_ch3.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb, sem_ch9.adb, sem_res.adb: Adapt call to Mark_Non_ALFA_Subprogram to pass in a message and node. * sem_prag.adb (Analyze_Pragma): add treatment of pragma Annotate (Forma_Proof, On) which sets the flag Formal_Proof_On in the surrounding subprogram. * sem_util.adb, sem_util.ads (Mark_Non_ALFA_Subprogram, Mark_Non_ALFA_Subprogram_Unconditional): if the subprogram being marked as not in ALFA is annotated with Formal_Proof being On, then an error is issued based on the additional parameters for message and node. * snames.ads-tmpl (Name_Formal_Proof): new name for annotation. * gcc-interface/Make-lang.in: Update dependencies. 2011-08-04 Hristian Kirtchev <kirtchev@adacore.com> * exp_ch3.adb (Expand_Freeze_Class_Wide_Type): Do not generate Finalize_Address when CodePeer is enabled. 2011-08-04 Pascal Obry <obry@adacore.com> * adaint.c (__gnat_tmp_name): Use _tempnam() instead of tempnam() as the latter returns a pointer to a static buffer which is deallocated at the end of the routine. From-SVN: r177328
Diffstat (limited to 'gcc/ada/adaint.c')
-rw-r--r--gcc/ada/adaint.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 3d4c50a..b0fd8c5 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -1183,7 +1183,7 @@ __gnat_tmp_name (char *tmp_filename)
directory specified by P_tmpdir in stdio.h if c:\temp does not
exist. The filename will be created with the prefix "gnat-". */
- pname = (char *) tempnam ("c:\\temp", "gnat-");
+ pname = (char *) _tempnam ("c:\\temp", "gnat-");
/* if pname is NULL, the file was not created properly, the disk is full
or there is no more free temporary files */