diff options
| -rw-r--r-- | sdl2/surface.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sdl2/surface.scm b/sdl2/surface.scm index 98ddf70..24846c2 100644 --- a/sdl2/surface.scm +++ b/sdl2/surface.scm @@ -195,4 +195,4 @@ Valid format types are: 0))) (if (null-pointer? ptr) (sdl-error "convert-surface-format" "failed to convert surface format") - (wrap-surface surface)))) + (wrap-surface ptr)))) |