[BACK]Return to ox_plot.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2018 / plot

Diff for /OpenXM_contrib2/asir2018/plot/ox_plot.c between version 1.1 and 1.2

version 1.1, 2018/09/19 05:45:08 version 1.2, 2018/09/28 08:20:29
Line 45 
Line 45 
  * 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: OpenXM_contrib2/asir2018/plot/ox_plot.c,v 1.1 2018/09/19 05:45:08 noro Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
Line 187  static void asir_do_cmd(unsigned int cmd,unsigned int 
Line 187  static void asir_do_cmd(unsigned int cmd,unsigned int 
       break;        break;
     case SM_getsp:      case SM_getsp:
       i=asir_OperandStackPtr+1;        i=asir_OperandStackPtr+1;
       STOQ(i,q);        STOZ(i,q);
       asir_push_one((Obj)q);        asir_push_one((Obj)q);
       break;        break;
     case SM_popSerializedLocalObject:      case SM_popSerializedLocalObject:
Line 252  static void asir_executeFunction(int serial){
Line 252  static void asir_executeFunction(int serial){
   switch (fno){    switch (fno){
   case 0://IFPLOT    case 0://IFPLOT
     id=plot(n,fno);      id=plot(n,fno);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 1://CONPLOT    case 1://CONPLOT
     id=plot(n,fno);      id=plot(n,fno);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 2://PLOT    case 2://PLOT
     id=plot(n,fno);      id=plot(n,fno);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 4://POLARPLOT    case 4://POLARPLOT
     id=plot(n,fno);      id=plot(n,fno);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 30://MEMORY_PLOT    case 30://MEMORY_PLOT
Line 276  static void asir_executeFunction(int serial){
Line 276  static void asir_executeFunction(int serial){
     break;      break;
   case 31://ARRAYPLOT    case 31://ARRAYPLOT
     id=arrayplot(n);      id=arrayplot(n);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 32://OPEN_CANVAS    case 32://OPEN_CANVAS
     id=open_canvas(n);      id=open_canvas(n);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 5://PLOTOVER    case 5://PLOTOVER
Line 308  static void asir_executeFunction(int serial){
Line 308  static void asir_executeFunction(int serial){
 // ifplotNG  // ifplotNG
   case 36://OBJ_CP    case 36://OBJ_CP
     id=objcp(n);      id=objcp(n);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 6://IFPLOTD    case 6://IFPLOTD
Line 324  static void asir_executeFunction(int serial){
Line 324  static void asir_executeFunction(int serial){
   case 24://ITVIFPLOT    case 24://ITVIFPLOT
 #endif  #endif
     id=ifplotNG(n,fno);      id=ifplotNG(n,fno);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 12://INEQNDAND    case 12://INEQNDAND
Line 340  static void asir_executeFunction(int serial){
Line 340  static void asir_executeFunction(int serial){
   case 26://PLOTOVERQ    case 26://PLOTOVERQ
   case 27://PLOTOVERB    case 27://PLOTOVERB
     id=ifplotOP(n,fno);      id=ifplotOP(n,fno);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   case 38://POLARPLOTD    case 38://POLARPLOTD
     id=polarplotNG(n);      id=polarplotNG(n);
     STOQ(id,ret);      STOZ(id,ret);
     asir_push_one((Obj)ret);      asir_push_one((Obj)ret);
     break;      break;
   }    }
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>