From e585b02addf12e649e77d3c3d3c37599c5fc256b Mon Sep 17 00:00:00 2001 From: Will Acton Date: Sun, 4 Aug 2024 09:33:45 -0700 Subject: [PATCH] test --- test/pyramid/pull_test.cljc | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/test/pyramid/pull_test.cljc b/test/pyramid/pull_test.cljc index 1c58773..4a5cf94 100644 --- a/test/pyramid/pull_test.cljc +++ b/test/pyramid/pull_test.cljc @@ -161,3 +161,15 @@ (:foo) (.-result) (:bar))))))) + + +(deftest issue-36 + (let [db '{:zones ([:zone/id "b3d91e54-75e0-424b-b4c6-363cbd0ff06a"] + [:zone/id "4fba72c3-97ec-4458-9e78-b75bd6b323d0"] + [:zone/id "5a3f1bf5-aee1-40f1-9ea3-313ea3123c90"])} + q [{:zones [:zone/id]}]] + (is (= '{:zones + (#:zone{:id "b3d91e54-75e0-424b-b4c6-363cbd0ff06a"} + #:zone{:id "4fba72c3-97ec-4458-9e78-b75bd6b323d0"} + #:zone{:id "5a3f1bf5-aee1-40f1-9ea3-313ea3123c90"})} + (:data (trampoline p/pull-report db q))))))