Changeset 3ad53dd in git


Ignore:
Timestamp:
Apr 18, 2008, 3:32:53 PM (16 years ago)
Author:
Oliver Wienand <wienand@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
db2e1cc3f34575689b573a4b1ba903a8a22a52d9
Parents:
7282887cb4b64d9b0bd7422605cafe9778d1a02e
Message:
const char
f5gb in makefile


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

Legend:

Unmodified
Added
Removed

  • kernel/Makefile.in

    r728288 r3ad53dd  
    114114    pDebug.cc pInline2.cc pInline1.cc pInline0.cc \
    115115    pShallowCopyDelete.cc fast_mult.cc digitech.cc\
    116     tgb.cc tgbgauss.cc ringgb.cc ratgring.cc shiftgb.cc
     116    tgb.cc tgbgauss.cc ringgb.cc f5gb.cc ratgring.cc shiftgb.cc
    117117
    118118# normal C source files

  • kernel/f5gb.h

    r728288 r3ad53dd  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: f5gb.h,v 1.1 2008-04-17 12:32:13 wienand Exp $ */
     4/* $Id: f5gb.h,v 1.2 2008-04-18 13:32:53 wienand Exp $ */
    55/*
    66* ABSTRACT: ringgb interface
    … …  
    1515
    1616#endif
    17 #endif

  • kernel/rintegers.cc

    r728288 r3ad53dd  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: rintegers.cc,v 1.11 2008-03-19 17:44:11 Singular Exp $ */
     4/* $Id: rintegers.cc,v 1.12 2008-04-18 13:32:53 wienand Exp $ */
    55/*
    66* ABSTRACT: numbers modulo n
    … …  
    288288* extracts a long integer from s, returns the rest    (COPY FROM longrat0.cc)
    289289*/
    290 char * nlEatLongC(char *s, MP_INT *i)
    291 {
    292   char * start=s;
    293   if (!(*s >= '0' && *s <= '9'))
    294   {
    295     mpz_init_set_si(i, 1);
    296     return s;
    297   }
    298   mpz_init(i);
     290static const char * nlEatLongC(char *s, MP_INT *i)
     291{
     292  const char * start=s;
     293
    299294  while (*s >= '0' && *s <= '9') s++;
    300295  if (*s=='\0')
    … …  
    312307}
    313308
    314 
    315 char * nrzRead (char *s, number *a)
     309const char * nrzRead (const char *s, number *a)
    316310{
    317311  int_number z = (int_number) omAllocBin(gmp_nrz_bin); // evtl. spaeter mit bin
    318312  {
    319313    mpz_init(z);
    320     s = nlEatLongC(s, z);
     314    s = nlEatLongC((char *) s, z);
    321315  }
    322316  *a = (number) z;

  • kernel/rintegers.h

    r728288 r3ad53dd  
    44*  Computer Algebra System SINGULAR     *
    55****************************************/
    6 /* $Id: rintegers.h,v 1.4 2008-03-19 17:44:11 Singular Exp $ */
     6/* $Id: rintegers.h,v 1.5 2008-04-18 13:32:53 wienand Exp $ */
    77/*
    88* ABSTRACT: numbers modulo n
    … …  
    4343nMapFunc nrzSetMap     (ring src, ring dst);
    4444void    nrzWrite       (number &a);
    45 char *  nrzRead        (char *s, number *a);
     45const char *  nrzRead  (const char *s, number *a);
    4646char *  nrzName        (number n);
    4747#ifdef LDEBUG
Note: See TracChangeset for help on using the changeset viewer.