summaryrefslogtreecommitdiff
path: root/libgfortran
diff options
context:
space:
mode:
authorjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>2009-05-27 15:22:34 +0000
committerjb <jb@138bc75d-0d04-0410-961f-82ee72b054a4>2009-05-27 15:22:34 +0000
commit82a6565ed268782f3a8b623882406ddf43721110 (patch)
tree3331211769c9579c1bb7a4a0eac15bcf7358bc54 /libgfortran
parentc2d2fbe76d627f6b6438d9491fe8cd79d3a2b3dc (diff)
downloadgcc-82a6565ed268782f3a8b623882406ddf43721110.tar.gz
Revert part of r147883 that breaks ABI
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@147915 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
-rw-r--r--libgfortran/ChangeLog6
-rw-r--r--libgfortran/libgfortran.h3
-rw-r--r--libgfortran/runtime/main.c2
3 files changed, 10 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index d4a34c52475..ebfdf068a91 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -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>
PR libfortran/40187
diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h
index 85b454d1c32..3591fa9c279 100644
--- a/libgfortran/libgfortran.h
+++ b/libgfortran/libgfortran.h
@@ -610,6 +610,9 @@ export_proto(set_args);
extern void get_args (int *, char ***);
internal_proto(get_args);
+extern void store_exe_path (const char *);
+export_proto(store_exe_path);
+
extern char * full_exe_path (void);
internal_proto(full_exe_path);
diff --git a/libgfortran/runtime/main.c b/libgfortran/runtime/main.c
index 6df2775d26e..3f3d4947b26 100644
--- a/libgfortran/runtime/main.c
+++ b/libgfortran/runtime/main.c
@@ -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
backtrace routines. */
-static void
+void
store_exe_path (const char * argv0)
{
#ifndef PATH_MAX