File: test_a.clj

package info (click to toggle)
leiningen-clojure 2.10.0-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 3,008 kB
  • sloc: xml: 916; sh: 760; lisp: 46; makefile: 34; java: 16
file content (13 lines) | stat: -rw-r--r-- 371 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
(ns test-a
  (:require [clojure.test :refer :all]
            [clojure.java.io :refer [writer]]))

(defn record-ran [t]
  (let [file-name (format "%s/lein-test-ran"
                          (System/getProperty "java.io.tmpdir"))]
    (with-open [w (writer file-name :append true)]
      (.write w (str t "\n")))))

(deftest test-a
  (record-ran :test-a)
  (is (= 1 1)))