OpenXM_contrib2/asir2000/io/bload.c - diff

Return to bload.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / io

Diff for /OpenXM_contrib2/asir2000/io/bload.c between version 1.7 and 1.8

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

version 1.8, 2001/03/16 01:56:18

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/bload.c,v 1.6 2000/12/22 10:03:30 saito Exp $

* $OpenXM: OpenXM_contrib2/asir2000/io/bload.c,v 1.7 2000/12/24 06:32:31 saito Exp $

#include "ca.h"

#include "parse.h"

Line 66 void loadr(FILE *,R *);

void loadp(FILE *,P *);

void loadgf2n(FILE *,GF2N *);

void loadgfpn(FILE *,GFPN *);

void loadgfs(FILE *,GFS *);

void loadlm(FILE *,LM *);

void loadmi(FILE *,MQ *);

void loadcplx(FILE *,C *);

Line 85 void (*loadf[])() = { 0, loadnum, loadp, loadr, loadli

Line 86 void (*loadf[])() = { 0, loadnum, loadp, loadr, loadli

#if defined(INTERVAL)

void loaditv();

void loaditvd();

void (*nloadf[])() = { loadq, loadreal, 0, loadbf, loaditv, loaditvd, 0, loaditv, loadcplx, loadmi, loadlm, loadgf2n, loadgfpn };

void (*nloadf[])() = { loadq, loadreal, 0, loadbf, loaditv, loaditvd, 0, loaditv, loadcplx, loadmi, loadlm, loadgf2n, loadgfpn, loadgfs };

#else

void (*nloadf[])() = { loadq, loadreal, 0, loadbf, loadcplx, loadmi, loadlm, loadgf2n, loadgfpn };

void (*nloadf[])() = { loadq, loadreal, 0, loadbf, loadcplx, loadmi, loadlm, loadgf2n, loadgfpn, loadgfs };

#endif

void loadobj(s,p)

Line 290 GFPN *p;

Line 291 GFPN *p;

for ( i = 0; i <= d; i++ )

loadobj(s,(Obj *)&body->c[i]);

MKGFPN(body,*p);

}

void loadgfs(s,p)

FILE *s;

GFS *p;

{

GFS q;

char dmy;

read_char(s,&dmy);

NEWGFS(q); read_int(s,(int *)&CONT(q));

*p = q;

}

void loadp(s,p)

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