From 9b1c41dcd2771b77cb680fb804e50e5e288faf05 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Tue, 29 Oct 2019 17:15:30 -0400
Subject: render: texture: Include id when printing.

---
 chickadee/render/texture.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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)
-- 
cgit v1.2.3