Changeset b7b08c in git for Singular/silink.cc

Timestamp:

Oct 14, 1999, 4:27:35 PM (25 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

548777d246af408b77296a71c16c980b2cef5b35

Parents:

e960943ba1dcfcb333014a2aee474750e8fafe10

Message:

* us short exponent vectors in divisbility tests
* AllocSizeOf
* garbage collection
* scanner/gmp: allow .0 and 1. input of reals


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

File:

• Singular/silink.cc (modified) (6 diffs)

Singular/silink.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: silink.cc,v 1.31 1999-07-23 08:24:30 Singular Exp $ */
+/* $Id: silink.cc,v 1.32 1999-10-14 14:27:30 obachman Exp $ */
 
 /*
@@ -121 +121 @@
   slCleanUp(l);
   if (l->ref == 0)
-    Free((ADDRESS)l, sizeof(ip_link));
+    FreeSizeOf((ADDRESS)l, ip_link);
 }
 
@@ -428 +428 @@
     }
   }
-  leftv v=(leftv)Alloc0(sizeof(sleftv));
+  leftv v=(leftv)Alloc0SizeOf(sleftv);
   v->rtyp=STRING_CMD;
   v->data=buf;
@@ -816 +816 @@
 {
   si_link_extension s;
-  si_link_root=(si_link_extension)Alloc0(sizeof(*si_link_root));
+  si_link_root=(si_link_extension)Alloc0SizeOf(s_si_link_extension);
   si_link_root->Open=slOpenAscii;
   si_link_root->Close=slCloseAscii;
@@ -830 +830 @@
 #ifdef HAVE_DBM
 #ifndef HAVE_MODULE_DBM
-  s->next = (si_link_extension)Alloc0(sizeof(*si_link_root));
+  s->next = (si_link_extension)Alloc0SizeOf(s_si_link_extension);
   s = s->next;
   slInitDBMExtension(s);
@@ -836 +836 @@
 #endif
 #ifdef HAVE_MPSR
-  s->next = (si_link_extension)Alloc0(sizeof(*si_link_root));
+  s->next = (si_link_extension)Alloc0SizeOf(s_si_link_extension);
   s = s->next;
   slInitMPFileExtension(s);
-  s->next = (si_link_extension)Alloc0(sizeof(*si_link_root));
+  s->next = (si_link_extension)Alloc0SizeOf(s_si_link_extension);
   s = s->next;
   slInitMPTcpExtension(s);