OpenXM_contrib2/asir2000/io/pexpr_body.c - diff

Return to pexpr_body.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / io

version 1.3, 2004/05/14 06:02:54

version 1.4, 2004/07/13 07:59:54

Line 1

/* $OpenXM: OpenXM_contrib2/asir2000/io/pexpr_body.c,v 1.2 2004/03/26 08:25:36 noro Exp $ */

/* $OpenXM: OpenXM_contrib2/asir2000/io/pexpr_body.c,v 1.3 2004/05/14 06:02:54 noro Exp $ */

#define PRINTHAT (fortran_output?PUTS("**"):PUTS("^"))

Line 19 void PRINTGF2MAT();

void PRINTGFMMAT();

void PRINTBYTEARRAY();

void PRINTQUOTE();

void PRINTQUOTEARG();

void PRINTERR();

void PRINTCPLX();

void PRINTLM();

Line 83 Obj p;

Line 84 Obj p;

PRINTBYTEARRAY(vl,(BYTEARRAY)p); break;

case O_QUOTE:

PRINTQUOTE(vl,(QUOTE)p); break;

case O_QUOTEARG:

PRINTQUOTEARG(vl,(QUOTEARG)p); break;

case O_SYMBOL:

PRINTSYMBOL((SYMBOL)p); break;

case O_RANGE:

Line 996 QUOTE quote;

Line 999 QUOTE quote;

} else {

PUTS("<...quoted...>");

}

void PRINTQUOTEARG(vl,quote)

VL vl;

QUOTEARG quote;

{

PUTS("<...quoted...>");

}

void PRINTTB(VL vl,TB p)