 ;;; Commentary:
 
 ;;; Code:
-
-(require 'dash)
 
 (defmacro -> (&rest body)
   "The thread-last macro.  Threads the BODY."

  (let ((result (pop body))
        (name (pop body)))
    (dolist (form body result)
      (setq result (append (-replace name result form))))))

(ert-deftest test-first-as-> ()
  (should (equal


(ert-deftest test-mixed-as-> ()
  (should (equal
           (as-> "a" v
                 (concat v "1" v "2" v "3" v))
           "a1a2a3a")))

