diff --git a/test/smeagol/test/testing.clj b/test/smeagol/test/testing.clj
new file mode 100644
index 0000000..426a8dd
--- /dev/null
+++ b/test/smeagol/test/testing.clj
@@ -0,0 +1,15 @@
+(ns smeagol.test.testing
+  (:require [clojure.test :refer :all]
+            [smeagol.testing :refer [parse do-test]]))
+
+(deftest test-inalid-input
+  (are [match input] (re-find match (-> input parse :error))
+    #"at least 3 lines" ""
+    #"No test found with name" "wtf\r\n1\r\n2"
+    #"Failed parsing line.*EOF while reading" "smeagol.sample/pow\r\n(\r\n2"))
+
+(deftest test-executon
+  (are [result input] (= result (-> input parse do-test))
+    {:result :failure, :expected 15, :actual 16} " smeagol.sample/pow\r\n4\r\n15\r\n"
+    {:result :ok} " smeagol.sample/pow\r\n4\r\n16\r\n"))
+