Changeset 31a04de in git
- Timestamp:
- Mar 2, 2011, 9:49:15 AM (13 years ago)
- Branches:
- (u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38077648e7239f98078663eb941c3c979511150a')
- Children:
- 4878eb2d5380dde4d59563d569c292c8a227914a
- Parents:
- bca6c660909a69030726efe925ffb8ebe3f45148
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/extra.cc
rbca6c6 r31a04de 16 16 #include <kernel/mod2.h> 17 17 #include <misc_ip.h> 18 #include <blackbox.h>19 18 20 19 #ifdef TIME_WITH_SYS_TIME … … 162 161 //#endif /* not HAVE_DYNAMIC_LOADING */ 163 162 164 #include <Singular/bigintm.h>165 166 163 #ifdef ix86_Win 167 164 //#include <Python.h> … … 177 174 #ifdef ix86_Win /* PySingular initialized? */ 178 175 static int PyInitialized = 0; 179 #endif180 181 #if SIZEOF_LONG == 8182 static number jjLONG2N(long d)183 {184 int i=(int)d;185 if ((long)i == d)186 {187 return nlInit(i, NULL);188 }189 else190 {191 #if !defined(OM_NDEBUG) && !defined(NDEBUG)192 omCheckBin(rnumber_bin);193 #endif194 number z=(number)omAllocBin(rnumber_bin);195 #if defined(LDEBUG)196 z->debug=123456;197 #endif198 z->s=3;199 mpz_init_set_si(z->z,d);200 return z;201 }202 }203 #else204 #define jjLONG2N(D) nlInit((int)D, NULL)205 176 #endif 206 177 … … 3901 3872 else 3902 3873 #endif 3903 /*==================== listing all blackbox types (debug stuff) =========*/3904 if(strcmp(sys_cmd,"blackbox")==0)3905 {3906 printBlackboxTypes();3907 return FALSE;3908 } else3909 /*==================== init the bigintm (a sample blackbox) type =========*/3910 if(strcmp(sys_cmd,"bigintm_setup") == 0)3911 {3912 return bigintm_setup();3913 } else3914 3874 /*==================== Error =================*/ 3915 3875 Werror( "(extended) system(\"%s\",...) %s", sys_cmd, feNotImplemented );
Note: See TracChangeset
for help on using the changeset viewer.