(define* (load-font font-file #:key (size 40) (encoding ft_encoding_unicode))
(let ((font (ftglCreateTextureFont font-file)))
(define* (load-font font-file #:key (size 40) (encoding ft_encoding_unicode))
(let ((font (ftglCreateTextureFont font-file)))