From 92190e85bd820a62660f094789bd1a13fefe148e Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 8 Apr 2002 09:54:18 +0000 Subject: *** no comment *** --- chess-transport.el | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 chess-transport.el diff --git a/chess-transport.el b/chess-transport.el new file mode 100644 index 0000000..dc5995d --- /dev/null +++ b/chess-transport.el @@ -0,0 +1,27 @@ +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; +;; An example of a generic transport engine, based on the protocol +;; used by chess-network.el. The only parts missing are send and +;; receive. This could be used for transmitting chess.el protocol +;; over CTCP, for example. +;; +;; $Revision$ + +(require 'chess-network) + +(defalias 'chess-network-regexp-alist 'chess-transport-regexp-alist) + +(defun chess-transport-handler (event &rest args) + "This is an example of a generic transport engine." + (cond + ((eq event 'send) + ;; transmit the string given in (car args) to your outbound + ;; transport from here + ))) + +;; call (chess-engine-submit engine STRING) for text that arrives from +;; your inbound transport + +(provide 'chess-transport) + +;;; chess-transport.el ends here -- cgit v1.2.3