[BACK]Return to print.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / ox_toolkit

Diff for /OpenXM/src/ox_toolkit/print.c between version 1.5 and 1.6

version 1.5, 2003/02/03 23:13:23 version 1.6, 2018/04/04 09:44:09
Line 1 
Line 1 
 /* -*- mode: C; coding: euc-japan -*- */  /* -*- mode: C; coding: euc-japan -*- */
 /* $OpenXM: OpenXM/src/ox_toolkit/print.c,v 1.4 2003/01/13 12:03:12 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_toolkit/print.c,v 1.5 2003/02/03 23:13:23 ohara Exp $ */
   
 /*  /*
 Functions in this module print a given CMO to console.  Functions in this module print a given CMO to console.
Line 15  static void print_cmo_int32(cmo_int32* c);
Line 15  static void print_cmo_int32(cmo_int32* c);
 static void print_cmo_list(cmo_list* li);  static void print_cmo_list(cmo_list* li);
 static void print_cmo_mathcap(cmo_mathcap* c);  static void print_cmo_mathcap(cmo_mathcap* c);
 static void print_cmo_string(cmo_string* c);  static void print_cmo_string(cmo_string* c);
   static void print_cmo_double(cmo_double* c);
   static void print_cmo_bf(cmo_bf* c);
   static void print_cmo_tree(cmo_tree* c);
   
 void print_cmo(cmo* c)  void print_cmo(cmo* c)
 {  {
Line 47  void print_cmo(cmo* c)
Line 50  void print_cmo(cmo* c)
     case CMO_DMS_GENERIC:      case CMO_DMS_GENERIC:
         ox_printf(")");          ox_printf(")");
         break;          break;
       case CMO_BIGFLOAT:
           print_cmo_bf((cmo_bf *)c);
           break;
       case CMO_IEEE_DOUBLE_FLOAT:
       case CMO_64BIT_MACHINE_DOUBLE:
           print_cmo_double((cmo_double *)c);
           break;
       case CMO_TREE:
           print_cmo_tree((cmo_tree *)c);
           break;
     default:      default:
         ox_printf("\nprint_cmo() does not know how to print cmo of type %d.\n", tag);          ox_printf("\nprint_cmo() does not know how to print cmo of type %d.\n", tag);
     }      }
Line 79  static void print_cmo_mathcap(cmo_mathcap* c)
Line 92  static void print_cmo_mathcap(cmo_mathcap* c)
 static void print_cmo_string(cmo_string* c)  static void print_cmo_string(cmo_string* c)
 {  {
     ox_printf(", \"%s\")", c->s);      ox_printf(", \"%s\")", c->s);
   }
   
   static void print_cmo_double(cmo_double* c)
   {
       ox_printf(", %.14f)", c->d);
   }
   
   static void print_cmo_bf(cmo_bf* c)
   {
           char buf[4096];
       mpfr_sprintf(buf, ", %.12f)", c->mpfr);
       ox_printf("%s", buf);
   }
   
   static void print_cmo_tree(cmo_tree* c)
   {
       ox_printf(", ");
       print_cmo(c->name);
       ox_printf(", ");
       print_cmo(c->attributes);
       ox_printf(", ");
       print_cmo(c->leaves);
       ox_printf(")");
 }  }
   
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>