gistfile1.txt

(ns protoc-gen-clojure.core-test
  (:require [clojure.test :refer :all]
            [clojure.java.io :as io]
            [clojure.pprint :refer :all]
            [clojure.tools.namespace :as namespace]
            [me.raynes.fs :as fs]
            [protoc-gen-clojure.main :as main]
            [protoc-gen-clojure.core :refer :all])
  (:import [java.io ByteArrayOutputStream]))

(deftest io-test
  (testing "Drive a sample request through plugin IO"
    (let [in (io/input-stream (io/resource "testdata/sample.request"))
          out (ByteArrayOutputStream.)]
      (main/execute in out))))

(do
  (let [{:keys [file]} (-> (io/resource "testdata/sample.request")
                           io/input-stream
                           main/decode-request
                           generate)
        dir (io/file "target/test")]

    ;; Ensure we start fresh
    (fs/delete-dir dir)

    ;; Write the file(s) to our temp-dir
    (doseq [{:keys [name content]} file]
      (let [h (io/file dir name)
            parent (.getParent h)]
        (fs/mkdirs parent)
        (spit h content)))

    (require '[com.example.tutorial.sample :as sample] :reload-all)))

(deftest compile-test
  (testing "Generate and then compile our sample"
    (pprint (sample/map->Person {:name "Test User" :id 42 :email "tester@acme.com"}))))