Skip to content

Commit 3aa080a

Browse files
Simplify directory structure (#60)
1 parent 9d59e88 commit 3aa080a

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

49 files changed

+557
-557
lines changed
Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
(defproject leap "0.1.0-SNAPSHOT"
2-
:description "leap exercise."
3-
:url "https://github.com/exercism/clojure/tree/master/exercises/leap"
4-
:dependencies [[org.clojure/clojure "1.10.0"]])
1+
(defproject leap "0.1.0-SNAPSHOT"
2+
:description "leap exercise."
3+
:url "https://github.com/exercism/clojure/tree/master/exercises/leap"
4+
:dependencies [[org.clojure/clojure "1.10.0"]])
Lines changed: 8 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,8 @@
1-
(ns leap)
2-
3-
(defn leap-year? [year]
4-
(let [[p c s] (map #(= 0 (rem year %1)) [4 100 400])]
5-
(not
6-
(or (and p (not c))
7-
(and c s)))))
8-
1+
(ns leap)
2+
3+
(defn leap-year? [year]
4+
(let [[p c s] (map #(= 0 (rem year %1)) [4 100 400])]
5+
(not
6+
(or (and p (not c))
7+
(and c s)))))
8+
Lines changed: 30 additions & 30 deletions
Original file line numberDiff line numberDiff line change
@@ -1,30 +1,30 @@
1-
(ns leap-test
2-
(:require [clojure.test :refer [deftest is]]
3-
leap))
4-
5-
(deftest year-not-divisible-by-4
6-
(is (not (leap/leap-year? 2015))))
7-
8-
(deftest year-divisible-by-2-but-not-4
9-
(is (not (leap/leap-year? 1970))))
10-
11-
(deftest year-divisible-by-4-but-not-100
12-
(is (leap/leap-year? 1996)))
13-
14-
(deftest year-divisible-by-4-and-5
15-
(is (leap/leap-year? 1960)))
16-
17-
(deftest year-divisible-by-100-but-not-400
18-
(is (not (leap/leap-year? 2100))))
19-
20-
(deftest year-divisible-by-100-but-not-by-3
21-
(is (not (leap/leap-year? 1900))))
22-
23-
(deftest year-divisible-by-400
24-
(is (leap/leap-year? 2000)))
25-
26-
(deftest year-divisible-by-400-but-not-125
27-
(is (leap/leap-year? 2400)))
28-
29-
(deftest year-divisible-by-200-but-not-by-400
30-
(is (not (leap/leap-year? 1800))))
1+
(ns leap-test
2+
(:require [clojure.test :refer [deftest is]]
3+
leap))
4+
5+
(deftest year-not-divisible-by-4
6+
(is (not (leap/leap-year? 2015))))
7+
8+
(deftest year-divisible-by-2-but-not-4
9+
(is (not (leap/leap-year? 1970))))
10+
11+
(deftest year-divisible-by-4-but-not-100
12+
(is (leap/leap-year? 1996)))
13+
14+
(deftest year-divisible-by-4-and-5
15+
(is (leap/leap-year? 1960)))
16+
17+
(deftest year-divisible-by-100-but-not-400
18+
(is (not (leap/leap-year? 2100))))
19+
20+
(deftest year-divisible-by-100-but-not-by-3
21+
(is (not (leap/leap-year? 1900))))
22+
23+
(deftest year-divisible-by-400
24+
(is (leap/leap-year? 2000)))
25+
26+
(deftest year-divisible-by-400-but-not-125
27+
(is (leap/leap-year? 2400)))
28+
29+
(deftest year-divisible-by-200-but-not-by-400
30+
(is (not (leap/leap-year? 1800))))
Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
{
2+
"version": 3,
3+
"status": "error",
4+
"message": "----- Error --------------------------------------------------------------------\nType: clojure.lang.ExceptionInfo\nMessage: Could not resolve symbol: leap/leap-year?\nData: {:type :sci/error, :line 5, :column 1, :file \"/opt/test-runner/tests/empty-file/test/leap_test.clj\", :phase \"analysis\"}\nLocation: /opt/test-runner/tests/empty-file/test/leap_test.clj:6:12\nPhase: analysis\n\n----- Context ------------------------------------------------------------------\n 2: (:require [clojure.test :refer [deftest is]]\n 3: leap))\n 4: \n 5: (deftest year-not-divisible-by-4\n 6: (is (not (leap/leap-year? 2015))))\n ^--- Could not resolve symbol: leap/leap-year?\n 7: \n 8: (deftest year-divisible-by-2-but-not-4\n 9: (is (not (leap/leap-year? 1970))))\n10: \n11: (deftest year-divisible-by-4-but-not-100\n\n----- Stack trace --------------------------------------------------------------\nleap-test - /opt/test-runner/tests/empty-file/test/leap_test.clj:6:12\nclojure.core/list - <built-in>\nclojure.core/let - <built-in>\nleap-test - /opt/test-runner/tests/empty-file/test/leap_test.clj:6:3\nleap-test/is - /opt/test-runner/tests/empty-file/test/leap_test.clj:6:3\n... (run with --debug to see elided elements)\nclojure.core/fn - <built-in>\nleap-test - /opt/test-runner/tests/empty-file/test/leap_test.clj:5:1\nleap-test - /opt/test-runner/tests/empty-file/test/leap_test.clj:5:1\nleap-test - /opt/test-runner/tests/empty-file/test/leap_test.clj:5:1\nuser - /opt/test-runner/./test-runner.clj:19:1"
5+
}
Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
(defproject leap "0.1.0-SNAPSHOT"
2-
:description "leap exercise."
3-
:url "https://github.com/exercism/clojure/tree/master/exercises/leap"
4-
:dependencies [[org.clojure/clojure "1.10.0"]])
1+
(defproject leap "0.1.0-SNAPSHOT"
2+
:description "leap exercise."
3+
:url "https://github.com/exercism/clojure/tree/master/exercises/leap"
4+
:dependencies [[org.clojure/clojure "1.10.0"]])
File renamed without changes.
Lines changed: 30 additions & 30 deletions
Original file line numberDiff line numberDiff line change
@@ -1,30 +1,30 @@
1-
(ns leap-test
2-
(:require [clojure.test :refer [deftest is]]
3-
leap))
4-
5-
(deftest year-not-divisible-by-4
6-
(is (not (leap/leap-year? 2015))))
7-
8-
(deftest year-divisible-by-2-but-not-4
9-
(is (not (leap/leap-year? 1970))))
10-
11-
(deftest year-divisible-by-4-but-not-100
12-
(is (leap/leap-year? 1996)))
13-
14-
(deftest year-divisible-by-4-and-5
15-
(is (leap/leap-year? 1960)))
16-
17-
(deftest year-divisible-by-100-but-not-400
18-
(is (not (leap/leap-year? 2100))))
19-
20-
(deftest year-divisible-by-100-but-not-by-3
21-
(is (not (leap/leap-year? 1900))))
22-
23-
(deftest year-divisible-by-400
24-
(is (leap/leap-year? 2000)))
25-
26-
(deftest year-divisible-by-400-but-not-125
27-
(is (leap/leap-year? 2400)))
28-
29-
(deftest year-divisible-by-200-but-not-by-400
30-
(is (not (leap/leap-year? 1800))))
1+
(ns leap-test
2+
(:require [clojure.test :refer [deftest is]]
3+
leap))
4+
5+
(deftest year-not-divisible-by-4
6+
(is (not (leap/leap-year? 2015))))
7+
8+
(deftest year-divisible-by-2-but-not-4
9+
(is (not (leap/leap-year? 1970))))
10+
11+
(deftest year-divisible-by-4-but-not-100
12+
(is (leap/leap-year? 1996)))
13+
14+
(deftest year-divisible-by-4-and-5
15+
(is (leap/leap-year? 1960)))
16+
17+
(deftest year-divisible-by-100-but-not-400
18+
(is (not (leap/leap-year? 2100))))
19+
20+
(deftest year-divisible-by-100-but-not-by-3
21+
(is (not (leap/leap-year? 1900))))
22+
23+
(deftest year-divisible-by-400
24+
(is (leap/leap-year? 2000)))
25+
26+
(deftest year-divisible-by-400-but-not-125
27+
(is (leap/leap-year? 2400)))
28+
29+
(deftest year-divisible-by-200-but-not-by-400
30+
(is (not (leap/leap-year? 1800))))

tests/example-empty-file/expected_results.json

Lines changed: 0 additions & 5 deletions
This file was deleted.

tests/example-partial-fail/project.clj

Lines changed: 0 additions & 4 deletions
This file was deleted.

0 commit comments

Comments
 (0)