(ns emptyhead.lib.io.print
  "Basic printing thoughts."
  (:require [emptyhead.thought.define :as def]
            [emptyhead.idea.protocol :as prtc]
            [emptyhead.thought.crud :as thought]
            [emptyhead.thought.eval :as eval]
            [emptyhead.thought.extend :as extend]
            [emptyhead.idea.property :as prop]
            [emptyhead.idea.memtag :as memtag]))

(def/define! [:emptyhead :io :print]
  (fn [thought parent]
    (-> parent prtc/value :return last println)
    [parent nil]))

