summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2015-01-12 21:50:26 -0500
committerDavid Thompson <dthompson2@worcester.edu>2015-01-12 21:50:26 -0500
commit3c305bd401bf681b08f855c3fe625124ed65a036 (patch)
tree1f7fbd692a952c4376c67303d5159522d8218f2e
parentccc240f978a3cecd37c9de4e9f148e56bc73ab88 (diff)
framebuffer: Fix syntax problem in 'with-framebuffer'.
* sly/render/framebuffer.scm (with-framebuffer): Bind framebuffer to a syntactic variable that doesn't clash with the 'version-3-0' macro.
-rw-r--r--sly/render/framebuffer.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/sly/render/framebuffer.scm b/sly/render/framebuffer.scm
index a8c93d1..bf9f84b 100644
--- a/sly/render/framebuffer.scm
+++ b/sly/render/framebuffer.scm
@@ -110,9 +110,9 @@ dimensions WIDTH x HEIGHT."
texture-id #f width height 0 0 1 1)))
(%make-framebuffer framebuffer-id renderbuffer-id texture))))))
-(define-syntax-rule (with-framebuffer framebuffer body ...)
+(define-syntax-rule (with-framebuffer fb body ...)
(begin
(glBindFramebuffer (version-3-0 framebuffer)
- (framebuffer-id framebuffer))
+ (framebuffer-id fb))
body ...
(glBindFramebuffer (version-3-0 framebuffer) 0)))