Apologies that this bugreport is told almost entirely with pictures. I don't have gpm set up yet, so I can't copy text from the VT.
Seems it doesn't like your call to asIntBuffer here.
Stacktrace

Demonstration

Code to reporoduce
(defn draw2 []
(with-open [fb (FrameBuffer/getFrameBuffer "/dev/fb0")]
(.setMapDirect fb true)
(doto (. fb getGraphics)
(.setColor Color/RED)
(.drawRect 0 0 800 600))))