Current section
Files
Jump to
Current section
Files
src/tcp-client.lfe
(defmodule tcp-client
(export
(call-msg 1)
(cast-msg 1)))
(defun MGR () #(global tcp-client-mgr))
;;;===================================================================
;;; API
;;;===================================================================
(defun call-msg (data)
(gen_statem:call (MGR) `#(request ,data)))
(defun cast-msg (data)
(gen_statem:cast (MGR) `#(request ,data)))