;;;; *************************************************************************
(in-package #:kmrcl)
(defun make-process (name func)
;;;; *************************************************************************
(in-package #:kmrcl)
(defun make-process (name func)