* ecoff.c (ecoff_get_cur_proc_sym): New function.

        * ecoff.h: Protoype it.
        * config/tc-alpha.c [ELF] (s_alpha_prologue): New function.
        [EVAX] (s_alpha_prologue): Delete.
        (md_pseudo_table): Update.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 0ef98bc8fa8e0f8d4b003eabfa002f688af4b3eb..419130375fc90079525d2935418e37dfb61fc924 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,11 @@
+Sat Apr 25 20:12:02 1998  Richard Henderson  <rth@cygnus.com>
+
+       * ecoff.c (ecoff_get_cur_proc_sym): New function.
+       * ecoff.h: Protoype it.
+       * config/tc-alpha.c [ELF] (s_alpha_prologue): New function.
+       [EVAX] (s_alpha_prologue): Delete.
+       (md_pseudo_table): Update.
+
 Sat Apr 25 14:00:52 1998  Ian Lance Taylor  <ian@cygnus.com>
 
        * config/tc-i960.c (md_assemble): Change bp_error_msg from static

diff --git a/gas/ecoff.c b/gas/ecoff.c
index f8e538f0f16bbc0c7894c5e4d973adf0167f494e..664edf4dae4f44e0a5e54708c7f3fadf7764a6e3 100644 (file)
--- a/gas/ecoff.c
+++ b/gas/ecoff.c
@@ -2195,6 +2195,12 @@ add_procedure (func)
       noproc_lineno = (lineno_list_t *) NULL;
     }
 }
+
+symbolS *
+ecoff_get_cur_proc_sym ()
+{
+  return (cur_proc_ptr ? cur_proc_ptr->sym->as_sym : NULL);
+}
 \f
 /* Add a new filename, and set up all of the file relative
    virtual arrays (strings, symbols, aux syms, etc.).  Record

diff --git a/gas/ecoff.h b/gas/ecoff.h
index ed0be76171b3dfd44971af96e89d7d4a63dff47f..a99db5a70f4360bbab82fc915baa32998d26a8ea 100644 (file)
--- a/gas/ecoff.h
+++ b/gas/ecoff.h
@@ -1,5 +1,5 @@
 /* ecoff.h -- header file for ECOFF debugging support
-   Copyright (C) 1993, 94, 95, 1996 Free Software Foundation, Inc.
+   Copyright (C) 1993, 94, 95, 96, 1997 Free Software Foundation, Inc.
    Contributed by Cygnus Support.
    Put together by Ian Lance Taylor <ian@cygnus.com>.
 
@@ -103,5 +103,8 @@ extern int ecoff_no_current_file PARAMS ((void));
    file.  */
 extern void ecoff_generate_asm_lineno PARAMS ((const char *, int));
 
+/* This function returns the symbol associated with the current proc.  */
+extern symbolS *ecoff_get_cur_proc_sym PARAMS ((void));
+
 #endif /* ! GAS_ECOFF_H */
 #endif /* ECOFF_DEBUGGING */