Changeset 5812c69 in git for Singular/lists.cc


Ignore:
Timestamp:
Sep 24, 1998, 11:59:51 AM (26 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')
Children:
56c52a7879fbc6de62cefba1da86b2edf2aadd4c
Parents:
073d2edeb03013a5c6ed0913687b024305a1427d
Message:
cosmetic changes


git-svn-id: file:///usr/local/Singular/svn/trunk@2517 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/lists.cc

    r073d2e r5812c69  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: lists.cc,v 1.10 1998-06-18 08:17:41 Singular Exp $ */
     4/* $Id: lists.cc,v 1.11 1998-09-24 09:59:46 Singular Exp $ */
    55/*
    66* ABSTRACT: handling of the list type
     
    217217        {
    218218          L->m[i].rtyp=typ0;
    219           int j=IDELEMS(r[0])-1;
    220           while ((j>0) && (r[0]->m[j]==NULL)) j--;
    221           j++;
    222           if (j!=IDELEMS(r[0]))
    223           {
    224             pEnlargeSet(&(r[0]->m),IDELEMS(r[0]),j-IDELEMS(r[0]));
    225             IDELEMS(r[0])=j;
    226           }
     219          int j=IDELEMS(r[0])-1;
     220          while ((j>0) && (r[0]->m[j]==NULL)) j--;
     221          j++;
     222          if (j!=IDELEMS(r[0]))
     223          {
     224            pEnlargeSet(&(r[0]->m),IDELEMS(r[0]),j-IDELEMS(r[0]));
     225            IDELEMS(r[0])=j;
     226          }
    227227        }
    228228        else
Note: See TracChangeset for help on using the changeset viewer.