From c513792d394a180ca9deada60b4d5091fc478f4f Mon Sep 17 00:00:00 2001 From: David Thompson Date: Fri, 6 Aug 2021 17:14:27 -0400 Subject: graphics: buffer: Remove max, min, sparse fields from . Just a dumb thing I added when I was first trying to add glTF support and didn't really know what I wsas doing. --- chickadee/graphics/buffer.scm | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/chickadee/graphics/buffer.scm b/chickadee/graphics/buffer.scm index 89ee376..42b6286 100644 --- a/chickadee/graphics/buffer.scm +++ b/chickadee/graphics/buffer.scm @@ -381,7 +381,7 @@ resized." (define-record-type (%make-buffer-view name buffer offset offset-pointer component-type - normalized? length type max min sparse divisor) + normalized? length type divisor) buffer-view? (name buffer-view-name) (buffer buffer-view->buffer) @@ -391,9 +391,6 @@ resized." (normalized? buffer-view-normalized?) (length buffer-view-length) (type buffer-view-type) - (max buffer-view-max) - (min buffer-view-min) - (sparse buffer-view-sparse) (divisor buffer-view-divisor)) ; for instanced rendering (define (buffer-view-stride buffer-view) @@ -419,9 +416,6 @@ resized." offset type component-type)) - max - min - sparse (divisor 0)) "Return a new typed buffer view for BUFFER starting at byte index OFFSET of LENGTH elements, where each element is of TYPE and composed @@ -456,7 +450,7 @@ each element is used for 1 instance. A divisor of 2 means that each element is used for 2 instances, and so on." (let ((offset-ptr (make-pointer offset))) (%make-buffer-view name buffer offset offset-ptr component-type - normalized? length type max min sparse divisor))) + normalized? length type divisor))) (define (display-buffer-view buffer-view port) (format port "#" -- cgit v1.2.3