;; this file:
;;   https://dataswamp.org/~incal/cl/general-base/sdl2-incal.lisp

(require :sdl2)

(defun sdl2-version (&optional output)
  (let ((ver (format nil "~D.~D.~D"
                sdl2-ffi:+sdl-major-version+
                sdl2-ffi:+sdl-minor-version+
                sdl2-ffi:+sdl-patchlevel+) ))
    (if output
        (progn
          (format t "~a~%" ver)
          (finish-output) )
        ver) ))