version 1.5, 2000/12/12 13:58:21 |
version 1.7, 2000/12/14 10:04:57 |
|
|
/* $OpenXM: OpenXM/src/k097/lib/ox/ox.k,v 1.4 2000/12/11 13:53:28 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/k097/lib/ox/ox.k,v 1.6 2000/12/14 04:35:16 takayama Exp $ */ |
|
|
/* Load_sm1(["ox.sm1",AddString([GetEnv("OpenXM_HOME"),"/lib/sm1/ox.sm1"])], |
/* Load_sm1(["ox.sm1",AddString([GetEnv("OpenXM_HOME"),"/lib/sm1/ox.sm1"])], |
"ox.sm1.loaded"); */ |
"ox.sm1.loaded"); */ |
Line 47 class OXchannel extends Object { |
|
Line 47 class OXchannel extends Object { |
|
return(r); |
return(r); |
} |
} |
|
|
|
def popString() { |
|
local cc,r; |
|
cc = channel; |
|
sm1(" cc oxpopstring /r set "); |
|
return(r); |
|
} |
|
|
|
|
} |
} |
|
|
class OXcontrol extends Object { |
class OXcontrol extends Object { |
Line 89 class OXcontrol extends Object { |
|
Line 97 class OXcontrol extends Object { |
|
def popCMO() { |
def popCMO() { |
return(control.channel.popCMO()); |
return(control.channel.popCMO()); |
} |
} |
|
def popString() { |
|
return(control.channel.popString()); |
|
} |
|
|
} |
} |
|
|
Line 118 class OX extends OXcontrol { |
|
Line 129 class OX extends OXcontrol { |
|
control = super.getControl(); |
control = super.getControl(); |
sm1(" [(oxGetPort1) (localhost)] extension /peer set "); |
sm1(" [(oxGetPort1) (localhost)] extension /peer set "); |
sm1(" /data peer 1 get def "); |
sm1(" /data peer 1 get def "); |
control.pushCMO(data); /* BUG: control.pushCMO(data) does not work. |
/* BUG: control.pushCMO(data) does not work. |
Use control = super.getControl(); */ |
Use control = super.getControl(); */ |
control.pushCMO(name); |
control.pushCMO([[data],name]); |
control.pushCMD(SM_control_spawn_server); |
control.pushCMD(SM_control_spawn_server); |
engineID = control.popCMO(); |
engineID = control.popCMO(); |
print("engineID=");Println(engineID); |
print("engineID=");Println(engineID); |
Line 141 class OX extends OXcontrol { |
|
Line 152 class OX extends OXcontrol { |
|
def popCMO() { |
def popCMO() { |
return(engine.channel.popCMO()); |
return(engine.channel.popCMO()); |
} |
} |
|
def popString() { |
|
return(engine.channel.popString()); |
|
} |
|
|
def rpc(func,ar) { |
def rpc(func,ar) { |
local n,i,one,comm; |
local n,i,one,comm; |
Line 174 class OX extends OXcontrol { |
|
Line 188 class OX extends OXcontrol { |
|
this.pushCMO("ox_ptod"); |
this.pushCMO("ox_ptod"); |
this.pushCMD(SM_executeFunction); |
this.pushCMD(SM_executeFunction); |
return(this.popCMO()); |
return(this.popCMO()); |
|
} |
|
|
|
def executeString(s) { |
|
this.pushCMO(s); |
|
this.pushCMD(SM_executeStringByLocalParser); |
} |
} |
|
|
} |
} |