Commit e0ced419 authored by John Croisant's avatar John Croisant

Removed unnecessary inexact->exact from sea-and-stars.

render-draw-line! no longer requires exact integers.
parent 349f9b3b
......@@ -494,7 +494,7 @@
;; Draw the highlight rect outline.
(sdl2:render-draw-rect! renderer hirect)
;; Draw a vertical line down the middle.
(let* ((w/2 (inexact->exact (floor (/ (sdl2:rect-w hirect) 2))))
(let* ((w/2 (floor (/ (sdl2:rect-w hirect) 2)))
(line-x (+ (sdl2:rect-x hirect) w/2)))
(sdl2:render-draw-line!
renderer
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment