gen.loop — actors/gen 0.1.0-SNAPSHOT

create clj

(create &
        {:keys [init body terminate timeout linker state-getter type name]
         :or {timeout 500
              init (fn [process args] [:run args])
              terminate (fn [reason state process] [:terminated reason])
              body (fn [state process] [:stop state])
              state-getter (fn [state] state)
              type :loop
              linker gen.linker-storage/*linker*}
         :as args})