Changeset 393d6b in git


Ignore:
Timestamp:
Jun 30, 1999, 5:42:14 PM (25 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
Children:
a63fdcb3c3e17833781f09f433f3a27e5b6618cf
Parents:
3932494a14100776dd25479d8a30fd56fb8ea293
Message:
* hannes: 64 bit changes


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/standard.lib

    r393249 r393d6b  
    1 // $Id: standard.lib,v 1.33 1999-06-30 14:14:31 Singular Exp $
     1// $Id: standard.lib,v 1.34 1999-06-30 15:42:14 Singular Exp $
    22//////////////////////////////////////////////////////////////////////////////
    33
    4 version="$Id: standard.lib,v 1.33 1999-06-30 14:14:31 Singular Exp $";
     4version="$Id: standard.lib,v 1.34 1999-06-30 15:42:14 Singular Exp $";
    55info="
    66LIBRARY: standard.lib   PROCEDURES WHICH ARE ALWAYS LOADED AT START-UP
    77
    88 stdfglm(ideal[,ord])   standard basis of the ideal via fglm [and ordering ord]
    9  stdhilb(ideal)         standard basis of the ideal using the Hilbert function
     9 stdhilb(ideal[,h])     standard basis of the ideal using the Hilbert function
    1010 groebner(ideal/module) standard basis of ideal or module using a
    1111                        heuristically choosen method
  • Singular/kstd1.cc

    r393249 r393d6b  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd1.cc,v 1.34 1999-04-30 10:39:53 obachman Exp $ */
     4/* $Id: kstd1.cc,v 1.35 1999-06-30 15:42:11 Singular Exp $ */
    55/*
    66* ABSTRACT:
     
    9797#ifdef KDEBUG
    9898  pTest((*h).p);
    99   pTest(*with);
     99  //pTest(*with);
    100100#endif
    101101
     
    17911791  }
    17921792#ifdef KDEBUG
    1793   int i;
    1794   for (i=0; i<IDELEMS(r); i++) pTest(r->m[i]);
     1793  idTest(r);
    17951794#endif
    17961795  if (toReset)
  • Singular/mmisc.c

    r393249 r393d6b  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: mmisc.c,v 1.5 1999-03-19 17:42:31 obachman Exp $ */
     4/* $Id: mmisc.c,v 1.6 1999-06-30 15:42:12 Singular Exp $ */
    55
    66/*
     
    9191{
    9292  int mm_bytesAlloc = mm_bytesValloc + mm_bytesMalloc;
    93  
     93
    9494  if ( ABS(mm_bytesAlloc - mm_printMark)>(100*1024) )
    9595  {
     
    104104void mmPrintStat()
    105105{
    106   int i, l, a;
    107  
    108 #ifdef HAVE_SBRK 
     106  int i;
     107  long l,a;
     108
     109#ifdef HAVE_SBRK
    109110  printf("Physical:%dk ", (mmMemPhysical()+ 1023)/1024);
    110 #endif 
     111#endif
    111112  printf("Alloc:%dk ", (mmMemAlloc() + 1023)/1024);
    112113  printf("Used:%dk ", (mmMemUsed()+ 1023)/1024);
     
    124125    l = mmListLength(mm_theList[i].pages);
    125126    a = mmListLength(mm_theList[i].current);
    126     printf("%d\t%d\t%d\t%d\t%d\t%d\n",
     127    printf("%d\t%ld\t%ld\t%d\t%ld\t%ld\n",
    127128           i, mmGetHeapBlockSize(&mm_theList[i]), l,
    128129           (l != 0 ? ((int) ((1.0 -
     
    164165/**********************************************************************
    165166 *
    166  * Some operations on linked lists of memory 
     167 * Some operations on linked lists of memory
    167168 *
    168169 **********************************************************************/
     
    172173  void* nlist;
    173174  void* olist;
    174  
     175
    175176  if (list == NULL) return NULL;
    176177
    177178  nlist = *((void**) list);
    178179  olist = list;
    179  
     180
    180181  if (list == element) return nlist;
    181  
     182
    182183  while (nlist != NULL && nlist != element)
    183184  {
     
    185186    nlist = *((void**) list);
    186187  }
    187  
     188
    188189  if (nlist != NULL) *((void**) list) = *((void**) nlist);
    189  
     190
    190191  return olist;
    191192}
     
    216217  if (addr == NULL)
    217218    return (list == NULL);
    218  
     219
    219220  while (list != NULL)
    220221  {
     
    229230  void* l1 = list;
    230231  void* l2;
    231  
     232
    232233  int l = 0, i;
    233234
     
    247248  return NULL;
    248249}
    249    
     250
    250251
    251252int mmGListLength(void* list, int next)
     
    274275  if (addr == NULL)
    275276    return (list == NULL);
    276  
     277
    277278  while (list != NULL)
    278279  {
     
    287288  void* l1 = list;
    288289  void* l2;
    289  
     290
    290291  int l = 0, i;
    291292
     
    327328{
    328329  assume(l >= 0);
    329  
     330
    330331  while (l)
    331332  {
     
    338339{
    339340  assume(l >= 0);
    340  
     341
    341342  while (l)
    342343  {
  • Singular/mmprivate.h

    r393249 r393d6b  
    44*  Computer Algebra System SINGULAR     *
    55****************************************/
    6 /* $Id: mmprivate.h,v 1.9 1999-04-15 09:57:04 obachman Exp $ */
     6/* $Id: mmprivate.h,v 1.10 1999-06-30 15:42:13 Singular Exp $ */
    77/*
    88* ABSTRACT
     
    5050
    5151#define DebugOffsetFront (sizeof(DBMCB) - sizeof(void*))
    52 #define DebugOffsetBack 4
     52#define DebugOffsetBack SIZEOF_VOIDP
    5353
    5454#define SizeFromRealSize( size ) (size - DebugOffsetFront - DebugOffsetBack)
Note: See TracChangeset for help on using the changeset viewer.