From 2cffb4f4112300b17cc5042f9fcb79f7d7cc7d1f Mon Sep 17 00:00:00 2001
From: Jeff Law <law@redhat.com>
Date: Tue, 16 Aug 1994 07:54:06 +0000
Subject: [PATCH]         * config/tc-hppa.c (pa_comm): Set sy_resolved for the
 common         symbol.

---
 gas/ChangeLog        |  5 +++++
 gas/config/tc-hppa.c | 50 +++++---------------------------------------
 2 files changed, 10 insertions(+), 45 deletions(-)

diff --git a/gas/ChangeLog b/gas/ChangeLog
index aa7b69f60d..ce1545107f 100644
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+Tue Aug 16 01:48:20 1994  Jeff Law  (law@snake.cs.utah.edu)
+
+	* config/tc-hppa.c (pa_comm): Set sy_resolved for the common
+	symbol.
+
 Fri Aug 12 17:51:48 1994  Ian Lance Taylor  (ian@sanguine.cygnus.com)
 
 	* config/tc-mips.c (md_begin): Drop "el" from the end of
diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c
index 397ae6c92c..988edd951f 100644
--- a/gas/config/tc-hppa.c
+++ b/gas/config/tc-hppa.c
@@ -587,95 +587,50 @@ const pseudo_typeS md_pseudo_table[] =
   /* align pseudo-ops on the PA specify the actual alignment requested,
      not the log2 of the requested alignment.  */
   {"align", s_align_bytes, 8},
-  {"ALIGN", s_align_bytes, 8},
   {"block", pa_block, 1},
-  {"BLOCK", pa_block, 1},
   {"blockz", pa_block, 0},
-  {"BLOCKZ", pa_block, 0},
   {"byte", pa_cons, 1},
-  {"BYTE", pa_cons, 1},
   {"call", pa_call, 0},
-  {"CALL", pa_call, 0},
   {"callinfo", pa_callinfo, 0},
-  {"CALLINFO", pa_callinfo, 0},
   {"code", pa_code, 0},
-  {"CODE", pa_code, 0},
   {"comm", pa_comm, 0},
-  {"COMM", pa_comm, 0},
   {"copyright", pa_copyright, 0},
-  {"COPYRIGHT", pa_copyright, 0},
   {"data", pa_data, 0},
-  {"DATA", pa_data, 0},
   {"double", pa_float_cons, 'd'},
-  {"DOUBLE", pa_float_cons, 'd'},
   {"end", pa_end, 0},
-  {"END", pa_end, 0},
   {"enter", pa_enter, 0},
-  {"ENTER", pa_enter, 0},
   {"entry", pa_entry, 0},
-  {"ENTRY", pa_entry, 0},
   {"equ", pa_equ, 0},
-  {"EQU", pa_equ, 0},
   {"exit", pa_exit, 0},
-  {"EXIT", pa_exit, 0},
   {"export", pa_export, 0},
-  {"EXPORT", pa_export, 0},
   {"fill", pa_fill, 0},
-  {"FILL", pa_fill, 0},
   {"float", pa_float_cons, 'f'},
-  {"FLOAT", pa_float_cons, 'f'},
   {"half", pa_cons, 2},
-  {"HALF", pa_cons, 2},
   {"import", pa_import, 0},
-  {"IMPORT", pa_import, 0},
   {"int", pa_cons, 4},
-  {"INT", pa_cons, 4},
   {"label", pa_label, 0},
-  {"LABEL", pa_label, 0},
   {"lcomm", pa_lcomm, 0},
-  {"LCOMM", pa_lcomm, 0},
   {"leave", pa_leave, 0},
-  {"LEAVE", pa_leave, 0},
   {"long", pa_cons, 4},
-  {"LONG", pa_cons, 4},
   {"lsym", pa_lsym, 0},
-  {"LSYM", pa_lsym, 0},
   {"octa", pa_cons, 16},
-  {"OCTA", pa_cons, 16},
   {"org", pa_origin, 0},
-  {"ORG", pa_origin, 0},
   {"origin", pa_origin, 0},
-  {"ORIGIN", pa_origin, 0},
   {"param", pa_param, 0},
-  {"PARAM", pa_param, 0},
   {"proc", pa_proc, 0},
-  {"PROC", pa_proc, 0},
   {"procend", pa_procend, 0},
-  {"PROCEND", pa_procend, 0},
   {"quad", pa_cons, 8},
-  {"QUAD", pa_cons, 8},
   {"reg", pa_equ, 1},
-  {"REG", pa_equ, 1},
   {"short", pa_cons, 2},
-  {"SHORT", pa_cons, 2},
   {"single", pa_float_cons, 'f'},
-  {"SINGLE", pa_float_cons, 'f'},
   {"space", pa_space, 0},
-  {"SPACE", pa_space, 0},
   {"spnum", pa_spnum, 0},
-  {"SPNUM", pa_spnum, 0},
   {"string", pa_stringer, 0},
-  {"STRING", pa_stringer, 0},
   {"stringz", pa_stringer, 1},
-  {"STRINGZ", pa_stringer, 1},
   {"subspa", pa_subspace, 0},
-  {"SUBSPA", pa_subspace, 0},
   {"text", pa_text, 0},
-  {"TEXT", pa_text, 0},
   {"version", pa_version, 0},
-  {"VERSION", pa_version, 0},
   {"word", pa_cons, 4},
-  {"WORD", pa_cons, 4},
   {NULL, 0, 0}
 };
 
@@ -4327,6 +4282,11 @@ pa_comm (unused)
 	  S_SET_VALUE (symbol, size);
 	  S_SET_SEGMENT (symbol, &bfd_und_section);
 	  S_SET_EXTERNAL (symbol);
+
+	  /* Keep this until we verify that the generic resolving
+	     code in write.c is fixed.  */
+	  symbol->sy_resolved = 1;
+	  
 	}
     }
   demand_empty_rest_of_line ();