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.4 and 1.7

version 1.4, 2000/11/08 08:02:51

version 1.7, 2000/12/24 06:32:31

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.3 2000/08/22 05:04:17 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/io/bsave.c,v 1.6 2000/12/22 10:03:30 saito Exp $

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

#include "ca.h"

#include "parse.h"

#if INET

#include "com.h"

#endif

#if PARI

#include "genpari.h"

Line 84 void savebytearray(FILE *,BYTEARRAY);

Line 82 void savebytearray(FILE *,BYTEARRAY);

void (*savef[])() = { 0, savenum, savep, saver, savelist, savevect,

savemat, savestring, 0, savedp, saveui, saveerror,0,0,0,savegfmmat, savebytearray };

#if defined(INTERVAL)

void saveitv();

void saveitvd();

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

#else

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

#endif

static short zeroval = 0;

Line 169 BF p;

Line 173 BF p;

error("savebf : PARI is not combined");

#endif

}

#if defined(INTERVAL)

void saveitv(s,p)

FILE *s;

Itv p;

{

saveobj(s,(Obj)INF(p));

saveobj(s,(Obj)SUP(p));

}

void saveitvd(s,p)

FILE *s;

ItvD p;

{

write_double(s,&INF(p));

write_double(s,&SUP(p));

}

#endif

void savecplx(s,p)

FILE *s;

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