Changeset 111cfe in git
- Timestamp:
- Jul 26, 2005, 7:06:59 PM (18 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
- Children:
- 5c32833552c1f18e3ee320d4cc4d3c0176d81734
- Parents:
- aaa49cc6aa7665f191223675066ceaf1f337254e
- Files:
-
- 18 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/claptmpl.cc
raaa49c r111cfe 3 3 * Computer Algebra System SINGULAR * 4 4 ****************************************/ 5 // $Id: claptmpl.cc,v 1.2 7 2005-06-13 16:24:43Singular Exp $5 // $Id: claptmpl.cc,v 1.28 2005-07-26 17:06:54 Singular Exp $ 6 6 /* 7 7 * ABSTRACT - instantiation of all templates … … 26 26 #include <templates/ftmpl_functions.h> 27 27 #include <templates/ftmpl_matrix.cc> 28 #ifdef __MWERKS__29 template List<CanonicalForm> Difference<CanonicalForm>(const List<CanonicalForm>&,const List<CanonicalForm>&);30 template List<CanonicalForm> Union<CanonicalForm>(const List<CanonicalForm>&,const List<CanonicalForm>&);31 template List<CFFactor> Union<CFFactor>(const List<CFFactor>&,const List<CFFactor>&);32 template List<Variable> Union<Variable> ( const List<Variable>&, const List<Variable>& );33 template List<Variable> Difference<Variable> ( const List<Variable>&, const List<Variable>& );34 template int operator==<CanonicalForm> ( const Factor<CanonicalForm>&, const Factor<CanonicalForm>& );35 #endif36 28 37 29 template class Factor<CanonicalForm>; … … 58 50 #endif 59 51 60 #ifndef __MWERKS__ 61 template List<CFFactor> Union ( const List<CFFactor>&, const List<CFFactor>& ); 62 template int operator == ( const Factor<CanonicalForm>&, const Factor<CanonicalForm>& ); 63 64 template CanonicalForm tmax ( const CanonicalForm&, const CanonicalForm& ); 65 template CanonicalForm tmin ( const CanonicalForm&, const CanonicalForm& ); 66 67 template Variable tmax ( const Variable&, const Variable& ); 68 template Variable tmin ( const Variable&, const Variable& ); 69 70 template int tmax ( const int&, const int& ); 71 template int tmin ( const int&, const int& ); 72 template int tabs ( const int& ); 73 #endif 52 template List<CFFactor> Union ( const List<CFFactor>&, const List<CFFactor>& ); 53 template int operator == ( const Factor<CanonicalForm>&, const Factor<CanonicalForm>& ); 54 55 template CanonicalForm tmax ( const CanonicalForm&, const CanonicalForm& ); 56 template CanonicalForm tmin ( const CanonicalForm&, const CanonicalForm& ); 57 58 template Variable tmax ( const Variable&, const Variable& ); 59 template Variable tmin ( const Variable&, const Variable& ); 60 61 template int tmax ( const int&, const int& ); 62 template int tmin ( const int&, const int& ); 63 template int tabs ( const int& ); 74 64 75 65 #endif … … 158 148 template class ListIterator<Variable> ; 159 149 160 #ifndef __MWERKS__ 161 template List<Variable> Union ( const List<Variable>&, const List<Variable>& ); 162 template List<Variable> Difference ( const List<Variable>&, const List<Variable>& ); 163 164 template List<CanonicalForm> Union ( const List<CanonicalForm>&, const List<CanonicalForm>& ); 165 template List<CanonicalForm> Difference ( const List<CanonicalForm>&, const List<CanonicalForm>& ); 166 #endif 150 template List<Variable> Union ( const List<Variable>&, const List<Variable>& ); 151 template List<Variable> Difference ( const List<Variable>&, const List<Variable>& ); 152 153 template List<CanonicalForm> Union ( const List<CanonicalForm>&, const List<CanonicalForm>& ); 154 template List<CanonicalForm> Difference ( const List<CanonicalForm>&, const List<CanonicalForm>& ); 167 155 168 156 // for charsets: -
Singular/extra.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 *****************************************/ 4 /* $Id: extra.cc,v 1.22 7 2005-06-28 14:41:37Singular Exp $ */4 /* $Id: extra.cc,v 1.228 2005-07-26 17:06:54 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: general interface to internals of Singular ("system" command) … … 16 16 #include "mod2.h" 17 17 18 #ifndef __MWERKS__19 18 #ifdef TIME_WITH_SYS_TIME 20 19 # include <time.h> … … 33 32 #endif 34 33 35 #endif36 34 #include <unistd.h> 37 35 … … 216 214 { 217 215 res->rtyp=INT_CMD; 218 #ifndef __MWERKS__219 216 if (h==NULL) res->data = (void *)system("sh"); 220 217 else if (h->Typ()==STRING_CMD) … … 222 219 else 223 220 WerrorS("string expected"); 224 #else225 res->data=(void *)0;226 #endif227 221 return FALSE; 228 222 } … … 308 302 res->rtyp=INT_CMD; 309 303 #ifndef MSDOS 310 #ifndef __MWERKS__311 304 res->data=(void *)getpid(); 312 #else313 res->data=(void *)1;314 #endif315 305 #else 316 306 res->data=(void *)1; … … 2090 2080 #endif 2091 2081 /*==================== alarm ==================================*/ 2092 #ifndef __MWERKS__2093 2082 #ifndef MSDOS 2094 2083 #ifndef atarist … … 2111 2100 } 2112 2101 else 2113 #endif2114 2102 #endif 2115 2103 #endif -
Singular/fegetopt.h
raaa49c r111cfe 101 101 #define optional_argument 2 102 102 103 #if __STDC__ || defined(PROTO) || defined(__MWERKS__)103 #if __STDC__ || defined(PROTO) 104 104 /* #if defined(__GNU_LIBRARY__)*/ 105 105 /* Many other libraries have conflicting prototypes for getopt, with -
Singular/grammar.y
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: grammar.y,v 1.11 2 2005-05-18 17:57:04Singular Exp $ */4 /* $Id: grammar.y,v 1.113 2005-07-26 17:06:56 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: SINGULAR shell grammatik … … 13 13 #include <stdarg.h> 14 14 #include <string.h> 15 #ifdef __MWERKS__16 #ifdef __POWERPC__17 #include <alloca.h>18 #else19 #ifdef macintosh20 #define alloca malloc /* this is not corect! */21 #else22 #include <malloc.h>23 #endif24 #endif25 #endif26 15 27 16 #include "mod2.h" -
Singular/iparith.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: iparith.cc,v 1.37 0 2005-07-25 13:01:28 brickenExp $ */4 /* $Id: iparith.cc,v 1.371 2005-07-26 17:06:56 Singular Exp $ */ 5 5 6 6 /* … … 6033 6033 } 6034 6034 6035 #ifndef __MWERKS__6036 6035 #if defined(__alpha) && !defined(linux) 6037 6036 extern "C" … … 6072 6071 return FALSE; 6073 6072 } 6074 #endif6075 6073 static BOOLEAN jjSUBST_M(leftv res, leftv u) 6076 6074 { … … 6146 6144 ,{jjCALL2ARG, STATUS_CMD, STRING_CMD, 2 ALLOW_PLURAL} 6147 6145 ,{jjCALL3ARG, STATUS_CMD, INT_CMD, 3 ALLOW_PLURAL} 6148 #ifndef __MWERKS__6149 6146 ,{jjSTATUS_M, STATUS_CMD, INT_CMD, 4 ALLOW_PLURAL} 6150 #endif6151 6147 ,{loSimplex, SIMPLEX_CMD, LIST_CMD, 6 NO_PLURAL} 6152 6148 ,{nuUResSolve, URSOLVE_CMD, LIST_CMD, 4 NO_PLURAL} -
Singular/libparse.l
raaa49c r111cfe 3 3 * Computer Algebra System SINGULAR * 4 4 ****************************************/ 5 /* $Id: libparse.l,v 1.5 7 2005-05-23 08:45:53Singular Exp $ */5 /* $Id: libparse.l,v 1.58 2005-07-26 17:06:58 Singular Exp $ */ 6 6 #include <stdio.h> 7 7 #include <string.h> … … 77 77 }; 78 78 int yylp_errno = 0; 79 80 #ifdef __MWERKS__81 #ifdef __cplusplus82 extern "C" {83 #endif84 long ftell(FILE *fp);85 #ifdef macintosh86 int fileno(FILE *stream);87 FILE *fdopen(int filedes, char *type);88 int isatty(int filedes);89 #else90 int _fileno(FILE *stream);91 FILE *_fdopen(int filedes, char *type);92 int _isatty(int filedes);93 #define fileno _fileno94 #define fdopen _fdopen95 #define isatty _isatty96 #endif /* macintosh */97 #ifdef __cplusplus98 }99 #endif100 #endif101 79 102 80 #ifdef STANDALONE_PARSER -
Singular/misc.cc
raaa49c r111cfe 558 558 #endif 559 559 #ifndef __OPTIMIZE__ 560 #ifdef __MWERKS__561 StringAppendS(" Codewarrior 2.0,");562 #else563 560 StringAppendS("-g,"); 564 #endif565 561 #endif 566 562 #ifdef HAVE_EIGENVAL -
Singular/mod2.h.in
raaa49c r111cfe 6 6 * DO NOT EDIT! 7 7 * 8 * Version: $Id: mod2.h.in,v 1.11 0 2005-04-28 12:25:32 hannesExp $8 * Version: $Id: mod2.h.in,v 1.111 2005-07-26 17:06:58 Singular Exp $ 9 9 *******************************************************************/ 10 10 #ifndef MOD2_H … … 162 162 /* Undefine to disable Gerhard's and Wilfried's fast and dirty std computations */ 163 163 #define FAST_AND_DIRTY 164 #ifdef __MWERKS__165 /* includes for Metrowerks */166 #include "mod2.mwerks.h"167 #endif168 164 169 165 /* eigenvalues */ -
Singular/ndbm.cc
raaa49c r111cfe 5 5 //**************************************************************************/ 6 6 // 7 // $Id: ndbm.cc,v 1.1 4 2000-11-22 16:38:54Singular Exp $7 // $Id: ndbm.cc,v 1.15 2005-07-26 17:06:58 Singular Exp $ 8 8 // 9 9 //**************************************************************************/ … … 39 39 # define ENOSPC 28 40 40 # define L_SET SEEK_SET 41 #ifdef macintosh42 # include <stdlib.h>43 # include <errno.h>44 # include "fcntl.h"45 # include <string.h>46 # include <stat.h>47 //# include <stat.h>48 #else49 # include <unix.h>50 # include <ThreadLocalData.h>51 #endif52 41 #else 53 42 # include <sys/types.h> … … 77 66 static int delitem(char buf[PBLKSIZ], int n); 78 67 static int additem(char buf[PBLKSIZ], datum item, datum item1); 79 #if defined(__MWERKS__) && ! defined(macintosh)80 #define errno (_GetThreadLocalData()->errno)81 #else82 68 extern int errno; 83 #endif84 69 85 70 DBM * … … 108 93 strcpy(db->dbm_pagbuf, file); 109 94 strcat(db->dbm_pagbuf, ".pag"); 110 #ifdef __MWERKS__111 db->dbm_pagf = open(db->dbm_pagbuf, flags);112 #else /* not __MWERKS__ */113 95 db->dbm_pagf = open(db->dbm_pagbuf, flags, mode); 114 #endif /* __MWERKS__ */115 96 if (db->dbm_pagf < 0) 116 97 goto bad; 117 98 strcpy(db->dbm_pagbuf, file); 118 99 strcat(db->dbm_pagbuf, ".dir"); 119 #ifdef __MWERKS__120 db->dbm_dirf = open(db->dbm_pagbuf, flags);121 #else /* not __MWERKS__ */122 100 db->dbm_dirf = open(db->dbm_pagbuf, flags, mode); 123 #endif /* __MWERKS__ */124 101 if (db->dbm_dirf < 0) 125 102 goto bad1; -
Singular/tesths.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: tesths.cc,v 1.9 8 2005-05-03 09:35:17Singular Exp $ */4 /* $Id: tesths.cc,v 1.99 2005-07-26 17:06:58 Singular Exp $ */ 5 5 6 6 /* … … 59 59 extern void ttGen2(); 60 60 extern void ttGen4(); 61 #ifndef __MWERKS__ 62 extern void mpsr_ttGen(); // For initialization of (CMD, MP_COP) tables 63 mpsr_ttGen(); 64 #endif 61 extern void mpsr_ttGen(); // For initialization of (CMD, MP_COP) tables 62 mpsr_ttGen(); 65 63 ttGen4(); 66 64 ttGen1(); -
Singular/utils.cc
raaa49c r111cfe 5 5 #include "fegetopt.h" 6 6 #include "utils.h" 7 #ifdef __MWERKS__8 #define __GNU_LIBRARY__9 #include "fegetopt.h"10 #endif11 7 12 8 extern FILE *yylpin; -
Singular/weight.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: weight.cc,v 1.2 3 2003-03-11 16:54:06Singular Exp $ */4 /* $Id: weight.cc,v 1.24 2005-07-26 17:06:59 Singular Exp $ */ 5 5 6 6 /* … … 22 22 23 23 /*0 implementation*/ 24 #ifndef __MWERKS__25 24 extern "C" double (*wFunctional)(int *degw, int *lpol, int npol, 26 25 double *rel, double wx); … … 37 36 extern "C" void wGcd(int *x, int n); 38 37 extern double wNsqr; 39 #else40 #include "weight0.c"41 #endif /* __MWERKS__ */42 38 43 39 static void wDimensions(polyset s, int sl, int *lpol, int *npol, int *mons) -
kernel/febase.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: febase.cc,v 1. 4 2005-01-13 15:22:23Singular Exp $ */4 /* $Id: febase.cc,v 1.5 2005-07-26 17:04:15 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: i/o system … … 17 17 #include <sys/stat.h> 18 18 #include <ctype.h> 19 #ifndef __MWERKS__20 19 #include <unistd.h> 21 #endif22 20 #ifdef NeXT 23 21 #include <sys/file.h> … … 695 693 } 696 694 697 #ifdef __MWERKS__698 #ifdef __cplusplus699 extern "C" {700 #endif701 #ifdef macintosh702 int isatty(int filedes);703 #else704 int _isatty(int filedes);705 #define isatty _isatty706 #endif /* macintosh */707 #ifdef __cplusplus708 }709 #endif710 #endif711 695 /*2 712 696 * init all data structures … … 925 909 } 926 910 927 #ifndef __MWERKS__928 911 #ifdef HAVE_TCL 929 912 extern "C" { … … 934 917 } 935 918 } 936 #endif937 919 #endif 938 920 -
kernel/febase.h
raaa49c r111cfe 4 4 * Computer Algebra System SINGULAR * 5 5 ****************************************/ 6 /* $Id: febase.h,v 1. 2 2005-05-04 07:50:49Singular Exp $ */6 /* $Id: febase.h,v 1.3 2005-07-26 17:04:15 Singular Exp $ */ 7 7 /* 8 8 * ABSTRACT: basic i/o … … 211 211 int path_only=FALSE); 212 212 213 #ifndef __MWERKS__214 213 #ifdef HAVE_TCL 215 214 … … 224 223 #define PrintTCL(A,B,C) Print("TCL-Err:%s",C) 225 224 #endif /* HAVE_TCL */ 226 #endif /* __MWERKS__ */227 225 228 226 char * StringAppend(char *fmt, ...); -
kernel/fegetopt.h
raaa49c r111cfe 101 101 #define optional_argument 2 102 102 103 #if __STDC__ || defined(PROTO) || defined(__MWERKS__)103 #if __STDC__ || defined(PROTO) 104 104 /* #if defined(__GNU_LIBRARY__)*/ 105 105 /* Many other libraries have conflicting prototypes for getopt, with -
kernel/mod2.h.in
raaa49c r111cfe 6 6 * DO NOT EDIT! 7 7 * 8 * Version: $Id: mod2.h.in,v 1. 4 2005-05-02 15:47:35 Singular Exp $8 * Version: $Id: mod2.h.in,v 1.5 2005-07-26 17:04:15 Singular Exp $ 9 9 *******************************************************************/ 10 10 #ifndef MOD2_H … … 160 160 /* Undefine to disable Gerhard's and Wilfried's fast and dirty std computations */ 161 161 #define FAST_AND_DIRTY 162 #ifdef __MWERKS__163 /* includes for Metrowerks */164 #include "mod2.mwerks.h"165 #else166 /* works around a quirk in gcc in the generation of parser tables */167 #define INIT_BUG168 #endif169 162 170 163 /* eigenvalues */ -
kernel/timer.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: timer.cc,v 1. 1.1.1 2003-10-06 12:16:04Singular Exp $ */4 /* $Id: timer.cc,v 1.2 2005-07-26 17:04:15 Singular Exp $ */ 5 5 6 6 /* … … 11 11 12 12 //the mpw timer is quite the same as the dos timer: 13 #ifdef __MWERKS__14 #define MSDOS15 #endif16 13 17 14 int timerv = 0; -
kernel/weight.cc
raaa49c r111cfe 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: weight.cc,v 1. 1.1.1 2003-10-06 12:15:56Singular Exp $ */4 /* $Id: weight.cc,v 1.2 2005-07-26 17:04:15 Singular Exp $ */ 5 5 6 6 /* … … 19 19 20 20 /*0 implementation*/ 21 #ifndef __MWERKS__22 21 extern "C" double (*wFunctional)(int *degw, int *lpol, int npol, 23 22 double *rel, double wx); … … 34 33 extern "C" void wGcd(int *x, int n); 35 34 extern double wNsqr; 36 #else37 #include "weight0.c"38 #endif /* __MWERKS__ */39 35 40 36 static void wDimensions(polyset s, int sl, int *lpol, int *npol, int *mons)
Note: See TracChangeset
for help on using the changeset viewer.