* gas/hppa/unsorted/globalbug.s: New test (expected to fail).

* gas/hppa/unsorted/unsorted.exp: Run it.

gas/testsuite/ChangeLog

@@ -1,5 +1,8 @@
 Wed Mar 16 11:57:07 1994  Jeffrey A. Law  (law@snake.cs.utah.edu)
 
+	* gas/hppa/unsorted/globalbug.s: New test (expected to fail).
+	* gas/hppa/unsorted/unsorted.exp: Run it.
+
 	* gas/hppa/more.parse/callinfobug.s: New test.
 	* gas/hppa/omre.parse/parse.exp: Run it.
 

gas/testsuite/gas/hppa/unsorted/.Sanitize

@@ -28,6 +28,7 @@ Things-to-keep:
 
 align3.s
 fragbug.s
+globalbug.s
 labeldiffs.s
 locallabel.s
 ss_align.s

gas/testsuite/gas/hppa/unsorted/globalbug.s

@@ -0,0 +1,16 @@
+
+	.space $PRIVATE$
+	.subspa $GLOBAL$
+	.export $global$
+$global$
+	.space $TEXT$
+	.subspa $CODE$
+
+	.proc
+	.callinfo
+ivaaddr
+	nop
+	nop
+	addil L%ivaaddr-$global$,%dp
+	ldo   R%ivaaddr-$global$(%r1),%r19
+	.procend

gas/testsuite/gas/hppa/unsorted/unsorted.exp

@@ -151,6 +151,11 @@ if [istarget hppa*-*-*] then {
     do_frchain_test
 
     # Test bug where switching between subspaces creates bogus alignments
-;    do_align3_test
+    do_align3_test
+
+    # Test a problem where $global$ is defined, then used within the
+    # same source file.
+    setup_xfail hppa*-*-*
+    gas_test "globalbug.s" "" "" "Use \$global\$ in file which defines it"
 }