From 4f91a2557f88fd788380e3059bb7f475418002a6 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Sun, 21 Jun 2009 15:11:41 +0200 Subject: [multiple changes] 2009-06-21 Ed Falis * env.c (__gnat_environ): return NULL for vThreads - unimplemented 2009-06-21 Eric Botcazou * einfo.ads: Update comments. 2009-06-21 Hristian Kirtchev * sem_disp.adb (Check_Direct_Call): New routine. Dispatching calls where the controlling formal is of private class-wide type whose completion is a synchronized type can be converted into direct calls. 2009-06-21 Vincent Celier * gnatcmd.adb (Check_Files): When all sources of the project are to be indicated to gnatcheck, gnatpp or gnatmetric, always specify the list of sources using -files=, so that the distinction can be made by the tool of a call with no source (to display the usage) from a call with a project file that contains no source. 2009-06-21 Jerome Lambourg * exp_ch3.adb (Build_Array_Init_Proc): Do not build the init proc in case of VM convention arrays. From-SVN: r148763 --- gcc/ada/env.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc/ada/env.c') diff --git a/gcc/ada/env.c b/gcc/ada/env.c index e6720e3..bcb8bdb 100644 --- a/gcc/ada/env.c +++ b/gcc/ada/env.c @@ -190,7 +190,7 @@ __gnat_setenv (char *name, char *value) char ** __gnat_environ (void) { -#if defined (VMS) || defined (RTX) +#if defined (VMS) || defined (RTX) || defined (VTHREADS) /* Not implemented */ return NULL; #elif defined (__APPLE__) -- cgit v1.1