version 1.3, 2001/05/04 01:06:24 |
version 1.7, 2020/10/06 11:33:46 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/Kan/poly.c,v 1.2 2000/01/16 07:55:40 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/poly.c,v 1.6 2010/01/27 15:10:08 ohara Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
|
#include <stdlib.h> |
#include "datatype.h" |
#include "datatype.h" |
#include "stackm.h" |
#include "stackm.h" |
#include "extern.h" |
#include "extern.h" |
#include "extern2.h" |
#include "extern2.h" |
|
void initSyzRingp(void); /* defined in gradedset.h */ |
|
|
|
|
void KinitKan(void) { |
void KinitKan(void) { |
|
|
extern int Msize; |
extern int Msize; |
Line 54 void KinitKan(void) { |
|
Line 55 void KinitKan(void) { |
|
SmallRing.gbListTower = NULL; |
SmallRing.gbListTower = NULL; |
SmallRing.outputOrder = outputOrderForSmallRing; |
SmallRing.outputOrder = outputOrderForSmallRing; |
SmallRing.name = "SmallRingp"; |
SmallRing.name = "SmallRingp"; |
|
SmallRing.partialEcart = 0; |
|
|
CurrentRingp = &SmallRing; |
CurrentRingp = &SmallRing; |
initSyzRingp(); |
initSyzRingp(); |
Line 87 void KinitKan(void) { |
|
Line 89 void KinitKan(void) { |
|
#ifndef NOGC |
#ifndef NOGC |
void *sGC_realloc2(void *p,size_t old,size_t new) |
void *sGC_realloc2(void *p,size_t old,size_t new) |
{ |
{ |
return((void *)sGC_realloc(p,(int) new)); |
return(sGC_realloc(p,new)); |
} |
} |
void sGC_free2(void *p,size_t size) |
void sGC_free2(void *p,size_t size) |
{ |
{ |