Changeset 27fc50 in git
- Timestamp:
- Apr 25, 2011, 8:25:05 AM (12 years ago)
- Branches:
- (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
- Children:
- a450864c27b9804e7ff6a533512615d3386bbff7
- Parents:
- 3ebb22ee86653ce026fa2cff30316e8ec3230c4d
- Files:
-
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
dyn_modules/bigintm/SConstruct
r3ebb22e r27fc50 1 1 # Emacs edit mode for this file is -*- python -*- 2 3 from SCons.Defaults import SharedCheck, ProgScan 4 from SCons.Script.SConscript import SConsEnvironment 2 5 3 6 MODNAME = 'bigintm' … … 17 20 CXXTEMPLFLAGS = "-fno-implicit-templates --no-exceptions" 18 21 19 20 22 BUNDLETEMPFLAGS = '$LDMODULEFLAGS -twolevel_namespace -weak_reference_mismatches weak -undefined dynamic_lookup' 21 23 22 24 ### for the use with "scons debug=1" … … 30 32 CPPPATH = SING_INCLUDES, 31 33 CXXFLAGS = "-g -Wextra -Wall -pedantic -Wno-long-long " + CXXTEMPLFLAGS, 34 LDMODULEFLAGS = BUNDLETEMPFLAGS, 32 35 LIBS=[]) 33 36 Default(syzextra_debug_if) 34 37 else: 35 38 ### Works with any Singular 36 syzextra_if = env. SharedLibrary(MODNAME,39 syzextra_if = env.LoadableModule(MODNAME, 37 40 SRCS, 38 41 SHLIBPREFIX="", … … 43 46 CXXFLAGS = "-O3 -fomit-frame-pointer --no-rtti " + CXXTEMPLFLAGS, 44 47 CCFLAGS="-O3 -fomit-frame-pointer ", 48 LDMODULEFLAGS = BUNDLETEMPFLAGS, 45 49 LIBS=[]) 46 50 Default(syzextra_if) -
dyn_modules/bigintm/bigintm.cc
r3ebb22e r27fc50 292 292 #endif 293 293 294 } ;294 } 295 295 296 296 // this is only a demo -
dyn_modules/syzextra/SConstruct
r3ebb22e r27fc50 1 1 # Emacs edit mode for this file is -*- python -*- 2 3 from SCons.Defaults import SharedCheck, ProgScan 4 from SCons.Script.SConscript import SConsEnvironment 2 5 3 6 MODNAME = 'syzextra' … … 17 20 CXXTEMPLFLAGS = "-fno-implicit-templates --no-exceptions" 18 21 19 20 22 ## BUNDLETEMPFLAGS = '$LDMODULEFLAGS -flat_namespace -undefined suppress' 23 BUNDLETEMPFLAGS = '$LDMODULEFLAGS -twolevel_namespace -weak_reference_mismatches weak -undefined dynamic_lookup' 21 24 22 25 ### for the use with "scons debug=1" … … 30 33 CPPPATH = SING_INCLUDES, 31 34 CXXFLAGS = "-g -Wextra -Wall -pedantic -Wno-long-long " + CXXTEMPLFLAGS, 35 LDMODULEFLAGS = BUNDLETEMPFLAGS, 32 36 LIBS=[]) 33 37 Default(syzextra_debug_if) 34 38 else: 35 39 ### Works with any Singular 36 syzextra_if = env. SharedLibrary(MODNAME,40 syzextra_if = env.LoadableModule(MODNAME, 37 41 SRCS, 38 42 SHLIBPREFIX="", … … 43 47 CXXFLAGS = "-O3 -fomit-frame-pointer --no-rtti " + CXXTEMPLFLAGS, 44 48 CCFLAGS="-O3 -fomit-frame-pointer ", 49 LDMODULEFLAGS = BUNDLETEMPFLAGS, 45 50 LIBS=[]) 46 51 Default(syzextra_if) -
kernel/Makefile.in
r3ebb22e r27fc50 376 376 ## 377 377 378 p_Procs_%.sog: p_Procs_Lib_%.dl_og 379 $ {CXXG} ${CXXFLAGSG} ${SFLAGS} ${SLDFLAGS} $< -o $@378 p_Procs_%.sog: p_Procs_Lib_%.dl_og 379 $(LD) ${SLDFLAGS} -o $@ $^ 380 380 381 381 p_Procs_Lib_%.dl_og : p_Procs_Lib.cc p_Procs_Dynamic.og -
kernel/gring.h
r3ebb22e r27fc50 134 134 { 135 135 return r->GetNC(); 136 } ;136 } 137 137 138 138 inline nc_type& ncRingType(nc_struct* p) … … 140 140 assume(p!=NULL); 141 141 return (p->ncRingType()); 142 } ;142 } 143 143 144 144 inline nc_type ncRingType(ring r) // Get … … 148 148 else 149 149 return (nc_error); 150 } ;150 } 151 151 152 152 inline void ncRingType(ring r, nc_type t) // Set … … 154 154 assume((r != NULL) && (r->GetNC() != NULL)); 155 155 ncRingType(r->GetNC()) = t; 156 }; 157 156 } 158 157 159 158 inline void ncRingType(nc_struct* p, nc_type t) // Set … … 161 160 assume(p!=NULL); 162 161 ncRingType(p) = t; 163 }; 164 165 166 162 } 167 163 168 164 … … 260 256 261 257 262 // inline const nc_struct* GetNC() const { return GetBasering()->GetNC(); } ;258 // inline const nc_struct* GetNC() const { return GetBasering()->GetNC(); } 263 259 264 260 … … 273 269 assume( (i > 0) && (i < j) && (j <= ncols) ); 274 270 return ( C->m[ncols * ((i)-1) + (j)-1] ); 275 } ;271 } 276 272 277 273 // get D_{i,j}, 1 <= row = i < j = col <= N … … 284 280 assume( (i > 0) && (i < j) && (j <= ncols) ); 285 281 return ( D->m[ncols * ((i)-1) + (j)-1] ); 286 } ;282 } 287 283 288 284 -
kernel/ideals.h
r3ebb22e r27fc50 78 78 while ((j >= 0) && (mm[j] == NULL)) j--; 79 79 return (j + 1); 80 } ;80 } 81 81 82 82 void idNorm(ideal id); -
kernel/kutil.h
r3ebb22e r27fc50 368 368 void cleanT (kStrategy strat); 369 369 static inline LSet initL (int nr=setmaxL) 370 { return (LSet)omAlloc(nr*sizeof(LObject)); } ;370 { return (LSet)omAlloc(nr*sizeof(LObject)); } 371 371 void deleteInL(LSet set, int *length, int j,kStrategy strat); 372 372 void enterL (LSet *set,int *length, int *LSetmax, LObject p,int at); -
kernel/mod_raw.cc
r3ebb22e r27fc50 33 33 { 34 34 const char mach_o[]={0xfe,0xed,0xfa,0xce,0}; 35 const char mach_o_module[]={0xce,0xfa,0xed,0xfe,0}; 35 36 char buf[BYTES_TO_CHECK+1]; /* one extra for terminating '\0' */ 36 37 struct stat sb; … … 76 77 goto lib_type_end; 77 78 } 79 80 if( (strncmp(buf, &mach_o_module[0], 4)==0)) /* Mach-O bundle */ 81 { 82 LT = LT_MACH_O; 83 //omFree(newlib); 84 //newlib = omStrDup(libnamebuf); 85 goto lib_type_end; 86 } 87 88 78 89 if( (strncmp(buf, "\02\020\01\016\05\022@", 7)==0)) 79 90 { -
kernel/sca.h
r3ebb22e r27fc50 40 40 41 41 return (r->GetNC()->FirstAltVar()); 42 } ;42 } 43 43 44 44 inline unsigned int scaLastAltVar(ring r) … … 47 47 48 48 return (r->GetNC()->LastAltVar()); 49 } ;49 } 50 50 51 51 … … 56 56 57 57 r->GetNC()->FirstAltVar() = n; 58 } ;58 } 59 59 60 60 inline void scaLastAltVar(ring r, int n) … … 63 63 64 64 r->GetNC()->LastAltVar() = n; 65 } ;65 } 66 66 67 67
Note: See TracChangeset
for help on using the changeset viewer.