diff options
| -rw-r--r-- | chickadee/render/viewport.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/chickadee/render/viewport.scm b/chickadee/render/viewport.scm index b4a4ce3..6789766 100644 --- a/chickadee/render/viewport.scm +++ b/chickadee/render/viewport.scm @@ -38,7 +38,7 @@ viewport-clear-color viewport-clear-flags null-viewport - %standard-clear-flags + %default-clear-flags %default-clear-color apply-viewport *viewport-state*)) @@ -53,7 +53,7 @@ (clear-color viewport-clear-color) (clear-flags viewport-clear-flags)) -(define %standard-clear-flags '(color-buffer depth-buffer)) +(define %default-clear-flags '(color-buffer depth-buffer)) ;; Just a fun color from the Dawnbringer 32-color palette instead of ;; boring old black. (define %default-clear-color (rgb #x45283c)) @@ -65,6 +65,7 @@ (define* (make-viewport x y width height #:key (clear-color %default-clear-color) + (clear-flags %default-clear-flags)) "Create a viewport that covers an area of the window starting from coordinates (X, Y) and spanning WIDTH x HEIGHT pixels. Fill the viewport with CLEAR-COLOR when clearing the screen. Clear the buffers |