OpenXM_contrib2/asir2000/io/spexpr.c - diff

Return to spexpr.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / io

version 1.18, 2002/01/08 04:14:39

version 1.20, 2002/09/11 07:23:27

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/spexpr.c,v 1.17 2001/10/09 01:36:22 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/io/spexpr.c,v 1.19 2002/09/02 05:16:07 noro Exp $

#include "ca.h"

#include "al.h"

Line 79 int print_quote;

#define PRINTV printv

#define PRINTEXPR printexpr

#define PRINTNUM printnum

#define PRINTP printp

#define PRINTP asir_printp

#define PRINTR printr

#define PRINTLIST printlist

#define PRINTVECT printvect

Line 124 extern int print_quote;

#define PRINTV sprintv

#define PRINTEXPR sprintexpr

#define PRINTNUM sprintnum

#define PRINTP sprintp

#define PRINTP asir_sprintp

#define PRINTR sprintr

#define PRINTLIST sprintlist

#define PRINTVECT sprintvect

Line 555 V v;

else if ( (vid)v->attr == V_PF ) {

pf = ((PFINS)v->priv)->pf; ad = ((PFINS)v->priv)->ad;

if ( !strcmp(NAME(pf),"pow") ) {

PUTS("("); PRINTR(vl,(R)ad[0].arg); PUTS(")"); PRINTHAT; PUTS("(");

PUTS("(("); PRINTR(vl,(R)ad[0].arg); PUTS(")"); PRINTHAT; PUTS("(");

PRINTR(vl,(R)ad[1].arg); PUTS(")");

PRINTR(vl,(R)ad[1].arg); PUTS("))");

} else if ( !pf->argc ) {

TAIL PRINTF(OUT,"%s",NAME(pf));

} else {