Changeset 6caadfb in git


Ignore:
Timestamp:
Jan 5, 2006, 4:56:17 PM (18 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'd1b01e9d51ade4b46b745d3bada5c5f3696be3a8')
Children:
458653fdc02860aff388929d90aa0c5a956d2e4a
Parents:
f40763611d37ce48931d1ab3d0fee6322e2aa8ad
Message:
*hannes: 64bit port


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

Legend:

Unmodified
Added
Removed

  • Singular/eigenval_ip.cc

    rf40763 r6caadfb  
    22*  Computer Algebra System SINGULAR      *
    33*****************************************/
    4 /* $Id: eigenval_ip.cc,v 1.2 2004-04-30 09:58:19 Singular Exp $ */
     4/* $Id: eigenval_ip.cc,v 1.3 2006-01-05 15:55:08 Singular Exp $ */
    55/*
    66* ABSTRACT: eigenvalues of constant square matrices
    … …  
    3535      if(h&&h->Typ()==INT_CMD)
    3636      {
    37         int i=(int)h->Data();
     37        int i=(int)(long)h->Data();
    3838        h=h->next;
    3939        if(h&&h->Typ()==INT_CMD)
    4040        {
    41           int j=(int)h->Data();
     41          int j=(int)(long)h->Data();
    4242          res->rtyp=MATRIX_CMD;
    4343          res->data=(void *)evSwap(mpCopy(M),i,j);
    … …  
    6363      if(h&&h->Typ()==INT_CMD)
    6464      {
    65         int i=(int)h->Data();
     65        int i=(int)(long)h->Data();
    6666        h=h->next;
    6767        if(h&&h->Typ()==INT_CMD)
    6868        {
    69           int j=(int)h->Data();
     69          int j=(int)(long)h->Data();
    7070          h=h->next;
    7171          if(h&&h->Typ()==INT_CMD)
    7272          {
    73             int k=(int)h->Data();
     73            int k=(int)(long)h->Data();
    7474            res->rtyp=MATRIX_CMD;
    7575            res->data=(void *)evRowElim(mpCopy(M),i,j,k);
    … …  
    9696      if(h&&h->Typ()==INT_CMD)
    9797      {
    98         int i=(int)h->Data();
     98        int i=(int)(long)h->Data();
    9999        h=h->next;
    100100        if(h&&h->Typ()==INT_CMD)
    101101        {
    102           int j=(int)h->Data();
     102          int j=(int)(long)h->Data();
    103103          h=h->next;
    104104          if(h&&h->Typ()==INT_CMD)
    105105          {
    106             int k=(int)h->Data();
     106            int k=(int)(long)h->Data();
    107107            res->rtyp=MATRIX_CMD;
    108108            res->data=(void *)evColElim(mpCopy(M),i,j,k);

  • Singular/gms.cc

    rf40763 r6caadfb  
    22*  Computer Algebra System SINGULAR      *
    33*****************************************/
    4 /* $Id: gms.cc,v 1.9 2004-04-03 17:25:04 levandov Exp $ */
     4/* $Id: gms.cc,v 1.10 2006-01-05 15:56:17 Singular Exp $ */
    55/*
    66* ABSTRACT: Gauss-Manin system normal form
    … …  
    119119          if(h&&h->Typ()==INT_CMD)
    120120          {
    121             int D=(int)h->Data();
     121            int D=(int)(long)h->Data();
    122122            h=h->next;
    123123            if(h&&h->Typ()==INT_CMD)
    124124            {
    125               int K=(int)h->Data();
     125              int K=(int)(long)h->Data();
    126126              res->rtyp=LIST_CMD;
    127127              res->data=(void *)gmsNF(idCopy(p),g,B,D,K);
Note: See TracChangeset for help on using the changeset viewer.