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

Diff for /OpenXM/src/ox_math/Attic/testclient.c between version 1.4 and 1.5

version 1.4, 1999/11/07 12:12:56 version 1.5, 1999/12/14 09:31:56
Line 1 
Line 1 
 /* -*- mode: C; coding: euc-japan -*- */  /* -*- mode: C; coding: euc-japan -*- */
 /* $OpenXM: OpenXM/src/ox_math/testclient.c,v 1.3 1999/11/06 21:39:37 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_math/testclient.c,v 1.4 1999/11/07 12:12:56 ohara Exp $ */
   
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
Line 40  int prompt()
Line 40  int prompt()
 int test_0()  int test_0()
 {  {
     cmo* c = NULL;      cmo* c = NULL;
   #ifdef DEBUG
       fprintf(stderr, "testclient:: calling ox_mathcap().\n");
       c = ox_mathcap(sv);
       fprintf(stderr, "testclient:: cmo received.(%p)\n", c);
   #else
       c = ox_mathcap(sv);
   #endif
       print_cmo(c);
       fflush(stderr);
       send_ox_cmo(sv->stream, make_mathcap_object(VERSION, ID_STRING));
   
         ox_mathcap(sv);  
         send_ox_cmo(sv->stream, make_mathcap_object(VERSION, ID_STRING));  
   
     ox_reset(sv);      ox_reset(sv);
     send_ox_cmo(sv->stream, new_cmo_string("N[ArcTan[1]]"));      send_ox_cmo(sv->stream, new_cmo_string("N[ArcTan[1]]"));
     send_ox_command(sv->stream, SM_executeStringByLocalParser);      send_ox_command(sv->stream, SM_executeStringByLocalParser);
Line 54  int test_0()
Line 61  int test_0()
     print_cmo(c);      print_cmo(c);
 }  }
   
   int test_1()
   {
       cmo *c = NULL;
       cmo *m = make_mathcap_object(1000, "test!");
       fprintf(stderr, "testclient:: test cmo_mathcap.\n");
       send_ox_cmo(sv->stream, m);
       send_ox_command(sv->stream, SM_popCMO);
       receive_ox_tag(sv->stream);
       c = receive_cmo(sv->stream);
       fprintf(stderr, "testclient:: cmo received.(%p)\n", c);
       print_cmo(c);
       fputc('\n', stderr);
   }
   
 int main(int argc, char* argv[])  int main(int argc, char* argv[])
 {  {
     ox* m = NULL;      ox* m = NULL;
Line 73  int main(int argc, char* argv[])
Line 94  int main(int argc, char* argv[])
         exit(1);          exit(1);
     }      }
   
     if (strcmp(argc, "ox_math")==0) {      if (strcmp(argv[1], "ox_math")==0) {
                 test_0();          test_1();
     }      }
   
     while(prompt(), (m = parse()) != NULL) {      while(prompt(), (m = parse()) != NULL) {
         send_ox(sv, m);          send_ox(sv->stream, m);
         if (m->tag == OX_COMMAND) {          if (m->tag == OX_COMMAND) {
             code = ((ox_command *)m)->command;              code = ((ox_command *)m)->command;
             if (code >= 1024) {              if (code >= 1024) {
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>