17,776 questions
0
votes
1
answer
108
views
How do I implement custom coercion with compojure.api.sweet?
I'm implementing an end-point using compojure.api.sweet:
(defroutes http-routes
(context "/shifts" []
(POST "/" []
:body [doc Shift]
(create-shift doc))))
Shift ...
Tooling
0
votes
3
replies
66
views
CIDER: do not run removed test
I wrote a test that fails. Then I run command cider-test-ns-tests and got the expected error.
Next step, I comment or remove that failing-test but when I do again run cider-test-ns-tests I still get ...
- 907
1
vote
0
answers
82
views
Clojure, Missionary. Can't sample continous flows more than once
I'm following this tutorial. In the chapter on continuous flows, the author whats to demonstrate that they can be sampled at any time and they are always ready. He presents this code:
(def discrete-...
- 603
Advice
0
votes
3
replies
91
views
Clojure inline print for debugging
In clojure, the println function returns a nil:
\>(println "a"
a
nil
This makes it awkward to use print to access an intermediate value when print debugging:
Say I have:
(* (+ 5 10) (- ...
- 1,470
Best practices
3
votes
3
replies
131
views
Event should update data structures
Consider this function:
(defn check-collision
[game]
(let [ball (:ball game)]
(let [result (collision/ball-collision? ball (:paddle game))]
(when (:collision? result)
(resolve-...
- 3,997
1
vote
1
answer
111
views
Cannot invoke "java.lang.Character.charValue()" because "x" is null
This is the code fragment of the error:
(defn end-render
[fb]
(let [width (get-in fb [:dimen :width])
height (get-in fb [:dimen :height])
msfbo (:msfbo fb)
fbo (:fbo fb)]
...
- 3,997
3
votes
1
answer
180
views
How to write an accumulative recursive function in J without looping
At the risk of asking a question with an obvious solution: if I have a function in J that takes two arguments and returns two arguments and I want to accumulate the answer's second argument and to use ...
1
vote
0
answers
142
views
Clojure problems in resolving .local server address inside private network
First of all thanks in advance for any help, this is the first time I'm setting up a system like this, so a few points are not clear and might be written in bad form (and that's why I'm here).
...
- 31.8k
1
vote
1
answer
112
views
How to type hint a float array?
This code
(GL33/glUniform2fv ^int (location shader "offsets") ^float [] offsets)
produces this error:
No matching method glUniform2fv found taking 3 args for class org.lwjgl.opengl.GL33
I'...
- 3,997
3
votes
0
answers
185
views
Fast lazy sort & deduplication over multiple sorted lazy sequences in Clojure
I implemented a few lazy sort & merge functions that are used heavily in my ReBAC authorization library, EACL, to lazily "merge" & deduplicate ~1M datoms emitted from Datomic's d/...
- 29.1k
1
vote
1
answer
138
views
Intellij & Clojure LSP - Getting Started
I'm just trying the Clojure LSP plugin in Intellij IDEA Community without knowing anything about Clojure or the plugin.
My goal is to start learning Clojure.
I installed the plugin and clojure-lsp via ...
- 984
1
vote
1
answer
62
views
Parse nested metadata
One thing I like about metadata is that I can organise functions across namespaces. E.g.:
(defn ^{:category 1} a-function []
(do-stuff))
(->> (ns-interns 'this.namespace)
vals
(map ...
- 614
0
votes
1
answer
90
views
How to include a file with shadow-cljs/inline, but preprocess it first?
Shadow-cljs has a resource loader that can include literal files into the Clojurescript code
(ns app.my
(:require
[shadow.resource :as rc]))
(rc/inline "file.txt")
I need a macro that ...
- 603
0
votes
1
answer
99
views
Complains about a non-existent PersistentArrayMap
In this function I get an exception:
(defn ball-collision?
[ball brick]
(let [^org.joml.Vector3f ball-pos (:position ball)
^org.joml.Vector3f brick-pos (:position brick)
^org.joml....
- 3,997
2
votes
2
answers
132
views
Avoid garbage when using atoms
Consider this code snippet which calculates the delta time since the last frame:
(defn game-loop
[window game]
(let [last-frame (atom (GLFW/glfwGetTime))]
(while (not (GLFW/...
- 3,997
