From 7f8b9d66f56468f31326d35ec360100cd3759011 Mon Sep 17 00:00:00 2001
From: Jeff Law <law@redhat.com>
Date: Wed, 16 Mar 1994 22:44:14 +0000
Subject: [PATCH]         * gas/hppa/more.parse/callinfobug.s: New test.       
  * gas/hppa/omre.parse/parse.exp: Run it.

---
 gas/testsuite/ChangeLog                         | 3 +++
 gas/testsuite/gas/hppa/more.parse/.Sanitize     | 1 +
 gas/testsuite/gas/hppa/more.parse/callinfobug.s | 7 +++++++
 gas/testsuite/gas/hppa/more.parse/parse.exp     | 3 +++
 gas/testsuite/gas/hppa/parse/.Sanitize          | 1 +
 gas/testsuite/gas/hppa/parse/callinfobug.s      | 7 +++++++
 gas/testsuite/gas/hppa/parse/parse.exp          | 3 +++
 7 files changed, 25 insertions(+)
 create mode 100644 gas/testsuite/gas/hppa/more.parse/callinfobug.s
 create mode 100644 gas/testsuite/gas/hppa/parse/callinfobug.s

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 78066bcc88f..d4d4435bfe2 100644
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,5 +1,8 @@
 Wed Mar 16 11:57:07 1994  Jeffrey A. Law  (law@snake.cs.utah.edu)
 
+	* gas/hppa/more.parse/callinfobug.s: New test.
+	* gas/hppa/omre.parse/parse.exp: Run it.
+
 	* gas/hppa/more.parse/regpopbug.s: New test.
 	* gas/hppa/more.parse/parse.exp: Run it.
 
diff --git a/gas/testsuite/gas/hppa/more.parse/.Sanitize b/gas/testsuite/gas/hppa/more.parse/.Sanitize
index 1661dcc23d0..8b6bdc1c85d 100644
--- a/gas/testsuite/gas/hppa/more.parse/.Sanitize
+++ b/gas/testsuite/gas/hppa/more.parse/.Sanitize
@@ -32,6 +32,7 @@ appbug.s
 block1.s
 block2.s
 calldatabug.s
+callinfobug.s
 defbug.s
 entrybug.s
 exportbug.s
diff --git a/gas/testsuite/gas/hppa/more.parse/callinfobug.s b/gas/testsuite/gas/hppa/more.parse/callinfobug.s
new file mode 100644
index 00000000000..219add16ffb
--- /dev/null
+++ b/gas/testsuite/gas/hppa/more.parse/callinfobug.s
@@ -0,0 +1,7 @@
+	.space $TEXT$
+	.subspa $CODE$
+	.align 4
+	.export divu,millicode
+	.proc
+	.callinfo millicode
+	.procend
diff --git a/gas/testsuite/gas/hppa/more.parse/parse.exp b/gas/testsuite/gas/hppa/more.parse/parse.exp
index f572c8f8b12..80dcedb86f4 100755
--- a/gas/testsuite/gas/hppa/more.parse/parse.exp
+++ b/gas/testsuite/gas/hppa/more.parse/parse.exp
@@ -212,5 +212,8 @@ if [istarget hppa*-*-*] then {
 
     # Make sure gas handles various kinds of .reg pseudo-ops
     gas_test "regpopbug.s" "" "" "Test for bugs in .reg pseudo-op"
+
+    # Check some bugs that have appeared in parsing .callinfo directives
+    gas_test "callinfobug.s" "" "" "Test for bugs in .callinfo directive"
 }
 
diff --git a/gas/testsuite/gas/hppa/parse/.Sanitize b/gas/testsuite/gas/hppa/parse/.Sanitize
index 1661dcc23d0..8b6bdc1c85d 100644
--- a/gas/testsuite/gas/hppa/parse/.Sanitize
+++ b/gas/testsuite/gas/hppa/parse/.Sanitize
@@ -32,6 +32,7 @@ appbug.s
 block1.s
 block2.s
 calldatabug.s
+callinfobug.s
 defbug.s
 entrybug.s
 exportbug.s
diff --git a/gas/testsuite/gas/hppa/parse/callinfobug.s b/gas/testsuite/gas/hppa/parse/callinfobug.s
new file mode 100644
index 00000000000..219add16ffb
--- /dev/null
+++ b/gas/testsuite/gas/hppa/parse/callinfobug.s
@@ -0,0 +1,7 @@
+	.space $TEXT$
+	.subspa $CODE$
+	.align 4
+	.export divu,millicode
+	.proc
+	.callinfo millicode
+	.procend
diff --git a/gas/testsuite/gas/hppa/parse/parse.exp b/gas/testsuite/gas/hppa/parse/parse.exp
index f572c8f8b12..80dcedb86f4 100755
--- a/gas/testsuite/gas/hppa/parse/parse.exp
+++ b/gas/testsuite/gas/hppa/parse/parse.exp
@@ -212,5 +212,8 @@ if [istarget hppa*-*-*] then {
 
     # Make sure gas handles various kinds of .reg pseudo-ops
     gas_test "regpopbug.s" "" "" "Test for bugs in .reg pseudo-op"
+
+    # Check some bugs that have appeared in parsing .callinfo directives
+    gas_test "callinfobug.s" "" "" "Test for bugs in .callinfo directive"
 }
 
-- 
2.30.2