Built the canonicalisation stage into the ADL processor
Unit tests do not all pass.
This commit is contained in:
parent
09a788dbd8
commit
1d5525ceaa
5 changed files with 63 additions and 38 deletions
|
|
@ -2,7 +2,7 @@
|
|||
(:require [clojure.string :as s]
|
||||
[clojure.test :refer :all]
|
||||
[adl.to-hugsql-queries :refer :all]
|
||||
[adl.utils :refer :all]))
|
||||
[adl-support.utils :refer :all]))
|
||||
|
||||
(defn string-equal-ignore-whitespace?
|
||||
"I don't want unit tests to fail just because emitted whitespace changes."
|
||||
|
|
|
|||
|
|
@ -1,10 +0,0 @@
|
|||
(ns adl.utils-test
|
||||
(:require [clojure.string :as s]
|
||||
[clojure.test :refer :all]
|
||||
[adl.utils :refer :all]))
|
||||
|
||||
(deftest singularise-tests
|
||||
(testing "Singularise"
|
||||
(is (= "address" (singularise "addresses")))
|
||||
(is (= "address" (singularise "address")))
|
||||
(is (= "expertise" (singularise "expertise")))))
|
||||
Loading…
Add table
Add a link
Reference in a new issue