Changeset 33e521 in git


Ignore:
Timestamp:
Apr 7, 1998, 9:14:44 PM (26 years ago)
Author:
Kai Krüger <krueger@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
99cfcba795ebe458e864dea1374dafda993d2601
Parents:
37e22dccbc1d4231d5dd6c765a95b61021b1266c
Message:
small fixes (verbose, list_cmd)


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

Legend:

Unmodified
Added
Removed
  • Singular/iplib.cc

    r37e22d r33e521  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iplib.cc,v 1.16 1998-04-07 17:53:31 Singular Exp $ */
     4/* $Id: iplib.cc,v 1.17 1998-04-07 19:14:43 krueger Exp $ */
    55/*
    66* ABSTRACT: interpreter: LIB and help
     
    7070char * iiProcArgs(char *e,BOOLEAN withParenth)
    7171{
    72   while ((*e==' ') || (*e=='(')) e++;
     72  while ((*e==' ') || (*e=='\t') || (*e=='(')) e++;
    7373  if (*e<' ')
    7474  {
     
    502502  if (BVERBOSE(V_LOAD_LIB)) Print( "// ** loading %s...", libnamebuf);
    503503  yylplex(newlib, libnamebuf, &lib_style);
    504   if(lib_style == OLD_LIBSTYLE)
     504  if( (lib_style == OLD_LIBSTYLE) && (BVERBOSE(V_LOAD_LIB)))
    505505    Warn( "library %s has an old format. Please fix it for the next time",
    506506          newlib);
  • Singular/ipshell.cc

    r37e22d r33e521  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: ipshell.cc,v 1.17 1998-04-03 17:38:41 Singular Exp $ */
     4/* $Id: ipshell.cc,v 1.18 1998-04-07 19:14:44 krueger Exp $ */
    55/*
    66* ABSTRACT:
     
    139139                        );
    140140                   break;
    141     case PROC_CMD:    break;
     141    case PROC_CMD:  Print(" from %s",IDPROC(h)->libname);
     142                   if(IDPROC(h)->is_static) Print(" (static)");
     143                   break;
    142144    case STRING_CMD:
    143145                   {
     
    268270      if (h!=NULL)
    269271      {
    270         if (iterate) list1(prefix,h,TRUE);
    271         if ((IDTYP(h)==RING_CMD)
    272         || (IDTYP(h)==QRING_CMD)
    273         || (IDTYP(h)==PACKAGE_CMD))
    274         {
    275           h=IDRING(h)->idroot;
    276         }
    277         else
    278           return;
     272        if (iterate) list1(prefix,h,TRUE);
     273        if ((IDTYP(h)==RING_CMD)
     274            || (IDTYP(h)==QRING_CMD)
     275            || (IDTYP(h)==PACKAGE_CMD))
     276          {
     277            h=IDRING(h)->idroot;
     278          }
     279        else
     280          return;
    279281      }
    280282      else
Note: See TracChangeset for help on using the changeset viewer.