2005-03-15 Frank Ch. Eigler <fche@redhat.com>

	* TODO: New file.  Include some probe-point-provider syntax examples.
	* parse.cxx (lexer::scan, parser::parse_literal): Support hex, octal
	numbers via strtol.
	(parse_probe, parse_probe_point): Modify for dotted syntax.
	* staptree.cxx: Ditto.
	* parsetest.cxx, semtest.cxx: Print parse/sem results even if
	.stp files were given on command line.
	* parse.h, staptree.h: Rename probe_point_spec -> probe_point.
	* runtest.sh: New test-runner front-end script.
	* Makefile.am: Use it for TESTS_ENVIRONMENT.
	* testsuite/*: Update probe point syntax.  Add a bunch of new tests.

1 files changed, 31 insertions, 34 deletions

diff --git a/semtest.cxx b/semtest.cxx
index f86d17ca..b154209f 100644
--- a/semtest.cxx
+++ b/semtest.cxx
@@ -133,52 +133,49 @@ main (int argc, char *argv [])
   rc += semantic_pass_1 (files);
   rc += semantic_pass_2 (files);
 
-  if (argc == 1) // processed stdin only
+  for (unsigned i=0; i<files.size(); i++)
     {
-      for (unsigned i=0; i<files.size(); i++)
+      stapfile* f = files[i];
+      for (unsigned j=0; j<f->functions.size(); j++)
         {
-          stapfile* f = files[i];
-          for (unsigned j=0; j<f->functions.size(); j++)
-            {
-              functiondecl* fn = f->functions[j];
-              cerr << "Function ";
-              fn->printsig (cerr);
-              cerr << endl << "locals:" << endl;
-              for (unsigned k=0; k<fn->locals.size(); k++)
-                {
-                  vardecl* fa = fn->locals[k];
-                  cerr << "\t";
-                  fa->printsig (cerr);
-                  cerr << endl;
-                }
-              cerr << endl;
-            }
-
-          for (unsigned j=0; j<f->probes.size(); j++)
+          functiondecl* fn = f->functions[j];
+          cerr << "Function ";
+          fn->printsig (cerr);
+          cerr << endl << "locals:" << endl;
+          for (unsigned k=0; k<fn->locals.size(); k++)
             {
-              probe* pn = f->probes[j];
-              cerr << "Probe " << *pn->tok << endl; // XXX: print probespec
-              cerr << "locals:" << endl;
-              for (unsigned k=0; k<pn->locals.size(); k++)
-                {
-                  vardecl* fa = pn->locals[k];
-                  cerr << "\t";
-                  fa->printsig (cerr);
-                  cerr << endl;
-                }
+              vardecl* fa = fn->locals[k];
+              cerr << "\t";
+              fa->printsig (cerr);
               cerr << endl;
             }
-
-          cerr << "globals:" << endl;
-          for (unsigned k=0; k<f->globals.size(); k++)
+          cerr << endl;
+        }
+      
+      for (unsigned j=0; j<f->probes.size(); j++)
+        {
+          probe* pn = f->probes[j];
+          cerr << "Probe " << *pn->tok << endl; // XXX: print probespec
+          cerr << "locals:" << endl;
+          for (unsigned k=0; k<pn->locals.size(); k++)
             {
-              vardecl* fa = f->globals[k];
+              vardecl* fa = pn->locals[k];
               cerr << "\t";
               fa->printsig (cerr);
               cerr << endl;
             }
           cerr << endl;
         }
+      
+      cerr << "globals:" << endl;
+      for (unsigned k=0; k<f->globals.size(); k++)
+        {
+          vardecl* fa = f->globals[k];
+          cerr << "\t";
+          fa->printsig (cerr);
+          cerr << endl;
+        }
+      cerr << endl;
     }
 
   return rc;