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

Diff for /OpenXM/src/kan96xx/Doc/ox.sm1 between version 1.54 and 1.59

version 1.54, 2006/03/03 00:43:02 version 1.59, 2015/08/03 21:12:54
Line 1 
Line 1 
 %%%%%%%%%%%  $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.53 2006/02/25 09:11:10 takayama Exp $  %%%%%%%%%%%  $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.58 2013/09/19 10:15:11 takayama Exp $
   
 /ox.sm1.myname (ox-new.sm1) def  /ox.sm1.myname (ox-new.sm1) def
   
Line 54  ox.version [(Version)] system_variable gt 
Line 54  ox.version [(Version)] system_variable gt 
    /Xm_noX 1 def     /Xm_noX 1 def
 } def  } def
   
   (@@@.monitor) boundp {
   }{
     /@@@.monitor ( ) def
   } ifelse
   
   /oxMonitor {
     /@@@.monitor ( -monitor ) def
   } def
   
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%   basic functions for OX-RFC 100  %%%   basic functions for OX-RFC 100
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Line 118  ox.version [(Version)] system_variable gt 
Line 126  ox.version [(Version)] system_variable gt 
  $        ex 2.  (ox.sm1) run oxNoX (x^2-1). fctr pmat ; $   $        ex 2.  (ox.sm1) run oxNoX (x^2-1). fctr pmat ; $
  $   $   $   $
  $cf. extension-oxLog $   $cf. extension-oxLog $
    (oxMonitor : ox_sm1 server outputs packet dumps.)
    $        ex 1. (ox.sm1) run oxMonitor sm1connectr $
  ]   ]
 ] putUsages  ] putUsages
   
Line 687  ox.verbose { oxhelp } {  } ifelse
Line 697  ox.verbose { oxhelp } {  } ifelse
   @@@.quiet { ( -quiet ) } {  } ifelse    @@@.quiet { ( -quiet ) } {  } ifelse
   Xm_noX { ( -nox ) } {  } ifelse    Xm_noX { ( -nox ) } {  } ifelse
   Xm_engineLogToStdout { ( -nox -engineLogToStdout ) } { } ifelse %bug.onlyForsm1    Xm_engineLogToStdout { ( -nox -engineLogToStdout ) } { } ifelse %bug.onlyForsm1
   ( -oxserver bin/ox_sm1 -e ) ( -reverse )    ( -oxserver bin/ox_sm1 -e ) ( -reverse ) @@@.monitor
   ( -data ) data ( -control ) control   pass [1 2] get    ( -data ) data ( -control ) control   pass [1 2] get
   ( )] cat execve    ( )] cat execve
  [(oxCreateClient2) peer 0 pass 0 get] extension /oxsm1.ccc set   [(oxCreateClient2) peer 0 pass 0 get] extension /oxsm1.ccc set
Line 743  ox.verbose { oxhelp } {  } ifelse
Line 753  ox.verbose { oxhelp } {  } ifelse
 [(sm1connectr-ssh)  [(sm1connectr-ssh)
 [([hostname login-name] sm1connectr-ssh client)  [([hostname login-name] sm1connectr-ssh client)
  (Starting oxpath.oxsm1-ssh by the launcher oxpath.ox-ssh on the "hostname".)   (Starting oxpath.oxsm1-ssh by the launcher oxpath.ox-ssh on the "hostname".)
  (cf. oxNoX )   (cf. oxNoX  ox )
  (Set the following varialbes to appropriate values:)   (Set the following varialbes to appropriate values:)
  (oxpath.oxlog.xterm-ssh  oxpath.oxsm1-ssh  oxpath.ox-ssh myhostname-ssh )   (oxpath.oxlog.xterm-ssh  oxpath.oxsm1-ssh  oxpath.ox-ssh myhostname-ssh )
  $Example 1: $   $Example 1: $
Line 796  ox.verbose { oxhelp } {  } ifelse
Line 806  ox.verbose { oxhelp } {  } ifelse
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%   Aux functions for ox_asir  %%%   Aux functions for ox_asir
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 /ox_asirConnectMethod { asirconnectr /oxasir.ccc set } def  /ox_asirConnectMethod {
     asirconnectr /oxasir.ccc set
     [(getenv) (OX_ASIR_LOAD_FILE)] extension tag 0 eq { 0 }
     { /oxasir.loadfile [$load("$[(getenv) (OX_ASIR_LOAD_FILE)] extension $");$]
       cat  def
       oxasir.ccc oxasir.loadfile oxsubmit
       oxasir.ccc oxpopcmo } ifelse
   } def
 /oxasir.loadmethod 1 def   %% "..." oxsendcmo (load) ox...  /oxasir.loadmethod 1 def   %% "..." oxsendcmo (load) ox...
 /oxasir.verbose 0   def  /oxasir.verbose 0   def
 /oxasir.ccc load isArray  /oxasir.ccc load isArray
Line 1712  oxasir.verbose {
Line 1729  oxasir.verbose {
  $   [1 2 ] ] asir.wgr   $   $   [1 2 ] ] asir.wgr   $
 ]] putUsages  ]] putUsages
   
   /print_tex_form.aux {
     /arg1 set
     [/f /ans] pushVariables
     [
        arg1 /f set
        [(UseDsmall)] system_variable /vv set
        [(UseDsmall) 1] system_variable
        f isArray {
          f { print_tex_form.aux } map /ans set
        }{
          [$quote($, f toString, $) $] cat /ans set
        } ifelse
       [(UseDsmall) vv] system_variable
        ans /arg1 set
     ] pop
     popVariables
     arg1
   } def
   
   /print_tex_form {
     /arg1 set
     [/f /comm /vv] pushVariables
     [(CurrentRingp)] pushEnv
     [
       /f arg1 def
       oxasir.ccc [ ] eq {
          (Starting ox_asir server.) message
           ox_asirConnectMethod
       } {  } ifelse
   
       oxasir.ccc ( quotetotex_env("conv_rule",7); ) oxsubmit
       oxasir.ccc oxpopcmo ;
   
       f print_tex_form.aux /f set
       [$ print_tex_form($,  f $); $] cat /comm set
       oxasir.ccc comm oxsubmit
       oxasir.ccc oxpopcmo /arg1 set
     ] pop
     popEnv
     popVariables
     arg1
   } def
   
   [(print_tex_form)
   [ (obj print_tex_form str)
   ]] putUsages
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%% functions to start ox_asir  %%% functions to start ox_asir
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Line 1849  oxasir.verbose {
Line 1912  oxasir.verbose {
  [(where),[(shell), (length)]],   [(where),[(shell), (length)]],
  [(reason_of_error), (invalid argument)],   [(reason_of_error), (invalid argument)],
  [(asir_where),[[(toplevel),10],[(string),(foo),3],[(string),(hoge),-1]]   [(asir_where),[[(toplevel),10],[(string),(foo),3],[(string),(hoge),-1]]
 ]  ]]
 /i1 set  /i1 set
 %% /translateErrorForCfep.sampleInput  set  %% /translateErrorForCfep.sampleInput  set
   
Line 1961  oxasir.verbose {
Line 2024  oxasir.verbose {
     cl oxgetsp /n set      cl oxgetsp /n set
     n tag 0 eq { /n 0 def } { } ifelse      n tag 0 eq { /n 0 def } { } ifelse
     n tag 15 eq { n (integer) dc /n set } { } ifelse      n tag 15 eq { n (integer) dc /n set } { } ifelse
     cl n oxpops pop      cl n oxpops
   ] pop    ] pop
   popVariables    popVariables
 } def  } def
Legend:
Removed from v.1.54  
changed lines
  Added in v.1.59
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>