2005-05-24 Frank Ch. Eigler <fche@redhat.com>

	* elaborate.cxx (find_array): Support automagic tapset globals.
	* testsuite/semok/nine.stp: Test it ...
	* testsuite/semlib/g2.stp: ... using this global array.
	* staptree.cxx (stapfile print): List globals.

1 files changed, 9 insertions, 2 deletions

diff --git a/staptree.cxx b/staptree.cxx
index 3c4fe435..b1130d94 100644
--- a/staptree.cxx
+++ b/staptree.cxx
@@ -193,7 +193,7 @@ void symbol::print (ostream& o)
 void vardecl::print (ostream& o)
 {
   o << name;
-  if (index_types.size() > 0)
+  if (arity > 0 || index_types.size() > 0)
     o << "[...]";
 }
 
@@ -310,7 +310,14 @@ void stapfile::print (ostream& o)
 {
   o << "# file " << name << endl;
 
-  for(unsigned i=0; i<probes.size(); i++)
+  for (unsigned i=0; i<globals.size(); i++)
+    {
+      o << "global ";
+      globals[i]->print (o);
+      o << endl;
+    }
+
+  for (unsigned i=0; i<probes.size(); i++)
     {
       probes[i]->print (o);
       o << endl;