src/broadcast.lisp

   1 (set path-prefix nil)
   2
   3 ;;; TODO(#667): there is no concat in stdlib of ebisp
   4 (defun concat (xs ys)
   5   ys)
   6
   7 (defun using (prefix)
   8   (set path-prefix prefix))
   9
  10 (defun send (path)
  11   (send-native (concat path-prefix path)))