slow build response in compojure-api

I have been using compojure-api to build a server and I have an endpoint that returns json to the client. Now the problem: it seems to me that it is taking too much time to build the response to send back to the client.

Here is my log. It shows that the entire procedure seems to go pretty fast, but to get back to the client, takes around 8 minutes on 4 cpu thinkpad. On a second run, I saved the json to see the size and it was 12k. Is this a big json and it is justified to take this long for the server to respond? I feel like it is not and most likely I am doing something wrong.

21:21:20.978 [qtp1190836072-15] INFO  capacity.capacity - lets go!
21:21:20.996 [qtp1190836072-15] INFO  capacity.capacity - finished big parts
21:21:22.590 [qtp1190836072-15] INFO  capacity.capacity - finished everything
21:21:22.590 [qtp1190836072-15] INFO  api-stuff.handler - ready to go class clojure.lang.PersistentArrayMap

Unfortunatly, I can not show the repo, but here I try to show some configurations of my router:


(def formats
  (m/create
    (-> m/default-options
        (m/install muuntaja.format.msgpack/format)
        ;; return byte[] for NIO servers
        (assoc :return :bytes))))

(def app
  (-> (api
       {
        :formats formats 
        :coercion nil 
        :swagger
        {:ui "/"
         :spec "/swagger.json"
         :format {:formats []}
         :data {:info {:title "Hopeffully a good example"
                       :description "API that may describe what I need"}
                :tags [{:name "api", :description "some apis"}]
                :consumes ["application/json"]
                :produces ["application/json" "text/csv"]}}}

       (context "/health" []
         :tags ["health check"]
         health-check ;; a get method for health check
        )

       (route-middleware [[hard-auth]]
         (context "/download" []
           :tags ["validation"]
           downloads ;; routes defined
         ))

       (route-middleware [[basic-auth-mw]]
         (context "/" []
           :tags ["api"]
           routes ;; routes defined that has my slow return
        )))))

A few things that I tried to change:

change the format of the response (json and msgpack)
I tried to use the default value of :coercion (without the key) and nil,

But these changes did not seem to make difference.

Solution

As suspected, I was tricking myself with the logs.

As @cfrick pointed out, I had a lazy sequence which was not being evaluated before the preparation for the response body. Because of that, I was loading all the trouble of evaluating after the log.

Once I organized my performance tests, I realized that the code that generated lazy sequence was taking a long time (8 minutes) once I evaluated the whole thing with doall.

The solution was to improve the time on that algorithm. Not much I can say without being specific.

Registering here in case it helps someone out there