[BACK]Return to gnuplot.sm1 CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Doc

Diff for /OpenXM/src/kan96xx/Doc/gnuplot.sm1 between version 1.3 and 1.4

version 1.3, 2004/12/16 08:42:14 version 1.4, 2004/12/16 11:41:58
Line 1 
Line 1 
 %$OpenXM: OpenXM/src/kan96xx/Doc/gnuplot.sm1,v 1.2 1999/11/17 00:28:54 takayama Exp $  %$OpenXM: OpenXM/src/kan96xx/Doc/gnuplot.sm1,v 1.3 2004/12/16 08:42:14 takayama Exp $
 %%% 1999, 6/7 Mon.  %%% 1999, 6/7 Mon.
 [(parse) (ox.sm1) pushfile] extension  [(parse) (ox.sm1) pushfile] extension
 [(getenv) (OpenXM_HOME)] extension /OpenXM_HOME set  [(getenv) (OpenXM_HOME)] extension /OpenXM_HOME set
   
 [OpenXM_HOME (/bin/gnuplot4ox)] cat /plot.gnuplotexec set  [OpenXM_HOME (/bin/gnuplot4ox)] cat /plot.gnuplotexec set
   %(gnuplot) /plot.gnuplotexec set
   
 (SSkan/lib/plot.sm1 for ox_sm1_gnuplot.  1999/09/03. ) message  (SSkan/lib/plot.sm1 for ox_sm1_gnuplot.  1999/09/03. ) message
   
 /gnuplot.callingMethod 0 def  % 0 : old, 1 : pipe, 2: file  /gnuplot.callingMethod 1 def  % 0 : old, 1 : pipe, 2: file
   
 /plotstart {  /plotstart {
   sm1connectr    sm1connectr
Line 59 
Line 60 
     [(fp2mkfifo) gnuplot.fifo]  extension message      [(fp2mkfifo) gnuplot.fifo]  extension message
     gnuplot.fifo message      gnuplot.fifo message
     [(fp2popen) plot.gnuplotexec (w)] extension /gnuplot.pfp set      [(fp2popen) plot.gnuplotexec (w)] extension /gnuplot.pfp set
     [(fp2fopen) gnuplot.fifo (r)] extension /gnuplot.fifoFp set      (Started gnuplot) message
     % BUG! It does not return.  
   
     [(fp2fputs) [(set mouse; set print ") gnuplot.fifo (" ; ) nl ] cat      [(fp2fputs) [(set mouse; set print ") gnuplot.fifo (" ; ) nl ] cat
      gnuplot.pfp ] extension message       gnuplot.pfp ] extension message
     [(fp2fflush) gnuplot.pfp] extension message      [(fp2fflush) gnuplot.pfp] extension message
   
       [(fp2fopen) gnuplot.fifo (r)] extension /gnuplot.fifoFp set
       % This must be the last. Otherwise, fopen is blocked.
       /gnuplot.pid -2 def  % dummy.
       gnuplot.pid message
 } def  } def
   
   /plotstop {
     gnuplot.ccc $ plotstop.aux $ oxsubmit
   } def
   
 /plotstop.aux {  /plotstop.aux {
   {    {
     gnuplot.callingMethod 0 eq {      gnuplot.callingMethod 0 eq {
Line 85 
Line 94 
 /plotstop.aux.0 { } def  /plotstop.aux.0 { } def
 /plotstop.aux.1 {  /plotstop.aux.1 {
   [(fp2fclose) gnuplot.pfp] extension pop    [(fp2fclose) gnuplot.pfp] extension pop
   [(fp2fclose) gnuplot.fifo] extension pop    [(fp2fclose) gnuplot.fifoFp] extension pop
   [(rm) gnuplot.fifo] oxshell pop    [(rm) gnuplot.fifo] oxshell pop
 } def  } def
   
Line 217 
Line 226 
   
   
 $plotstart ;   (plot sin(x);) rplot$ message  $plotstart ;   (plot sin(x);) rplot$ message
   $plotstart.aux ; (splot x**2-y**2;) gnuplot $ message

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

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