Changeset c62170 in git for Singular/ipshell.cc
- Timestamp:
- Oct 22, 1998, 3:11:12 PM (26 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- c77850e84a64ea813a591132504cacc08ddaed55
- Parents:
- daeb6deed13b65cf13af781b4172bb4fc1014ee9
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipshell.cc
rdaeb6d rc62170 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: ipshell.cc,v 1.2 7 1998-10-22 12:26:11krueger Exp $ */4 /* $Id: ipshell.cc,v 1.28 1998-10-22 13:11:12 krueger Exp $ */ 5 5 /* 6 6 * ABSTRACT: … … 109 109 char buf2[128]; 110 110 111 if(fullname) sprintf(buf2, "%s::%s \0", "", IDID(h));112 else sprintf(buf2, "%s \0", IDID(h));111 if(fullname) sprintf(buf2, "%s::%s", "", IDID(h)); 112 else sprintf(buf2, "%s", IDID(h)); 113 113 114 114 Print("%s%-20.20s [%d] ",s,buf2,IDLEV(h)); … … 312 312 { 313 313 idhdl h,start; 314 BOOLEAN all = typ ==-1;314 BOOLEAN all = typ<0; 315 315 BOOLEAN really_all=FALSE; 316 316 BOOLEAN do_packages=FALSE; 317 317 318 if ( typ < 0) do_packages=TRUE;318 if ( typ == -1 ) do_packages=TRUE; 319 319 if ( typ==0 ) 320 320 { … … 391 391 #ifdef HAVE_NAMESPACES 392 392 if(!namespaceroot->isroot && do_packages) { 393 //namespaceroot->push(namespaceroot->root->pack, "Top", myynest);393 namespaceroot->push(namespaceroot->root->pack, "Top", myynest); 394 394 list_cmd(PACKAGE_CMD,"Top","// ",FALSE, TRUE); 395 //namespaceroot->pop();395 namespaceroot->pop(); 396 396 } 397 397 #endif /* HAVE_NAMESPACES */
Note: See TracChangeset
for help on using the changeset viewer.