diff options
| author | David Thompson <dthompson2@worcester.edu> | 2019-10-29 17:15:30 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2019-10-29 17:15:30 -0400 |
| commit | 9b1c41dcd2771b77cb680fb804e50e5e288faf05 (patch) | |
| tree | 788b6248a9b792a5e04ead852cc4e18e613e624d | |
| parent | 1020c733a6d668eaa7fc6cc353c9c58513bf883a (diff) | |
render: texture: Include id when printing.
| -rw-r--r-- | chickadee/render/texture.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/chickadee/render/texture.scm b/chickadee/render/texture.scm index 11785f0..bdb5030 100644 --- a/chickadee/render/texture.scm +++ b/chickadee/render/texture.scm @@ -84,7 +84,8 @@ (set-record-type-printer! <texture> (lambda (texture port) (format port - "#<texture region?: ~a x: ~d y: ~d width: ~d height: ~d min-filter: ~a mag-filter: ~a wrap-s: ~a wrap-t: ~a>" + "#<texture id: ~d region?: ~a x: ~d y: ~d width: ~d height: ~d min-filter: ~a mag-filter: ~a wrap-s: ~a wrap-t: ~a>" + (texture-id texture) (texture-region? texture) (texture-x texture) (texture-y texture) |