Changeset c62170 in git


Ignore:
Timestamp:
Oct 22, 1998, 3:11:12 PM (26 years ago)
Author:
Kai Krüger <krueger@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c7af8613769b29c741d6c338945669719f1fc4f8')
Children:
c77850e84a64ea813a591132504cacc08ddaed55
Parents:
daeb6deed13b65cf13af781b4172bb4fc1014ee9
Message:
finished listvar()


git-svn-id: file:///usr/local/Singular/svn/trunk@2590 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/grammar.y

    rdaeb6d rc62170  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: grammar.y,v 1.50 1998-10-21 10:25:27 krueger Exp $ */
     4/* $Id: grammar.y,v 1.51 1998-10-22 13:11:11 krueger Exp $ */
    55/*
    66* ABSTRACT: SINGULAR shell grammatik
     
    11811181              namespaceroot->push( IDPACKAGE((idhdl)$3.data),
    11821182                                   ((sleftv)$3).name);
    1183               list_cmd(-1,NULL,"// ",TRUE);
     1183              list_cmd(-2,NULL,"// ",TRUE);
    11841184              namespaceroot->pop();
    11851185            }
  • Singular/ipshell.cc

    rdaeb6d rc62170  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: ipshell.cc,v 1.27 1998-10-22 12:26:11 krueger Exp $ */
     4/* $Id: ipshell.cc,v 1.28 1998-10-22 13:11:12 krueger Exp $ */
    55/*
    66* ABSTRACT:
     
    109109  char buf2[128];
    110110
    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));
    113113
    114114  Print("%s%-20.20s [%d]  ",s,buf2,IDLEV(h));
     
    312312{
    313313  idhdl h,start;
    314   BOOLEAN all = typ==-1;
     314  BOOLEAN all = typ<0;
    315315  BOOLEAN really_all=FALSE;
    316316  BOOLEAN do_packages=FALSE;
    317317 
    318   if ( typ < 0 ) do_packages=TRUE;
     318  if ( typ == -1 ) do_packages=TRUE;
    319319  if ( typ==0 )
    320320  {
     
    391391#ifdef HAVE_NAMESPACES
    392392  if(!namespaceroot->isroot && do_packages) {
    393     //namespaceroot->push(namespaceroot->root->pack, "Top", myynest);
     393    namespaceroot->push(namespaceroot->root->pack, "Top", myynest);
    394394    list_cmd(PACKAGE_CMD,"Top","// ",FALSE, TRUE);
    395     //namespaceroot->pop();
     395    namespaceroot->pop();
    396396  }
    397397#endif /* HAVE_NAMESPACES */
Note: See TracChangeset for help on using the changeset viewer.