added dumpfunctab

SCCS-vsn: old/dbx/mappings.c 1.3

diff --git a/usr/src/old/dbx/mappings.c b/usr/src/old/dbx/mappings.c
index ed92d00..4f8f2a5 100644 (file)
--- a/usr/src/old/dbx/mappings.c
+++ b/usr/src/old/dbx/mappings.c
@@ -1,6 +1,6 @@
 /* Copyright (c) 1982 Regents of the University of California */
 
 /* Copyright (c) 1982 Regents of the University of California */
 

-static char sccsid[] = "@(#)mappings.c 1.2 %G%";
+static char sccsid[] = "@(#)mappings.c 1.3 %G%";

 
 /*
  * Source-to-object and vice versa mappings.
 
 /*
  * Source-to-object and vice versa mappings.


@@ -283,3 +283,18 @@ public clrfunctab()
 {
     nfuncs = 0;
 }
 {
     nfuncs = 0;
 }

+
+public dumpfunctab()
+{
+Symbol s;
+int i;
+
+  for(i=0;i<nfuncs;i++) { 
+       s=functab[i];
+       printf( "%s %s %s %lx \n",
+       classname(s),
+       symname(s),
+       (s->block == nil ? "noblock" : symname(s->block) ),
+       codeloc(s) );
+   }
+}