Revert part of r147883 that breaks ABI
From-SVN: r147915
This commit is contained in:
parent
634fa334d3
commit
c1df0e1ac5
@ -1,3 +1,9 @@
|
|||||||
|
2009-05-27 Janne Blomqvist <jb@gcc.gnu.org>
|
||||||
|
|
||||||
|
PR fortran/39178
|
||||||
|
* runtime/main.c (store_exe_path): Remove static attribute.
|
||||||
|
* libgfortran.h: Add back store_exe_path prototype.
|
||||||
|
|
||||||
2009-05-27 Thomas Koenig <tkoenig@gcc.gnu.org>
|
2009-05-27 Thomas Koenig <tkoenig@gcc.gnu.org>
|
||||||
|
|
||||||
PR libfortran/40187
|
PR libfortran/40187
|
||||||
|
@ -610,6 +610,9 @@ export_proto(set_args);
|
|||||||
extern void get_args (int *, char ***);
|
extern void get_args (int *, char ***);
|
||||||
internal_proto(get_args);
|
internal_proto(get_args);
|
||||||
|
|
||||||
|
extern void store_exe_path (const char *);
|
||||||
|
export_proto(store_exe_path);
|
||||||
|
|
||||||
extern char * full_exe_path (void);
|
extern char * full_exe_path (void);
|
||||||
internal_proto(full_exe_path);
|
internal_proto(full_exe_path);
|
||||||
|
|
||||||
|
@ -74,7 +74,7 @@ static int please_free_exe_path_when_done;
|
|||||||
|
|
||||||
/* Save the path under which the program was called, for use in the
|
/* Save the path under which the program was called, for use in the
|
||||||
backtrace routines. */
|
backtrace routines. */
|
||||||
static void
|
void
|
||||||
store_exe_path (const char * argv0)
|
store_exe_path (const char * argv0)
|
||||||
{
|
{
|
||||||
#ifndef PATH_MAX
|
#ifndef PATH_MAX
|
||||||
|
Loading…
Reference in New Issue
Block a user