with-buffer-ptr ( ..a buffer-ptr target quot: ( ..a c-ptr -- ..b ) -- ..b ) - Factor Documentation

with-buffer-ptr ( ..a buffer-ptr target quot: ( ..a c-ptr -- ..b ) -- ..b )

Vocabulary
gpu .buffers

Inputs

buffer-ptr an object

target an object

quot a quotation with stack effect ( ..a c-ptr -- ..b )

Outputs
None

Definition

USING: accessors alien kernel ;

IN: gpu.buffers

: with-buffer-ptr
( ..a buffer-ptr target quot: ( ..a c-ptr -- ..b ) -- ..b )
[ [ offset>> <alien> ] [ buffer>> handle>> ] bi ] 2dip
with-bound-buffer ; inline