sdb: verbose 'p'

README.pkg

@@ -21,20 +21,8 @@ $ rpm -i x86_64/singular-4.0.0-1.x86_64.rpm noarch/singular-common-4.0.0-1.noarc
 
 Gentoo
 ======
-to install from the main tree,
+install from the main tree:
 
 emerge singular
 
 is sufficient.
-
-To get the very latest, slightly more experimental package add the "science overlay" first (if you have not already)
-
- layman -a science
-
-then unmask sci-mathematics/singular, for example by
-
- echo "sci-mathematics/singular" >> /etc/portage/package.keywords/singular
-
-and install:
-
- emerge singularp

Singular/sdb.cc

@@ -267,6 +267,12 @@ void sdb(Voice * currentVoice, const char * currLine, int len)
         case 'D':
           sdb_show_bp();
           break;
+	case 'l':
+	{
+	  extern void listall(int showproc);
+	  listall(FALSE);
+	  break;
+	}
         case 'n':
           currentVoice->pi->trace_flag|= 1;
           return;
@@ -279,7 +285,8 @@ void sdb(Voice * currentVoice, const char * currLine, int len)
         case 'p':
         {
           p=sdb_find_arg(p);
-          Print("variable `%s`",p);
+	  extern int myynest;
+          Print("variable `%s`at level %d",p,myynest);
           idhdl h=ggetid(p);
           if (h==NULL)
             PrintS(" not found\n");