diff options
-rw-r--r-- | 2d/texture.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/2d/texture.scm b/2d/texture.scm index c2a3fa1..4702029 100644 --- a/2d/texture.scm +++ b/2d/texture.scm @@ -107,8 +107,8 @@ "Returns the OpenGL pixel format for a surface. RGB and RGBA formats are supported." (case (SDL:surface:depth surface) - ((24) (pixel-format* rgb)) - ((32) (pixel-format* rgba)) + ((24) (pixel-format rgb)) + ((32) (pixel-format rgba)) (else (throw 'unsupported-pixel-format (SDL:surface:depth surface))))) (define (surface->texture surface) |