|
|
An experimental distributed objects server. Example;
Test := Object clone
Test test := method(v,
write("got test '", v, "'\n")
return List clone append(1)
)
doServer := DOServer clone
doServer setRootObject(Test clone)
doServer setPort(8456)
doServer start
|