… | |
… | |
759 | gl_buffer (OpenCL::Context self, cl_mem_flags flags, cl_GLuint bufobj) |
759 | gl_buffer (OpenCL::Context self, cl_mem_flags flags, cl_GLuint bufobj) |
760 | PPCODE: |
760 | PPCODE: |
761 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLBuffer, (self, flags, bufobj, &res)); |
761 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLBuffer, (self, flags, bufobj, &res)); |
762 | XPUSH_NEW_OBJ ("OpenCL::BufferObj", mem); |
762 | XPUSH_NEW_OBJ ("OpenCL::BufferObj", mem); |
763 | |
763 | |
764 | #if !CL_VERSION_1_2 || defined CL_USE_DEPRECATED_OPENCL_1_1_APIS |
|
|
765 | |
|
|
766 | void |
764 | void |
767 | gl_texture2d (OpenCL::Context self, cl_mem_flags flags, cl_GLenum target, cl_GLint miplevel, cl_GLuint texture) |
765 | gl_renderbuffer (OpenCL::Context self, cl_mem_flags flags, cl_GLuint renderbuffer) |
768 | PPCODE: |
766 | PPCODE: |
769 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLTexture2D, (self, flags, target, miplevel, texture, &res)); |
767 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLRenderbuffer, (self, flags, renderbuffer, &res)); |
770 | XPUSH_NEW_OBJ ("OpenCL::Image2D", mem); |
768 | XPUSH_NEW_OBJ ("OpenCL::Image2D", mem); |
771 | |
|
|
772 | void |
|
|
773 | gl_texture3d (OpenCL::Context self, cl_mem_flags flags, cl_GLenum target, cl_GLint miplevel, cl_GLuint texture) |
|
|
774 | PPCODE: |
|
|
775 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLTexture3D, (self, flags, target, miplevel, texture, &res)); |
|
|
776 | XPUSH_NEW_OBJ ("OpenCL::Image3D", mem); |
|
|
777 | |
|
|
778 | #endif |
|
|
779 | |
769 | |
780 | #if CL_VERSION_1_2 |
770 | #if CL_VERSION_1_2 |
781 | |
771 | |
782 | void |
772 | void |
783 | gl_texture (OpenCL::Context self, cl_mem_flags flags, cl_GLenum target, cl_GLint miplevel, cl_GLuint texture) |
773 | gl_texture (OpenCL::Context self, cl_mem_flags flags, cl_GLenum target, cl_GLint miplevel, cl_GLuint texture) |
… | |
… | |
797 | } |
787 | } |
798 | XPUSH_NEW_OBJ (klass, mem); |
788 | XPUSH_NEW_OBJ (klass, mem); |
799 | |
789 | |
800 | #endif |
790 | #endif |
801 | |
791 | |
|
|
792 | #if !CL_VERSION_1_2 || defined CL_USE_DEPRECATED_OPENCL_1_1_APIS |
|
|
793 | |
802 | void |
794 | void |
803 | gl_renderbuffer (OpenCL::Context self, cl_mem_flags flags, cl_GLuint renderbuffer) |
795 | gl_texture2d (OpenCL::Context self, cl_mem_flags flags, cl_GLenum target, cl_GLint miplevel, cl_GLuint texture) |
804 | PPCODE: |
796 | PPCODE: |
805 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLRenderbuffer, (self, flags, renderbuffer, &res)); |
797 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLTexture2D, (self, flags, target, miplevel, texture, &res)); |
806 | XPUSH_NEW_OBJ ("OpenCL::Image2D", mem); |
798 | XPUSH_NEW_OBJ ("OpenCL::Image2D", mem); |
|
|
799 | |
|
|
800 | void |
|
|
801 | gl_texture3d (OpenCL::Context self, cl_mem_flags flags, cl_GLenum target, cl_GLint miplevel, cl_GLuint texture) |
|
|
802 | PPCODE: |
|
|
803 | NEED_SUCCESS_ARG (cl_mem mem, CreateFromGLTexture3D, (self, flags, target, miplevel, texture, &res)); |
|
|
804 | XPUSH_NEW_OBJ ("OpenCL::Image3D", mem); |
|
|
805 | |
|
|
806 | #endif |
807 | |
807 | |
808 | #endif |
808 | #endif |
809 | |
809 | |
810 | void |
810 | void |
811 | supported_image_formats (OpenCL::Context self, cl_mem_flags flags, cl_mem_object_type image_type) |
811 | supported_image_formats (OpenCL::Context self, cl_mem_flags flags, cl_mem_object_type image_type) |