diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 12:58:36 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 12:58:36 +0000 |
| commit | 6894bd1184d1745ab649692cfbfdfec1a1a35207 (patch) | |
| tree | 82f946d7a522f6e2961f7069d46d6be7ac08d70b /gcc/ada/s-stalib.adb | |
| parent | 75cdd066e9cf1d0950efefebb16f384567e75931 (diff) | |
| download | gcc-6894bd1184d1745ab649692cfbfdfec1a1a35207.tar.gz | |
2011-08-04 Emmanuel Briot <briot@adacore.com>
* makeutl.adb (Complete_Mains): if the user has passed a relative file
name on the command line (for instance "../dummy"), never assume it can
be a unit name.
2011-08-04 Tristan Gingold <gingold@adacore.com>
* bindgen.adb: Remove code the reference or create the
Break_Start/__gnat_break_start procedure.
* s-stalib.adb (Break_Start): Removed.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177374 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-stalib.adb')
| -rw-r--r-- | gcc/ada/s-stalib.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/s-stalib.adb b/gcc/ada/s-stalib.adb index ffea8d008cd..ba83b8d9cdc 100644 --- a/gcc/ada/s-stalib.adb +++ b/gcc/ada/s-stalib.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1995-2009, Free Software Foundation, Inc. -- +-- Copyright (C) 1995-2011, 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- -- @@ -94,7 +94,8 @@ package body System.Standard_Library is pragma Export (C, Break_Start, "__gnat_break_start"); -- This is a dummy procedure that is called at the start of execution. -- Its sole purpose is to provide a well defined point for the placement - -- of a main program breakpoint. + -- of a main program breakpoint. This is not used anymore but kept for + -- bootstrapping issues (still referenced by old gnatbind generated files). procedure Break_Start is begin |