aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/env.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2010-06-22 18:57:01 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2010-06-22 18:57:01 +0200
commitea7f928bd69b0eaa870748848fe553876e4a1ace (patch)
tree884a1bbbf8c2279c1865ee83e881dcb0d56ebb3c /gcc/ada/env.c
parentbb10b89181d4ad48e5dd82cf9d7c845c6206c08b (diff)
downloadgcc-ea7f928bd69b0eaa870748848fe553876e4a1ace.zip
gcc-ea7f928bd69b0eaa870748848fe553876e4a1ace.tar.gz
gcc-ea7f928bd69b0eaa870748848fe553876e4a1ace.tar.bz2
[multiple changes]
2010-06-22 Ed Schonberg <schonberg@adacore.com> * cstand.adb: Add tree nodes for pragma Pack on string types. 2010-06-22 Javier Miranda <miranda@adacore.com> * einfo.ads, einfo.adb (Last_Formal): New synthesized attribute. * exp_util.adb (Find_Prim_Op): Use new attribute to locate the last formal of a primitive. * exp_disp.adb (Is_Predefined_Dispatching_Operation, Is_Predefined_Dispatching_Alias): Use new attribute to locate the last formal of a primitive. * exp_cg.adb (Is_Predefined_Dispatching_Operation): Use new attribute to obtain the last formal of a primitive. 2010-06-22 Geert Bosch <bosch@adacore.com> * sysdep.c, init.c, adaint.c, cstreams.c: Remove conditional code depending on __EMX__ or MSDOS being defined. * i-cstrea.ads, gnat_rm.texi: Remove mentions of OS/2, DOS and Xenix. * a-excpol-abort.adb: Update comment indicating users of the file. * xref_lib.adb, sfn_scan.adb: Remove mention of OS/2, replace NT by Windows. * env.c: Remove empty conditional for MSDOS. * s-stchop.adb, g-dirope.ads, s-fileio.adb, osint.ads: Remove mention of OS/2 in comment. From-SVN: r161205
Diffstat (limited to 'gcc/ada/env.c')
-rw-r--r--gcc/ada/env.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/gcc/ada/env.c b/gcc/ada/env.c
index c8b49eb..c53678a 100644
--- a/gcc/ada/env.c
+++ b/gcc/ada/env.c
@@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
- * Copyright (C) 2005-2009, Free Software Foundation, Inc. *
+ * Copyright (C) 2005-2010, Free Software Foundation, Inc. *
* *
* GNAT is free software; you can redistribute it and/or modify it under *
* terms of the GNU General Public License as published by the Free Soft- *
@@ -107,9 +107,7 @@ typedef struct _ile3
void
__gnat_setenv (char *name, char *value)
{
-#ifdef MSDOS
-
-#elif defined (VMS)
+#if defined (VMS)
struct descriptor_s name_desc;
/* Put in JOB table for now, so that the project stuff at least works. */
struct descriptor_s table_desc = {7, 0, "LNM$JOB"};