(make-reflection-framebuffer) ( depthbuffer -- framebuffer )

Vocabulary

spheres

Inputs

depthbuffer

an object

Outputs

framebuffer

an object

Definition

USING: kernel opengl.framebuffers opengl.gl ;

IN: spheres

: (make-reflection-framebuffer)
    ( depthbuffer -- framebuffer )
    gen-framebuffer dup [
        swap [
            GL_DRAW_FRAMEBUFFER GL_DEPTH_ATTACHMENT
            GL_RENDERBUFFER
        ] dip glFramebufferRenderbuffer
    ] with-framebuffer ;