diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-06-11 17:48:14 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-06-11 17:48:14 +0200 |
| commit | 2995ebee5c855f27f2c0c99eb6c58577f85dec28 (patch) | |
| tree | 19753f5474920d21f293504fc129ecc940941eac /gcc/ada/tracebak.c | |
| parent | 6be6462e0081b3eef6628546fc4f7648db62c6c4 (diff) | |
| download | gcc-2995ebee5c855f27f2c0c99eb6c58577f85dec28.zip gcc-2995ebee5c855f27f2c0c99eb6c58577f85dec28.tar.gz gcc-2995ebee5c855f27f2c0c99eb6c58577f85dec28.tar.bz2 | |
[multiple changes]
2009-06-11 Ed Schonberg <schonberg@adacore.com>
* sem_attr.adb (Resolve_Attribute, case 'access): Add missing
accessibiliy check on access_to_subprogram in the context of an
anonymous access that is not an access parameter.
2009-06-11 Eric Botcazou <ebotcazou@adacore.com>
* tracebak.c (i386 section): Define IS_BAD_PTR on Solaris.
2009-06-11 Quentin Ochem <ochem@adacore.com>
* sem_warn.adb, scng.adb, sfn_scan.adb, freeze.adb: Add CODEFIX
comments for message handled by GPS.
2009-06-11 Matthew Gingell <gingell@adacore.com>
* adaint.c: Use fopen64 instead of fopen on platforms where we know
it's supported.
2009-06-11 Pascal Obry <obry@adacore.com>
* g-cgi.ads: Fix comment typo.
* g-cgi.adb: Properly decode "+" in CGI parameters as spaces.
From-SVN: r148392
Diffstat (limited to 'gcc/ada/tracebak.c')
| -rw-r--r-- | gcc/ada/tracebak.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/tracebak.c b/gcc/ada/tracebak.c index 8f3c4cc..63f93b3 100644 --- a/gcc/ada/tracebak.c +++ b/gcc/ada/tracebak.c @@ -6,7 +6,7 @@ * * * C Implementation File * * * - * Copyright (C) 2000-2008, AdaCore * + * Copyright (C) 2000-2009, AdaCore * * * * 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- * @@ -294,9 +294,11 @@ struct layout #elif defined (i386) -#ifdef __WIN32 +#if defined (__WIN32) #include <windows.h> #define IS_BAD_PTR(ptr) (IsBadCodePtr((void *)ptr)) +#elif defined (sun) +#define IS_BAD_PTR(ptr) ((unsigned long)ptr == -1) #else #define IS_BAD_PTR(ptr) 0 #endif |