OpenXM_contrib2/asir2000/io/bsave.c - diff

Return to bsave.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / io

Diff for /OpenXM_contrib2/asir2000/io/bsave.c between version 1.13 and 1.14

version 1.13, 2003/12/22 09:33:47

version 1.14, 2004/12/10 07:36:35

Line 44

* OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/io/bsave.c,v 1.12 2003/02/14 22:29:15 ohara Exp $

* $OpenXM: OpenXM_contrib2/asir2000/io/bsave.c,v 1.13 2003/12/22 09:33:47 noro Exp $

/* saveXXX must not use GC_malloc(), GC_malloc_atomic(). */

Line 62 void (*savef[])() = { 0, savenum, savep, saver, saveli

#if defined(INTERVAL)

void saveitv();

void saveitvd();

void (*nsavef[])() = { saveq, savereal, 0, savebf, saveitv, saveitvd, 0, saveitv, savecplx ,savemi, savelm, savegf2n, savegfpn, savegfs, savegfsn};

void (*nsavef[])() = { saveq, savereal, 0, savebf, saveitv, saveitvd, 0, saveitv, savecplx ,savemi, savelm, savegf2n, savegfpn, savegfs, savegfsn,savedalg};

#else

void (*nsavef[])() = { saveq, savereal, 0, savebf, savecplx ,savemi, savelm, savegf2n, savegfpn, savegfs, savegfsn};

void (*nsavef[])() = { saveq, savereal, 0, savebf, savecplx ,savemi, savelm, savegf2n, savegfpn, savegfs, savegfsn,savedalg};

#endif

static short zeroval = 0;

Line 199 void savegfsn(FILE *s,GFSN p)

d = DEG(BDY(p));

write_int(s,&d);

write_intarray(s,COEF(BDY(p)),d+1);

}

void savedalg(FILE *s,DAlg p)

{

saveobj(s,p->nm);

saveobj(s,p->dn);

}

void savep(FILE *s,P p)

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>