Return to httpd-rpc.sm1 CVS log | Up to [local] / OpenXM / src / kan96xx / Doc |
version 1.12, 2002/11/10 07:00:03 | version 1.16, 2012/12/23 02:33:16 | ||
---|---|---|---|
|
|
||
%% $OpenXM: OpenXM/src/kan96xx/Doc/httpd-rpc.sm1,v 1.11 2002/11/04 05:40:40 takayama Exp $ | %% $OpenXM: OpenXM/src/kan96xx/Doc/httpd-rpc.sm1,v 1.15 2010/02/08 01:08:39 takayama Exp $ | ||
%% http server by sm1. Used for RPC. Generic example. | %% http server by sm1. Used for RPC. Generic example. | ||
[(parse) (httpd.sm1) pushfile] extension pop | [(parse) (httpd.sm1) pushfile] extension pop | ||
|
|
||
def | def | ||
/httpd.asirman | /httpd.asirman | ||
("http://www.math.sci.kobe-u.ac.jp/OpenXM/1.2.1/doc/asir2000/html-eg/man_toc.html") | ("http://www.math.sci.kobe-u.ac.jp/OpenXM/1.2.1/doc/asir2000/html-en/man_toc.html") | ||
def | def | ||
/httpd.asirman.ja | /httpd.asirman.ja | ||
("http://www.math.sci.kobe-u.ac.jp/OpenXM/1.2.1/doc/asir2000/html-jp/man_toc.html") | ("http://www.math.sci.kobe-u.ac.jp/OpenXM/1.2.1/doc/asir2000/html-ja/man_toc.html") | ||
def | def | ||
[(parse) (oxasir.sm1) pushfile] extension | [(parse) (oxasir.sm1) pushfile] extension | ||
|
|
||
3] extension | 3] extension | ||
}{ | }{ | ||
%% On unix. | %% On unix. | ||
[(sleep 3 ; netscape http://) | [(ostype)] extension 1 get (mac) eq { | ||
/webrpc.browser (open) def | |||
} { /webrpc.browser (firefox) def } ifelse | |||
[(sleep 3 ; ) webrpc.browser ( http://) | |||
[(sm1.socket) (gethostname) []] extension | [(sm1.socket) (gethostname) []] extension | ||
(:) httpd.port toString ( & ) ] cat | (:) httpd.port toString ( & ) ] cat | ||
system | system | ||
|
|
||
(end) (quit) (output) (bload27) (open) | (end) (quit) (output) (bload27) (open) | ||
(plot) (ctrl) (debug) (error) (port) (bind) (accept) | (plot) (ctrl) (debug) (error) (port) (bind) (accept) | ||
(draw) (peek) (poke) | (draw) (peek) (poke) | ||
(write_string_to_a_file) (_filter) | |||
] | ] | ||
def | def |