luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2025-12-16 16:01:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Add generative test for new keywordize

Browse source
This commit is contained in:
Ben Sless 2024-08-26 17:07:51 +03:00
parent 4eab67a8db
commit 78cc54d3a8
1 changed files with 13 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
test/clj/reitit/walk_test.clj Normal file
View file

@ -0,0 +1,13 @@
(ns reitit.walk-test
(:require
[clojure.test.check.clojure-test :refer [defspec]]
[clojure.test.check.properties :as prop]
[clojure.test.check.generators :as gen]
[clojure.walk :as walk]
[reitit.walk :as sut]))
(defspec keywordize=walk-keywordize
10000
(prop/for-all [v gen/any-equatable]
(= (sut/keywordize-keys v)
(walk/keywordize-keys v))))