[BACK]Return to pexpr.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / io

Diff for /OpenXM_contrib2/asir2000/io/pexpr.c between version 1.16 and 1.17

version 1.16, 2001/09/03 07:01:08 version 1.17, 2001/10/09 01:36:21
Line 44 
Line 44 
  * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY   * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,   * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.   * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  * $OpenXM: OpenXM_contrib2/asir2000/io/pexpr.c,v 1.15 2001/08/28 05:46:26 noro Exp $   * $OpenXM$
 */  */
 #include "ca.h"  #include "ca.h"
 #include "al.h"  #include "al.h"
Line 170  void PRINTCPLX();
Line 170  void PRINTCPLX();
 void PRINTLM();  void PRINTLM();
 void PRINTLF();  void PRINTLF();
 void PRINTUP2();  void PRINTUP2();
   void PRINTUP();
   void PRINTUM();
   void PRINTFOP();
   void PRINTEOP();
   void PRINTLOP();
   void PRINTQOP();
   void PRINTSF();
   
 #ifdef FPRINT  #ifdef FPRINT
 void output_init() {  void output_init() {
Line 200  P p;
Line 207  P p;
 void printbf(a)  void printbf(a)
 BF a;  BF a;
 {  {
           void sor();
   
         sor(a->body,double_output ? 'f' : 'g',-1,0);          sor(a->body,double_output ? 'f' : 'g',-1,0);
 }  }
 #endif  #endif
Line 736  VL vl;
Line 745  VL vl;
 GFMMAT mat;  GFMMAT mat;
 {  {
         int row,col,i,j;          int row,col,i,j;
         unsigned int t;  
         unsigned int **b;          unsigned int **b;
   
         row = mat->row;          row = mat->row;
Line 756  VL vl;
Line 764  VL vl;
 BYTEARRAY array;  BYTEARRAY array;
 {  {
         int len,i;          int len,i;
         unsigned int t;  
         unsigned char *b;          unsigned char *b;
   
         len = array->len;          len = array->len;
Line 849  F f;
Line 856  F f;
         }          }
 }  }
   
 PRINTFOP(vl,f)  void PRINTFOP(vl,f)
 VL vl;  VL vl;
 F f;  F f;
 {  {
Line 864  F f;
Line 871  F f;
         }          }
 }  }
   
 PRINTEOP(vl,f)  void PRINTEOP(vl,f)
 VL vl;  VL vl;
 F f;  F f;
 {  {
Line 891  F f;
Line 898  F f;
         PUTS(")");          PUTS(")");
 }  }
   
 PRINTLOP(vl,f)  void PRINTLOP(vl,f)
 VL vl;  VL vl;
 F f;  F f;
 {  {
Line 917  F f;
Line 924  F f;
         PRINTEXPR(vl,(Obj)FPL(f)); PUTS(op); PUTS("0");          PRINTEXPR(vl,(Obj)FPL(f)); PUTS(op); PUTS("0");
 }  }
   
 PRINTQOP(vl,f)  void PRINTQOP(vl,f)
 VL vl;  VL vl;
 F f;  F f;
 {  {
Line 928  F f;
Line 935  F f;
         PRINTEXPR(vl,(Obj)FQMAT(f)); PUTS(")");          PRINTEXPR(vl,(Obj)FQMAT(f)); PUTS(")");
 }  }
   
 PRINTUP(n)  void PRINTUP(n)
 UP n;  UP n;
 {  {
         int i,d;          int i,d;
Line 962  UP n;
Line 969  UP n;
         }          }
 }  }
   
 PRINTUM(n)  void PRINTUM(n)
 UM n;  UM n;
 {  {
         int i,d;          int i,d;
Line 996  UM n;
Line 1003  UM n;
         }          }
 }  }
   
 PRINTSF(i)  void PRINTSF(i)
 unsigned int i;  unsigned int i;
 {  {
         if ( !i ) {          if ( !i ) {

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

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