 ;;;           417-433: for loop from 0-bytes read
 ;;;                    Copies bytes from incoming message buffer to message[][]
   (when (= 0 (.readableBytes buf))
+    ;; Yes, this is supposed to kill the entire process
+    ;; TODO: Be more graceful
     (throw (AssertionError. "Bad Message")))
 
   ;; Reference implementation is really reading bytes from

(defn parent->
  "Receive a ByteBuf from parent

;;;  411-435: try receiving messages: (DJB)
  "
  [{:keys [::specs/->child-buffer]
    :as state} buf]

                     [read-short read-short]     ; 26-28
                     [read-short read-short]     ; 30-32
                     [read-short read-short])]   ; 34-36
    ;; TODO: Desperately need to test this out to verify
    ;; that it does what I think
    (reduce (fn [state [start stop]]
              (help/mark-acknowledged state start stop))
            state
