Changeset 50cbdc in git for Singular/silink.cc
- Timestamp:
- Aug 27, 2001, 4:48:02 PM (23 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 2567b5a6cb7109be5a83e53eb94abb1c38fb9945
- Parents:
- 3de58c9ca0aeaafdf5cb29f986967bffa405b542
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/silink.cc
r3de58c r50cbdc 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: silink.cc,v 1.4 0 2001-03-26 18:11:54Singular Exp $ */4 /* $Id: silink.cc,v 1.41 2001-08-27 14:47:39 Singular Exp $ */ 5 5 6 6 /* … … 12 12 #include "mod2.h" 13 13 #include "tok.h" 14 #include "omalloc.h"14 #include <omalloc.h> 15 15 #include "febase.h" 16 16 #include "subexpr.h" … … 24 24 #include "intvec.h" 25 25 26 #ifdef HAVE_DBM 27 #ifdef ix86_Win 28 #define USE_GDBM 29 #endif 30 #endif 31 26 32 omBin s_si_link_extension_bin = omGetSpecBin(sizeof(s_si_link_extension)); 27 33 omBin sip_link_bin = omGetSpecBin(sizeof(sip_link)); … … 88 94 while (strcmp(s->type, type) != 0) 89 95 { 90 if (s->next == NULL) 96 if (s->next == NULL) 91 97 { 92 98 prev = s; … … 112 118 113 119 if (l->m == NULL) return TRUE; 114 120 115 121 l->name = (name != NULL ? name : omStrDup("")); 116 122 l->mode = (mode != NULL ? mode : omStrDup("")); … … 219 225 if (! SI_LINK_CLOSE_P(l)) 220 226 { 221 227 if (slClose(l)) return NULL; 222 228 } 223 229 #endif … … 266 272 if (! SI_LINK_CLOSE_P(l)) 267 273 { 268 274 if (slClose(l)) return TRUE; 269 275 } 270 276 #endif … … 849 855 s->next = NULL; 850 856 si_link_extension ns = (si_link_extension)omAlloc0Bin(s_si_link_extension_bin); 851 857 852 858 #ifdef HAVE_MPSR 853 859 if (strcmp(type, "MPfile") == 0) … … 872 878 return si_link_root; 873 879 } 874 880 875 881 if (s->next == NULL) 876 882 {
Note: See TracChangeset
for help on using the changeset viewer.