[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.6 and 1.10

version 1.6, 2004/12/18 01:56:03 version 1.10, 2005/02/09 11:44:05
Line 1 
Line 1 
 %$OpenXM: OpenXM/src/kan96xx/Doc/gnuplot.sm1,v 1.5 2004/12/17 00:13:08 takayama Exp $  %$OpenXM: OpenXM/src/kan96xx/Doc/gnuplot.sm1,v 1.9 2005/02/04 11:54:06 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/gnuplot)] cat /plot.gnuplotexec set  [(which) (gnuplot)] oxshell /plot.gnuplotexec set
   %[OpenXM_HOME (/bin/gnuplot)] cat /plot.gnuplotexec set
 %(gnuplot) /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
Line 21 
Line 22 
 } def  } def
   
 /plotstart.aux {  /plotstart.aux {
     plot.gnuplotexec tag 0 eq {
       (No gnuplot is installed in this system.) error
     } { } ifelse
   {    {
     gnuplot.callingMethod 0 eq {      gnuplot.callingMethod 0 eq {
       plotstart.aux.0        plotstart.aux.0
Line 107 
Line 111 
   {    {
     [(fp2fclose) gnuplot.fifoFp] extension pop      [(fp2fclose) gnuplot.fifoFp] extension pop
   } ifelse    } ifelse
   [(rm) gnuplot.fifo] oxshell pop    % [(rm) gnuplot.fifo] oxshell pop % It  is OS dependent.
     [(unlink) gnuplot.fifo] extension
 } def  } def
   
   
Line 135 
Line 140 
   
 /gnuplot.1 {  /gnuplot.1 {
   /cccc set    /cccc set
     gnuplot.read.1
   [(fp2fputs) [cccc nl] cat gnuplot.pfp] extension pop    [(fp2fputs) [cccc nl] cat gnuplot.pfp] extension pop
   [(fp2fflush) gnuplot.pfp] extension pop    [(fp2fflush) gnuplot.pfp] extension pop
   gnuplot.read.1    gnuplot.read.1
     gnuplot.sync.1
 } def  } def
   
 %% (plot sin(x);) gnuplot  %% (plot sin(x);) gnuplot
Line 154 
Line 161 
    } loop     } loop
   } ifelse    } ifelse
  ] { (string) dc } map cat   ] { (string) dc } map cat
   } def
   
   % It uses "@" to wait for the gnuplot.
   /gnuplot.sync.1 {
     [(fp2fputs) [(print "@";) nl] cat gnuplot.pfp] extension pop
     [(fp2fflush) gnuplot.pfp] extension pop
     {
       [(fp2fgetc) gnuplot.fifoFp] extension 64 eq { exit} { } ifelse
     } loop
 } def  } def
   
 /isAlive {  /isAlive {
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.10
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>