From 2fdf468b710180f221d06470448ae60eb6706435 Mon Sep 17 00:00:00 2001 From: William Robinson Date: Wed, 30 Jan 2008 14:53:37 +0000 Subject: [PATCH] Stripped out a lot of useless info from the spec, by selecting only what is needed. Changed the func-spec format, now defglfun prints out the function being compiled in SBCL nicely.. --- generators/make-bindings-from-spec.lisp | 68 +- lib/opengl-3dfx_tbuffer.lisp | 8 +- lib/opengl-apple_element_array.lisp | 98 +- lib/opengl-apple_fence.lisp | 88 +- lib/opengl-apple_flush_buffer_range.lisp | 44 +- lib/opengl-apple_vertex_array_object.lisp | 54 +- lib/opengl-apple_vertex_array_range.lisp | 60 +- lib/opengl-arb_color_buffer_float.lisp | 11 +- lib/opengl-arb_draw_buffers.lisp | 10 +- lib/opengl-arb_matrix_palette.lisp | 91 +- lib/opengl-arb_multisample.lisp | 10 +- lib/opengl-arb_multitexture.lisp | 483 ++- lib/opengl-arb_occlusion_query.lisp | 108 +- lib/opengl-arb_point_parameters.lisp | 44 +- lib/opengl-arb_shader_objects.lisp | 578 ++-- lib/opengl-arb_texture_compression.lisp | 220 +- lib/opengl-arb_transpose_matrix.lisp | 56 +- lib/opengl-arb_vertex_blend.lisp | 209 +- lib/opengl-arb_vertex_buffer_object.lisp | 201 +- lib/opengl-arb_vertex_program.lisp | 992 +++--- lib/opengl-arb_vertex_shader.lisp | 71 +- lib/opengl-arb_window_pos.lisp | 180 +- lib/opengl-ati_draw_buffers.lisp | 10 +- lib/opengl-ati_element_array.lisp | 58 +- lib/opengl-ati_envmap_bumpmap.lisp | 76 +- lib/opengl-ati_fragment_shader.lisp | 452 ++- lib/opengl-ati_map_object_buffer.lisp | 28 +- lib/opengl-ati_pn_triangles.lisp | 22 +- lib/opengl-ati_separate_stencil.lisp | 52 +- lib/opengl-ati_vertex_array_object.lisp | 195 +- lib/opengl-ati_vertex_attrib_array_object.lisp | 64 +- lib/opengl-ati_vertex_streams.lisp | 592 ++-- lib/opengl-ext_bindable_uniform.lisp | 61 +- lib/opengl-ext_blend_color.lisp | 27 +- lib/opengl-ext_blend_equation_separate.lisp | 12 +- lib/opengl-ext_blend_func_separate.lisp | 36 +- lib/opengl-ext_blend_minmax.lisp | 21 +- lib/opengl-ext_color_subtable.lisp | 49 +- lib/opengl-ext_compiled_vertex_array.lisp | 34 +- lib/opengl-ext_convolution.lisp | 261 +- lib/opengl-ext_coordinate_frame.lisp | 270 +- lib/opengl-ext_copy_texture.lisp | 126 +- lib/opengl-ext_cull_vertex.lisp | 40 +- lib/opengl-ext_depth_bounds_test.lisp | 10 +- lib/opengl-ext_draw_buffers2.lisp | 91 +- lib/opengl-ext_draw_instanced.lisp | 47 +- lib/opengl-ext_draw_range_elements.lisp | 38 +- lib/opengl-ext_fog_coord.lisp | 75 +- lib/opengl-ext_framebuffer_blit.lisp | 46 +- lib/opengl-ext_framebuffer_multisample.lisp | 18 +- lib/opengl-ext_framebuffer_object.lisp | 335 +- lib/opengl-ext_geometry_shader4.lisp | 14 +- lib/opengl-ext_gpu_program_parameters.lisp | 42 +- lib/opengl-ext_gpu_shader4.lisp | 211 +- lib/opengl-ext_histogram.lisp | 153 +- lib/opengl-ext_index_func.lisp | 10 +- lib/opengl-ext_index_material.lisp | 10 +- lib/opengl-ext_light_texture.lisp | 26 +- lib/opengl-ext_multi_draw_arrays.lisp | 46 +- lib/opengl-ext_multisample.lisp | 18 +- lib/opengl-ext_paletted_texture.lisp | 88 +- lib/opengl-ext_pixel_transform.lisp | 100 +- lib/opengl-ext_point_parameters.lisp | 44 +- lib/opengl-ext_polygon_offset.lisp | 11 +- lib/opengl-ext_secondary_color.lisp | 217 +- lib/opengl-ext_stencil_clear_tag.lisp | 11 +- lib/opengl-ext_stencil_two_side.lisp | 8 +- lib/opengl-ext_subtexture.lisp | 62 +- lib/opengl-ext_texture3d.lisp | 90 +- lib/opengl-ext_texture_buffer_object.lisp | 13 +- lib/opengl-ext_texture_integer.lisp | 84 +- lib/opengl-ext_texture_object.lisp | 98 +- lib/opengl-ext_texture_perturb_normal.lisp | 8 +- lib/opengl-ext_timer_query.lisp | 42 +- lib/opengl-ext_vertex_array.lisp | 256 +- lib/opengl-ext_vertex_shader.lisp | 748 ++--- lib/opengl-ext_vertex_weighting.lisp | 35 +- lib/opengl-gremedy_frame_terminator.lisp | 6 +- lib/opengl-gremedy_string_marker.lisp | 22 +- lib/opengl-hp_image_transform.lisp | 120 +- lib/opengl-ibm_multimode_draw_arrays.lisp | 50 +- lib/opengl-ibm_vertex_array_lists.lisp | 184 +- lib/opengl-ingr_blend_func_separate.lisp | 28 +- lib/opengl-intel_parallel_arrays.lisp | 91 +- lib/opengl-mesa_resize_buffers.lisp | 6 +- lib/opengl-mesa_window_pos.lisp | 252 +- lib/opengl-nv_depth_buffer_float.lisp | 50 +- lib/opengl-nv_evaluators.lisp | 212 +- lib/opengl-nv_fence.lisp | 91 +- lib/opengl-nv_fragment_program.lisp | 132 +- ...opengl-nv_framebuffer_multisample_coverage.lisp | 42 +- lib/opengl-nv_geometry_program4.lisp | 106 +- lib/opengl-nv_gpu_program4.lisp | 288 +- lib/opengl-nv_half_float.lisp | 496 ++- lib/opengl-nv_occlusion_query.lisp | 94 +- lib/opengl-nv_parameter_buffer_object.lisp | 76 +- lib/opengl-nv_pixel_data_range.lisp | 21 +- lib/opengl-nv_point_sprite.lisp | 40 +- lib/opengl-nv_primitive_restart.lisp | 30 +- lib/opengl-nv_register_combiners.lisp | 332 +- lib/opengl-nv_register_combiners2.lisp | 43 +- lib/opengl-nv_transform_feedback.lisp | 213 +- lib/opengl-nv_vertex_array_range.lisp | 44 +- lib/opengl-nv_vertex_program.lisp | 1045 +++--- lib/opengl-nv_vertex_program4.lisp | 320 +- lib/opengl-pgi_misc_hints.lisp | 10 +- lib/opengl-sgi_color_table.lisp | 129 +- lib/opengl-sgis_detail_texture.lisp | 37 +- lib/opengl-sgis_fog_function.lisp | 32 +- lib/opengl-sgis_multisample.lisp | 32 +- lib/opengl-sgis_pixel_texture.lisp | 96 +- lib/opengl-sgis_point_parameters.lisp | 25 +- lib/opengl-sgis_sharpen_texture.lisp | 37 +- lib/opengl-sgis_texture4d.lisp | 80 +- lib/opengl-sgis_texture_color_mask.lisp | 15 +- lib/opengl-sgis_texture_filter4.lisp | 43 +- lib/opengl-sgix_async.lisp | 64 +- lib/opengl-sgix_flush_raster.lisp | 7 +- lib/opengl-sgix_fragment_lighting.lisp | 254 +- lib/opengl-sgix_framezoom.lisp | 20 +- lib/opengl-sgix_igloo_interface.lisp | 25 +- lib/opengl-sgix_instruments.lisp | 64 +- lib/opengl-sgix_list_priority.lisp | 100 +- lib/opengl-sgix_pixel_texture.lisp | 20 +- lib/opengl-sgix_polynomial_ffd.lisp | 105 +- lib/opengl-sgix_reference_plane.lisp | 21 +- lib/opengl-sgix_sprite.lisp | 76 +- lib/opengl-sgix_tag_sample_buffer.lisp | 6 +- lib/opengl-sun_global_alpha.lisp | 80 +- lib/opengl-sun_mesh_array.lisp | 31 +- lib/opengl-sun_triangle_list.lisp | 109 +- lib/opengl-sun_vertex.lisp | 775 ++--- lib/opengl-sunx_constant_data.lisp | 6 +- lib/opengl-version_1_1.lisp | 424 +-- lib/opengl-version_1_2.lisp | 683 ++-- lib/opengl-version_1_3.lisp | 814 +++-- lib/opengl-version_1_4.lisp | 552 ++-- lib/opengl-version_1_5.lisp | 319 +- lib/opengl-version_2_0.lisp | 1311 ++++---- lib/opengl-version_2_1.lisp | 142 +- lib/opengl.lisp | 3327 ++++++++------------ lib/scaffolding.lisp | 13 +- 142 files changed, 9945 insertions(+), 13648 deletions(-) rewrite lib/opengl-apple_element_array.lisp (87%) rewrite lib/opengl-apple_fence.lisp (90%) rewrite lib/opengl-apple_flush_buffer_range.lisp (73%) rewrite lib/opengl-apple_vertex_array_object.lisp (84%) rewrite lib/opengl-apple_vertex_array_range.lisp (69%) rewrite lib/opengl-arb_matrix_palette.lisp (72%) rewrite lib/opengl-arb_multitexture.lisp (88%) rewrite lib/opengl-arb_occlusion_query.lisp (86%) rewrite lib/opengl-arb_point_parameters.lisp (67%) rewrite lib/opengl-arb_shader_objects.lisp (90%) rewrite lib/opengl-arb_texture_compression.lisp (88%) rewrite lib/opengl-arb_transpose_matrix.lisp (78%) rewrite lib/opengl-arb_vertex_blend.lisp (64%) rewrite lib/opengl-arb_vertex_buffer_object.lisp (70%) rewrite lib/opengl-arb_vertex_program.lisp (87%) rewrite lib/opengl-arb_vertex_shader.lisp (75%) rewrite lib/opengl-arb_window_pos.lisp (96%) rewrite lib/opengl-ati_element_array.lisp (79%) rewrite lib/opengl-ati_envmap_bumpmap.lisp (74%) rewrite lib/opengl-ati_fragment_shader.lisp (62%) rewrite lib/opengl-ati_map_object_buffer.lisp (76%) rewrite lib/opengl-ati_separate_stencil.lisp (72%) rewrite lib/opengl-ati_vertex_array_object.lisp (90%) rewrite lib/opengl-ati_vertex_attrib_array_object.lisp (89%) rewrite lib/opengl-ati_vertex_streams.lisp (96%) rewrite lib/opengl-ext_bindable_uniform.lisp (69%) rewrite lib/opengl-ext_blend_color.lisp (72%) rewrite lib/opengl-ext_blend_func_separate.lisp (61%) rewrite lib/opengl-ext_blend_minmax.lisp (64%) rewrite lib/opengl-ext_color_subtable.lisp (85%) rewrite lib/opengl-ext_compiled_vertex_array.lisp (67%) rewrite lib/opengl-ext_convolution.lisp (97%) rewrite lib/opengl-ext_coordinate_frame.lisp (89%) rewrite lib/opengl-ext_copy_texture.lisp (95%) rewrite lib/opengl-ext_cull_vertex.lisp (69%) rewrite lib/opengl-ext_draw_buffers2.lisp (93%) rewrite lib/opengl-ext_draw_instanced.lisp (86%) rewrite lib/opengl-ext_draw_range_elements.lisp (69%) rewrite lib/opengl-ext_fog_coord.lisp (72%) rewrite lib/opengl-ext_framebuffer_blit.lisp (64%) rewrite lib/opengl-ext_framebuffer_object.lisp (71%) rewrite lib/opengl-ext_gpu_program_parameters.lisp (83%) rewrite lib/opengl-ext_gpu_shader4.lisp (75%) rewrite lib/opengl-ext_histogram.lisp (96%) rewrite lib/opengl-ext_multi_draw_arrays.lisp (84%) rewrite lib/opengl-ext_paletted_texture.lisp (79%) rewrite lib/opengl-ext_pixel_transform.lisp (61%) rewrite lib/opengl-ext_point_parameters.lisp (67%) rewrite lib/opengl-ext_secondary_color.lisp (91%) rewrite lib/opengl-ext_subtexture.lisp (90%) rewrite lib/opengl-ext_texture3d.lisp (77%) rewrite lib/opengl-ext_texture_object.lisp (80%) rewrite lib/opengl-ext_timer_query.lisp (79%) rewrite lib/opengl-ext_vertex_array.lisp (63%) rewrite lib/opengl-ext_vertex_shader.lisp (75%) rewrite lib/opengl-gremedy_string_marker.lisp (64%) rewrite lib/opengl-hp_image_transform.lisp (73%) rewrite lib/opengl-ibm_multimode_draw_arrays.lisp (86%) rewrite lib/opengl-ibm_vertex_array_lists.lisp (79%) rewrite lib/opengl-ingr_blend_func_separate.lisp (75%) rewrite lib/opengl-intel_parallel_arrays.lisp (70%) rewrite lib/opengl-mesa_window_pos.lisp (97%) rewrite lib/opengl-nv_depth_buffer_float.lisp (71%) rewrite lib/opengl-nv_evaluators.lisp (78%) rewrite lib/opengl-nv_fence.lisp (89%) rewrite lib/opengl-nv_fragment_program.lisp (86%) rewrite lib/opengl-nv_framebuffer_multisample_coverage.lisp (61%) rewrite lib/opengl-nv_geometry_program4.lisp (67%) rewrite lib/opengl-nv_gpu_program4.lisp (92%) rewrite lib/opengl-nv_half_float.lisp (98%) rewrite lib/opengl-nv_occlusion_query.lisp (86%) rewrite lib/opengl-nv_parameter_buffer_object.lisp (76%) rewrite lib/opengl-nv_point_sprite.lisp (71%) rewrite lib/opengl-nv_primitive_restart.lisp (65%) rewrite lib/opengl-nv_register_combiners.lisp (75%) rewrite lib/opengl-nv_register_combiners2.lisp (80%) rewrite lib/opengl-nv_transform_feedback.lisp (76%) rewrite lib/opengl-nv_vertex_array_range.lisp (64%) rewrite lib/opengl-nv_vertex_program.lisp (87%) rewrite lib/opengl-nv_vertex_program4.lisp (97%) rewrite lib/opengl-sgi_color_table.lisp (95%) rewrite lib/opengl-sgis_detail_texture.lisp (82%) rewrite lib/opengl-sgis_fog_function.lisp (78%) rewrite lib/opengl-sgis_multisample.lisp (79%) rewrite lib/opengl-sgis_pixel_texture.lisp (89%) rewrite lib/opengl-sgis_sharpen_texture.lisp (82%) rewrite lib/opengl-sgis_texture4d.lisp (92%) rewrite lib/opengl-sgis_texture_filter4.lisp (84%) rewrite lib/opengl-sgix_async.lisp (91%) rewrite lib/opengl-sgix_fragment_lighting.lisp (96%) rewrite lib/opengl-sgix_framezoom.lisp (61%) rewrite lib/opengl-sgix_igloo_interface.lisp (70%) rewrite lib/opengl-sgix_instruments.lisp (91%) rewrite lib/opengl-sgix_list_priority.lisp (93%) rewrite lib/opengl-sgix_pixel_texture.lisp (62%) rewrite lib/opengl-sgix_polynomial_ffd.lisp (94%) rewrite lib/opengl-sgix_reference_plane.lisp (63%) rewrite lib/opengl-sgix_sprite.lisp (77%) rewrite lib/opengl-sun_global_alpha.lisp (88%) rewrite lib/opengl-sun_mesh_array.lisp (65%) rewrite lib/opengl-sun_triangle_list.lisp (67%) rewrite lib/opengl-sun_vertex.lisp (99%) rewrite lib/opengl-version_1_1.lisp (98%) rewrite lib/opengl-version_1_2.lisp (96%) rewrite lib/opengl-version_1_3.lisp (82%) rewrite lib/opengl-version_1_4.lisp (89%) rewrite lib/opengl-version_1_5.lisp (74%) rewrite lib/opengl-version_2_0.lisp (90%) rewrite lib/opengl-version_2_1.lisp (70%) diff --git a/generators/make-bindings-from-spec.lisp b/generators/make-bindings-from-spec.lisp index 70be873..f925d49 100644 --- a/generators/make-bindings-from-spec.lisp +++ b/generators/make-bindings-from-spec.lisp @@ -70,33 +70,11 @@ with +s." ;;}}} ;;; {{{ FUNC-SPEC -(defmacro func-spec-accessors (names) - "Makes a bunch of nice “name-of” accessors for a func-spec plist -to all symbols listed in names. " - `(progn ,@(mapcar #'(lambda (k) - `(defun ,(intern (concatenate 'string (string k) "-OF")) (func-spec) - (first - (getf (rest func-spec) - ,(intern (symbol-name k) '#:keyword))))) - names))) - -(defun c-name-of (func-spec) - (first (first func-spec))) - -(defun lisp-name-of (func-spec) - (second (first func-spec))) - -(func-spec-accessors (offset wglflags glsopcode glxsingle version category dlflags param - glxropcode glxflags glsflags vectorequiv extension glxvendorpriv glsalias - alias glfflags glxvectorequiv beginend)) - -(defun freturn-of (func-spec) - "Returns the return type of the func-spec" - (first (getf (rest func-spec) :return))) - -(defun args-of (func-spec) - "Returns the list of argument plists of the func-spec" - (getf (rest func-spec) :args)) +(defun c-name-of (func-spec) (first func-spec)) +(defun lisp-name-of (func-spec) (second func-spec)) +(defun freturn-of (func-spec) (getf (cddr func-spec) :return)) +(defun args-of (func-spec) (getf (cddr func-spec) :args)) +(defun category-of (func-spec) (getf (cddr func-spec) :category)) ;;; }}} ;;; {{{ FIX TYPE-MAPS @@ -189,11 +167,27 @@ suitable for cl-glfw-types or CFFI." (resolve-enum enum-name enum-value (list enum-group-name))))))))) ;;; }}} +;;; {{{ SET FUNC SPECS +(defun set-func-specs () + (setf *function-specs* + (loop for func-spec in (getf *spec* :functions) + when func-spec + collect + (list (first (first func-spec)) + (second (first func-spec)) + :return (first (getf (rest func-spec) :return)) + :args (loop while (getf (rest func-spec) :param) collect + (prog1 (getf (rest func-spec) :param) + (remf (rest func-spec) :param))) + :category (first (getf (rest func-spec) :category)) + :version (first (getf (rest func-spec) :version)))))) +;;; }}} + ;;; {{{ LOAD (defun load-spec () - (setf *spec* (with-open-file (in (merge-pathnames #P"src/gl.spec.lisp" *base*)) (read in)) - *function-specs* (rest (getf *spec* :functions))) + (setf *spec* (with-open-file (in (merge-pathnames #P"src/gl.spec.lisp" *base*)) (read in))) (set-type-maps) + (set-func-specs) (when (getf *reports* :type-map) (loop for n-v in (sort (loop for name in *type-map* by #'cddr @@ -220,18 +214,6 @@ suitable for cl-glfw-types or CFFI." (let ((*print-pretty* t)) (format t "Property counts: ~a~%" property-counts)))) - ;; collect arguments of functions into ordered list with all meta-data attached - (dolist (func-spec *function-specs*) - (let ((arg-specs)) - (do* ((arg-spec (getf (rest func-spec) :param) (getf (rest func-spec) :param))) - ((not arg-spec)) - (setf (getf arg-specs (getf arg-spec :name)) - arg-spec) - (remf (rest func-spec) :param)) - (setf (getf (rest func-spec) :args) - (loop for arg-name in (args-of func-spec) collecting - (getf arg-specs arg-name))))) - ;; categorize functions (dolist (function-spec *function-specs*) (push function-spec @@ -246,11 +228,11 @@ suitable for cl-glfw-types or CFFI." (defun gl-extension-function-definition (func-spec) (push (lisp-name-of func-spec) *exports*) - `(defglextfun ,func-spec)) + `(defglextfun ,@func-spec)) (defun gl-function-definition (func-spec) (push (lisp-name-of func-spec) *exports*) - `(defglfun ,func-spec)) + `(defglfun ,@func-spec)) ;;; {{{ EMIT OUTPUT diff --git a/lib/opengl-3dfx_tbuffer.lisp b/lib/opengl-3dfx_tbuffer.lisp index 71d4858..f7a02bf 100644 --- a/lib/opengl-3dfx_tbuffer.lisp +++ b/lib/opengl-3dfx_tbuffer.lisp @@ -4,8 +4,6 @@ ;;;; 3dfx_tbuffer -(defglextfun - (("TbufferMask3DFX" tbuffer-mask-3dfx) :args - ((:name |mask| :type |UInt32| :direction :in)) :return ("void") :category - ("3DFX_tbuffer") :version ("1.2") :glxropcode ("?") :glsflags ("ignore") - :glsopcode ("0x01FC") :offset ("553"))) +(defglextfun "TbufferMask3DFX" tbuffer-mask-3dfx :return "void" :args + ((:name |mask| :type |UInt32| :direction :in)) :category "3DFX_tbuffer" + :version "1.2") diff --git a/lib/opengl-apple_element_array.lisp b/lib/opengl-apple_element_array.lisp dissimilarity index 87% index e4797c3..785ab54 100644 --- a/lib/opengl-apple_element_array.lisp +++ b/lib/opengl-apple_element_array.lisp @@ -1,55 +1,43 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; apple_element_array - -(defconstant +element-array-apple+ #x8768) -(defconstant +element-array-type-apple+ #x8769) -(defconstant +element-array-pointer-apple+ #x876A) -(defglextfun - (("MultiDrawRangeElementArrayAPPLE" multi-draw-range-element-array-apple) - :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |start| :type |UInt32| :direction :in) - (:name |end| :type |UInt32| :direction :in) - (:name |first| :type |Int32| :direction :in :array t :size primcount) - (:name |count| :type |SizeI| :direction :in :array t :size primcount) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("APPLE_element_array") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("MultiDrawElementArrayAPPLE" multi-draw-element-array-apple) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :in :array t :size primcount) - (:name |count| :type |SizeI| :direction :in :array t :size primcount) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("APPLE_element_array") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("DrawRangeElementArrayAPPLE" draw-range-element-array-apple) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |start| :type |UInt32| :direction :in) - (:name |end| :type |UInt32| :direction :in) - (:name |first| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("APPLE_element_array") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("DrawElementArrayAPPLE" draw-element-array-apple) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("APPLE_element_array") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("ElementPointerAPPLE" element-pointer-apple) :args - ((:name |type| :type |ElementPointerTypeATI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size type)) - :return ("void") :category ("APPLE_element_array") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; apple_element_array + +(defconstant +element-array-apple+ #x8768) +(defconstant +element-array-type-apple+ #x8769) +(defconstant +element-array-pointer-apple+ #x876A) +(defglextfun "MultiDrawRangeElementArrayAPPLE" + multi-draw-range-element-array-apple :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |start| :type |UInt32| :direction :in) + (:name |end| :type |UInt32| :direction :in) + (:name |first| :type |Int32| :direction :in :array t :size primcount) + (:name |count| :type |SizeI| :direction :in :array t :size primcount) + (:name |primcount| :type |SizeI| :direction :in)) + :category "APPLE_element_array" :version "1.2") +(defglextfun "MultiDrawElementArrayAPPLE" multi-draw-element-array-apple + :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :in :array t :size primcount) + (:name |count| :type |SizeI| :direction :in :array t :size primcount) + (:name |primcount| :type |SizeI| :direction :in)) + :category "APPLE_element_array" :version "1.2") +(defglextfun "DrawRangeElementArrayAPPLE" draw-range-element-array-apple + :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |start| :type |UInt32| :direction :in) + (:name |end| :type |UInt32| :direction :in) + (:name |first| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "APPLE_element_array" :version "1.2") +(defglextfun "DrawElementArrayAPPLE" draw-element-array-apple :return "void" + :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "APPLE_element_array" :version "1.2") +(defglextfun "ElementPointerAPPLE" element-pointer-apple :return "void" :args + ((:name |type| :type |ElementPointerTypeATI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size type)) + :category "APPLE_element_array" :version "1.2") diff --git a/lib/opengl-apple_fence.lisp b/lib/opengl-apple_fence.lisp dissimilarity index 90% index 35452be..00fb17b 100644 --- a/lib/opengl-apple_fence.lisp +++ b/lib/opengl-apple_fence.lisp @@ -1,52 +1,36 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; apple_fence - -(defconstant +draw-pixels-apple+ #x8A0A) -(defconstant +fence-apple+ #x8A0B) -(defglextfun - (("FinishObjectAPPLE" finish-object-apple) :args - ((:name |object| :type |ObjectTypeAPPLE| :direction :in) - (:name |name| :type |Int32| :direction :in)) - :return ("void") :category ("APPLE_fence") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TestObjectAPPLE" test-object-apple) :args - ((:name |object| :type |ObjectTypeAPPLE| :direction :in) - (:name |name| :type |UInt32| :direction :in)) - :return ("Boolean") :category ("APPLE_fence") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("FinishFenceAPPLE" finish-fence-apple) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("void") :category - ("APPLE_fence") :version ("1.2") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TestFenceAPPLE" test-fence-apple) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("Boolean") - :category ("APPLE_fence") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("IsFenceAPPLE" is-fence-apple) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("Boolean") - :category ("APPLE_fence") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("SetFenceAPPLE" set-fence-apple) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("void") :category - ("APPLE_fence") :version ("1.2") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("DeleteFencesAPPLE" delete-fences-apple) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |fences| :type |FenceNV| :direction :in :array t :size n)) - :return ("void") :category ("APPLE_fence") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GenFencesAPPLE" gen-fences-apple) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |fences| :type |FenceNV| :direction :out :array t :size n)) - :return ("void") :category ("APPLE_fence") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; apple_fence + +(defconstant +draw-pixels-apple+ #x8A0A) +(defconstant +fence-apple+ #x8A0B) +(defglextfun "FinishObjectAPPLE" finish-object-apple :return "void" :args + ((:name |object| :type |ObjectTypeAPPLE| :direction :in) + (:name |name| :type |Int32| :direction :in)) + :category "APPLE_fence" :version "1.2") +(defglextfun "TestObjectAPPLE" test-object-apple :return "Boolean" :args + ((:name |object| :type |ObjectTypeAPPLE| :direction :in) + (:name |name| :type |UInt32| :direction :in)) + :category "APPLE_fence" :version "1.2") +(defglextfun "FinishFenceAPPLE" finish-fence-apple :return "void" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "APPLE_fence" + :version "1.2") +(defglextfun "TestFenceAPPLE" test-fence-apple :return "Boolean" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "APPLE_fence" + :version "1.2") +(defglextfun "IsFenceAPPLE" is-fence-apple :return "Boolean" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "APPLE_fence" + :version "1.2") +(defglextfun "SetFenceAPPLE" set-fence-apple :return "void" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "APPLE_fence" + :version "1.2") +(defglextfun "DeleteFencesAPPLE" delete-fences-apple :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |fences| :type |FenceNV| :direction :in :array t :size n)) + :category "APPLE_fence" :version "1.2") +(defglextfun "GenFencesAPPLE" gen-fences-apple :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |fences| :type |FenceNV| :direction :out :array t :size n)) + :category "APPLE_fence" :version "1.2") diff --git a/lib/opengl-apple_flush_buffer_range.lisp b/lib/opengl-apple_flush_buffer_range.lisp dissimilarity index 73% index ef1d346..635223b 100644 --- a/lib/opengl-apple_flush_buffer_range.lisp +++ b/lib/opengl-apple_flush_buffer_range.lisp @@ -1,24 +1,20 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; apple_flush_buffer_range - -(defconstant +buffer-serialized-modify-apple+ #x8A12) -(defconstant +buffer-flushing-unmap-apple+ #x8A13) -(defglextfun - (("FlushMappedBufferRangeAPPLE" flush-mapped-buffer-range-apple) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |offset| :type |BufferOffset| :direction :in) - (:name |size| :type |BufferSize| :direction :in)) - :return ("void") :category ("APPLE_flush_buffer_range") :version ("1.5") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("BufferParameteriAPPLE" buffer-parameter-i-apple) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("APPLE_flush_buffer_range") :version ("1.5") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; apple_flush_buffer_range + +(defconstant +buffer-serialized-modify-apple+ #x8A12) +(defconstant +buffer-flushing-unmap-apple+ #x8A13) +(defglextfun "FlushMappedBufferRangeAPPLE" flush-mapped-buffer-range-apple + :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |offset| :type |BufferOffset| :direction :in) + (:name |size| :type |BufferSize| :direction :in)) + :category "APPLE_flush_buffer_range" :version "1.5") +(defglextfun "BufferParameteriAPPLE" buffer-parameter-i-apple :return "void" + :args + ((:name |target| :type |GLenum| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "APPLE_flush_buffer_range" :version "1.5") diff --git a/lib/opengl-apple_vertex_array_object.lisp b/lib/opengl-apple_vertex_array_object.lisp dissimilarity index 84% index 0c7aa4c..2df3749 100644 --- a/lib/opengl-apple_vertex_array_object.lisp +++ b/lib/opengl-apple_vertex_array_object.lisp @@ -1,31 +1,23 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; apple_vertex_array_object - -(defconstant +vertex-array-binding-apple+ #x85B5) -(defglextfun - (("IsVertexArrayAPPLE" is-vertex-array-apple) :args - ((:name |array| :type |UInt32| :direction :in)) :return ("Boolean") :category - ("APPLE_vertex_array_object") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GenVertexArraysAPPLE" gen-vertex-arrays-apple) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |arrays| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("APPLE_vertex_array_object") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("DeleteVertexArraysAPPLE" delete-vertex-arrays-apple) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |arrays| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("APPLE_vertex_array_object") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("BindVertexArrayAPPLE" bind-vertex-array-apple) :args - ((:name |array| :type |UInt32| :direction :in)) :return ("void") :category - ("APPLE_vertex_array_object") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; apple_vertex_array_object + +(defconstant +vertex-array-binding-apple+ #x85B5) +(defglextfun "IsVertexArrayAPPLE" is-vertex-array-apple :return "Boolean" :args + ((:name |array| :type |UInt32| :direction :in)) :category + "APPLE_vertex_array_object" :version "1.2") +(defglextfun "GenVertexArraysAPPLE" gen-vertex-arrays-apple :return "void" + :args + ((:name |n| :type |SizeI| :direction :in) + (:name |arrays| :type |UInt32| :direction :out :array t :size n)) + :category "APPLE_vertex_array_object" :version "1.2") +(defglextfun "DeleteVertexArraysAPPLE" delete-vertex-arrays-apple :return + "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |arrays| :type |UInt32| :direction :in :array t :size n)) + :category "APPLE_vertex_array_object" :version "1.2") +(defglextfun "BindVertexArrayAPPLE" bind-vertex-array-apple :return "void" + :args ((:name |array| :type |UInt32| :direction :in)) :category + "APPLE_vertex_array_object" :version "1.2") diff --git a/lib/opengl-apple_vertex_array_range.lisp b/lib/opengl-apple_vertex_array_range.lisp dissimilarity index 69% index 57bf717..d5fc257 100644 --- a/lib/opengl-apple_vertex_array_range.lisp +++ b/lib/opengl-apple_vertex_array_range.lisp @@ -1,33 +1,27 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; apple_vertex_array_range - -(defconstant +vertex-array-range-apple+ #x851D) -(defconstant +vertex-array-range-length-apple+ #x851E) -(defconstant +vertex-array-storage-hint-apple+ #x851F) -(defconstant +vertex-array-range-pointer-apple+ #x8521) -(defconstant +storage-cached-apple+ #x85BE) -(defconstant +storage-shared-apple+ #x85BF) -(defglextfun - (("VertexArrayParameteriAPPLE" vertex-array-parameter-i-apple) :args - ((:name |pname| :type |VertexArrayPNameAPPLE| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("APPLE_vertex_array_range") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("FlushVertexArrayRangeAPPLE" flush-vertex-array-range-apple) :args - ((:name |length| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :out :array t :size length)) - :return ("void") :category ("APPLE_vertex_array_range") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("VertexArrayRangeAPPLE" vertex-array-range-apple) :args - ((:name |length| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :out :array t :size length)) - :return ("void") :category ("APPLE_vertex_array_range") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; apple_vertex_array_range + +(defconstant +vertex-array-range-apple+ #x851D) +(defconstant +vertex-array-range-length-apple+ #x851E) +(defconstant +vertex-array-storage-hint-apple+ #x851F) +(defconstant +vertex-array-range-pointer-apple+ #x8521) +(defconstant +storage-cached-apple+ #x85BE) +(defconstant +storage-shared-apple+ #x85BF) +(defglextfun "VertexArrayParameteriAPPLE" vertex-array-parameter-i-apple + :return "void" :args + ((:name |pname| :type |VertexArrayPNameAPPLE| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "APPLE_vertex_array_range" :version "1.2") +(defglextfun "FlushVertexArrayRangeAPPLE" flush-vertex-array-range-apple + :return "void" :args + ((:name |length| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :out :array t :size length)) + :category "APPLE_vertex_array_range" :version "1.2") +(defglextfun "VertexArrayRangeAPPLE" vertex-array-range-apple :return "void" + :args + ((:name |length| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :out :array t :size length)) + :category "APPLE_vertex_array_range" :version "1.2") diff --git a/lib/opengl-arb_color_buffer_float.lisp b/lib/opengl-arb_color_buffer_float.lisp index 4e08bbd..ab58cb3 100644 --- a/lib/opengl-arb_color_buffer_float.lisp +++ b/lib/opengl-arb_color_buffer_float.lisp @@ -9,10 +9,7 @@ (defconstant +clamp-fragment-color-arb+ #x891B) (defconstant +clamp-read-color-arb+ #x891C) (defconstant +fixed-only-arb+ #x891D) -(defglextfun - (("ClampColorARB" clamp-color-arb) :args - ((:name |target| :type |ClampColorTargetARB| :direction :in) - (:name |clamp| :type |ClampColorModeARB| :direction :in)) - :return ("void") :category ("ARB_color_buffer_float") :version ("1.5") - :extension nil :glxropcode ("234") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) +(defglextfun "ClampColorARB" clamp-color-arb :return "void" :args + ((:name |target| :type |ClampColorTargetARB| :direction :in) + (:name |clamp| :type |ClampColorModeARB| :direction :in)) + :category "ARB_color_buffer_float" :version "1.5") diff --git a/lib/opengl-arb_draw_buffers.lisp b/lib/opengl-arb_draw_buffers.lisp index 9e63818..874a105 100644 --- a/lib/opengl-arb_draw_buffers.lisp +++ b/lib/opengl-arb_draw_buffers.lisp @@ -21,9 +21,7 @@ (defconstant +draw-buffer13-arb+ #x8832) (defconstant +draw-buffer14-arb+ #x8833) (defconstant +draw-buffer15-arb+ #x8834) -(defglextfun - (("DrawBuffersARB" draw-buffers-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |bufs| :type |DrawBufferModeATI| :direction :in :array t :size n)) - :return ("void") :category ("ARB_draw_buffers") :version ("1.5") :extension - nil :alias ("DrawBuffers") :glsalias ("DrawBuffers"))) +(defglextfun "DrawBuffersARB" draw-buffers-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |bufs| :type |DrawBufferModeATI| :direction :in :array t :size n)) + :category "ARB_draw_buffers" :version "1.5") diff --git a/lib/opengl-arb_matrix_palette.lisp b/lib/opengl-arb_matrix_palette.lisp dissimilarity index 72% index 83da0ba..7ab07e1 100644 --- a/lib/opengl-arb_matrix_palette.lisp +++ b/lib/opengl-arb_matrix_palette.lisp @@ -1,52 +1,39 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_matrix_palette - -(defconstant +matrix-palette-arb+ #x8840) -(defconstant +max-matrix-palette-stack-depth-arb+ #x8841) -(defconstant +max-palette-matrices-arb+ #x8842) -(defconstant +current-palette-matrix-arb+ #x8843) -(defconstant +matrix-index-array-arb+ #x8844) -(defconstant +current-matrix-index-arb+ #x8845) -(defconstant +matrix-index-array-size-arb+ #x8846) -(defconstant +matrix-index-array-type-arb+ #x8847) -(defconstant +matrix-index-array-stride-arb+ #x8848) -(defconstant +matrix-index-array-pointer-arb+ #x8849) -(defglextfun - (("MatrixIndexPointerARB" matrix-index-pointer-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |MatrixIndexPointerTypeARB| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("ARB_matrix_palette") :version ("1.1") :extension - nil :dlflags ("notlistable") :glxflags ("ignore") :glsflags ("client") - :glsopcode ("0x0214") :offset ("?"))) -(defglextfun - (("MatrixIndexuivARB" matrix-index-uiv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |indices| :type |UInt32| :direction :in :array t :size size)) - :return ("void") :category ("ARB_matrix_palette") :version ("1.1") :extension - nil :glxropcode ("4328") :glxflags ("ignore") :glsopcode ("0x0213") :offset - ("?"))) -(defglextfun - (("MatrixIndexusvARB" matrix-index-usv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |indices| :type |UInt16| :direction :in :array t :size size)) - :return ("void") :category ("ARB_matrix_palette") :version ("1.1") :extension - nil :glxropcode ("4327") :glxflags ("ignore") :glsopcode ("0x0212") :offset - ("?"))) -(defglextfun - (("MatrixIndexubvARB" matrix-index-ubv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |indices| :type |UInt8| :direction :in :array t :size size)) - :return ("void") :category ("ARB_matrix_palette") :version ("1.1") :extension - nil :glxropcode ("4326") :glxflags ("ignore") :glsopcode ("0x0211") :offset - ("?"))) -(defglextfun - (("CurrentPaletteMatrixARB" current-palette-matrix-arb) :args - ((:name |index| :type |Int32| :direction :in)) :return ("void") :category - ("ARB_matrix_palette") :version ("1.1") :extension nil :glxropcode ("4329") - :glxflags ("ignore") :glsopcode ("0x0210") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_matrix_palette + +(defconstant +matrix-palette-arb+ #x8840) +(defconstant +max-matrix-palette-stack-depth-arb+ #x8841) +(defconstant +max-palette-matrices-arb+ #x8842) +(defconstant +current-palette-matrix-arb+ #x8843) +(defconstant +matrix-index-array-arb+ #x8844) +(defconstant +current-matrix-index-arb+ #x8845) +(defconstant +matrix-index-array-size-arb+ #x8846) +(defconstant +matrix-index-array-type-arb+ #x8847) +(defconstant +matrix-index-array-stride-arb+ #x8848) +(defconstant +matrix-index-array-pointer-arb+ #x8849) +(defglextfun "MatrixIndexPointerARB" matrix-index-pointer-arb :return "void" + :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |MatrixIndexPointerTypeARB| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "ARB_matrix_palette" :version "1.1") +(defglextfun "MatrixIndexuivARB" matrix-index-uiv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |indices| :type |UInt32| :direction :in :array t :size size)) + :category "ARB_matrix_palette" :version "1.1") +(defglextfun "MatrixIndexusvARB" matrix-index-usv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |indices| :type |UInt16| :direction :in :array t :size size)) + :category "ARB_matrix_palette" :version "1.1") +(defglextfun "MatrixIndexubvARB" matrix-index-ubv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |indices| :type |UInt8| :direction :in :array t :size size)) + :category "ARB_matrix_palette" :version "1.1") +(defglextfun "CurrentPaletteMatrixARB" current-palette-matrix-arb :return + "void" :args ((:name |index| :type |Int32| :direction :in)) :category + "ARB_matrix_palette" :version "1.1") diff --git a/lib/opengl-arb_multisample.lisp b/lib/opengl-arb_multisample.lisp index 254f57f..b1bd6e8 100644 --- a/lib/opengl-arb_multisample.lisp +++ b/lib/opengl-arb_multisample.lisp @@ -29,9 +29,7 @@ (defconstant +sample-coverage-value-arb+ #x80AA) (defconstant +sample-coverage-invert-arb+ #x80AB) (defconstant +multisample-bit-arb+ #x20000000) -(defglextfun - (("SampleCoverageARB" sample-coverage-arb) :args - ((:name |value| :type |ClampedFloat32| :direction :in) - (:name |invert| :type |Boolean| :direction :in)) - :return ("void") :category ("ARB_multisample") :glxflags ("ARB") :version - ("1.2") :alias ("SampleCoverage") :glsalias ("SampleCoverage"))) +(defglextfun "SampleCoverageARB" sample-coverage-arb :return "void" :args + ((:name |value| :type |ClampedFloat32| :direction :in) + (:name |invert| :type |Boolean| :direction :in)) + :category "ARB_multisample" :version "1.2") diff --git a/lib/opengl-arb_multitexture.lisp b/lib/opengl-arb_multitexture.lisp dissimilarity index 88% index 13bbf0b..6700b95 100644 --- a/lib/opengl-arb_multitexture.lisp +++ b/lib/opengl-arb_multitexture.lisp @@ -1,284 +1,199 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_multitexture - -(defconstant +texture0-arb+ #x84C0) -(defconstant +texture1-arb+ #x84C1) -(defconstant +texture2-arb+ #x84C2) -(defconstant +texture3-arb+ #x84C3) -(defconstant +texture4-arb+ #x84C4) -(defconstant +texture5-arb+ #x84C5) -(defconstant +texture6-arb+ #x84C6) -(defconstant +texture7-arb+ #x84C7) -(defconstant +texture8-arb+ #x84C8) -(defconstant +texture9-arb+ #x84C9) -(defconstant +texture10-arb+ #x84CA) -(defconstant +texture11-arb+ #x84CB) -(defconstant +texture12-arb+ #x84CC) -(defconstant +texture13-arb+ #x84CD) -(defconstant +texture14-arb+ #x84CE) -(defconstant +texture15-arb+ #x84CF) -(defconstant +texture16-arb+ #x84D0) -(defconstant +texture17-arb+ #x84D1) -(defconstant +texture18-arb+ #x84D2) -(defconstant +texture19-arb+ #x84D3) -(defconstant +texture20-arb+ #x84D4) -(defconstant +texture21-arb+ #x84D5) -(defconstant +texture22-arb+ #x84D6) -(defconstant +texture23-arb+ #x84D7) -(defconstant +texture24-arb+ #x84D8) -(defconstant +texture25-arb+ #x84D9) -(defconstant +texture26-arb+ #x84DA) -(defconstant +texture27-arb+ #x84DB) -(defconstant +texture28-arb+ #x84DC) -(defconstant +texture29-arb+ #x84DD) -(defconstant +texture30-arb+ #x84DE) -(defconstant +texture31-arb+ #x84DF) -(defconstant +active-texture-arb+ #x84E0) -(defconstant +client-active-texture-arb+ #x84E1) -(defconstant +max-texture-units-arb+ #x84E2) -(defglextfun - (("MultiTexCoord4svARB" multi-tex-coord-4sv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("213") :alias ("MultiTexCoord4sv") :glsalias - ("MultiTexCoord4sv"))) -(defglextfun - (("MultiTexCoord4sARB" multi-tex-coord-4s-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in) - (:name |r| :type |CoordS| :direction :in) - (:name |q| :type |CoordS| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord4sv"))) -(defglextfun - (("MultiTexCoord4ivARB" multi-tex-coord-4iv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("212") :alias ("MultiTexCoord4iv") :glsalias - ("MultiTexCoord4iv"))) -(defglextfun - (("MultiTexCoord4iARB" multi-tex-coord-4i-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in) - (:name |r| :type |CoordI| :direction :in) - (:name |q| :type |CoordI| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord4iv"))) -(defglextfun - (("MultiTexCoord4fvARB" multi-tex-coord-4fv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("211") :alias ("MultiTexCoord4fv") :glsalias - ("MultiTexCoord4fv"))) -(defglextfun - (("MultiTexCoord4fARB" multi-tex-coord-4f-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in) - (:name |r| :type |CoordF| :direction :in) - (:name |q| :type |CoordF| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord4fv"))) -(defglextfun - (("MultiTexCoord4dvARB" multi-tex-coord-4dv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("210") :alias ("MultiTexCoord4dv") :glsalias - ("MultiTexCoord4dv"))) -(defglextfun - (("MultiTexCoord4dARB" multi-tex-coord-4d-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in) - (:name |r| :type |CoordD| :direction :in) - (:name |q| :type |CoordD| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord4dv"))) -(defglextfun - (("MultiTexCoord3svARB" multi-tex-coord-3sv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_multitexture") :version ("1.2") :glxflags - ("ARB") :glxropcode ("209") :alias ("MultiTexCoord3sv") :glsalias - ("MultiTexCoord3sv"))) -(defglextfun - (("MultiTexCoord3sARB" multi-tex-coord-3s-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in) - (:name |r| :type |CoordS| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord3sv"))) -(defglextfun - (("MultiTexCoord3ivARB" multi-tex-coord-3iv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("208") :alias ("MultiTexCoord3iv") :glsalias - ("MultiTexCoord3iv"))) -(defglextfun - (("MultiTexCoord3iARB" multi-tex-coord-3i-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in) - (:name |r| :type |CoordI| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord3iv"))) -(defglextfun - (("MultiTexCoord3fvARB" multi-tex-coord-3fv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("207") :alias ("MultiTexCoord3fv") :glsalias - ("MultiTexCoord3fv"))) -(defglextfun - (("MultiTexCoord3fARB" multi-tex-coord-3f-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in) - (:name |r| :type |CoordF| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord3fv"))) -(defglextfun - (("MultiTexCoord3dvARB" multi-tex-coord-3dv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("206") :alias ("MultiTexCoord3dv") :glsalias - ("MultiTexCoord3dv"))) -(defglextfun - (("MultiTexCoord3dARB" multi-tex-coord-3d-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in) - (:name |r| :type |CoordD| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord3dv"))) -(defglextfun - (("MultiTexCoord2svARB" multi-tex-coord-2sv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("205") :alias ("MultiTexCoord2sv") :glsalias - ("MultiTexCoord2sv"))) -(defglextfun - (("MultiTexCoord2sARB" multi-tex-coord-2s-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord2sv"))) -(defglextfun - (("MultiTexCoord2ivARB" multi-tex-coord-2iv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("204") :alias ("MultiTexCoord2iv") :glsalias - ("MultiTexCoord2iv"))) -(defglextfun - (("MultiTexCoord2iARB" multi-tex-coord-2i-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord2iv"))) -(defglextfun - (("MultiTexCoord2fvARB" multi-tex-coord-2fv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("203") :alias ("MultiTexCoord2fv") :glsalias - ("MultiTexCoord2fv"))) -(defglextfun - (("MultiTexCoord2fARB" multi-tex-coord-2f-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord2fv"))) -(defglextfun - (("MultiTexCoord2dvARB" multi-tex-coord-2dv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("202") :alias ("MultiTexCoord2dv") :glsalias - ("MultiTexCoord2dv"))) -(defglextfun - (("MultiTexCoord2dARB" multi-tex-coord-2d-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord2dv"))) -(defglextfun - (("MultiTexCoord1svARB" multi-tex-coord-1sv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("201") :alias ("MultiTexCoord1sv") :glsalias - ("MultiTexCoord1sv"))) -(defglextfun - (("MultiTexCoord1sARB" multi-tex-coord-1s-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord1sv"))) -(defglextfun - (("MultiTexCoord1ivARB" multi-tex-coord-1iv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("200") :alias ("MultiTexCoord1iv") :glsalias - ("MultiTexCoord1iv"))) -(defglextfun - (("MultiTexCoord1iARB" multi-tex-coord-1i-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord1iv"))) -(defglextfun - (("MultiTexCoord1fvARB" multi-tex-coord-1fv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("199") :alias ("MultiTexCoord1fv") :glsalias - ("MultiTexCoord1fv"))) -(defglextfun - (("MultiTexCoord1fARB" multi-tex-coord-1f-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord1fv"))) -(defglextfun - (("MultiTexCoord1dvARB" multi-tex-coord-1dv-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :glxropcode ("198") :alias ("MultiTexCoord1dv") :glsalias - ("MultiTexCoord1dv"))) -(defglextfun - (("MultiTexCoord1dARB" multi-tex-coord-1d-arb) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in)) - :return ("void") :category ("ARB_multitexture") :glxflags ("ARB") :version - ("1.2") :vectorequiv ("MultiTexCoord1dv"))) -(defglextfun - (("ClientActiveTextureARB" client-active-texture-arb) :args - ((:name |texture| :type |TextureUnit| :direction :in)) :return ("void") - :category ("ARB_multitexture") :dlflags ("notlistable") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :alias ("ClientActiveTexture") :glsalias ("ClientActiveTexture"))) -(defglextfun - (("ActiveTextureARB" active-texture-arb) :args - ((:name |texture| :type |TextureUnit| :direction :in)) :return ("void") - :category ("ARB_multitexture") :glxflags ("ARB") :version ("1.2") :glxropcode - ("197") :alias ("ActiveTexture") :glsalias ("ActiveTexture"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_multitexture + +(defconstant +texture0-arb+ #x84C0) +(defconstant +texture1-arb+ #x84C1) +(defconstant +texture2-arb+ #x84C2) +(defconstant +texture3-arb+ #x84C3) +(defconstant +texture4-arb+ #x84C4) +(defconstant +texture5-arb+ #x84C5) +(defconstant +texture6-arb+ #x84C6) +(defconstant +texture7-arb+ #x84C7) +(defconstant +texture8-arb+ #x84C8) +(defconstant +texture9-arb+ #x84C9) +(defconstant +texture10-arb+ #x84CA) +(defconstant +texture11-arb+ #x84CB) +(defconstant +texture12-arb+ #x84CC) +(defconstant +texture13-arb+ #x84CD) +(defconstant +texture14-arb+ #x84CE) +(defconstant +texture15-arb+ #x84CF) +(defconstant +texture16-arb+ #x84D0) +(defconstant +texture17-arb+ #x84D1) +(defconstant +texture18-arb+ #x84D2) +(defconstant +texture19-arb+ #x84D3) +(defconstant +texture20-arb+ #x84D4) +(defconstant +texture21-arb+ #x84D5) +(defconstant +texture22-arb+ #x84D6) +(defconstant +texture23-arb+ #x84D7) +(defconstant +texture24-arb+ #x84D8) +(defconstant +texture25-arb+ #x84D9) +(defconstant +texture26-arb+ #x84DA) +(defconstant +texture27-arb+ #x84DB) +(defconstant +texture28-arb+ #x84DC) +(defconstant +texture29-arb+ #x84DD) +(defconstant +texture30-arb+ #x84DE) +(defconstant +texture31-arb+ #x84DF) +(defconstant +active-texture-arb+ #x84E0) +(defconstant +client-active-texture-arb+ #x84E1) +(defconstant +max-texture-units-arb+ #x84E2) +(defglextfun "MultiTexCoord4svARB" multi-tex-coord-4sv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x4)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4sARB" multi-tex-coord-4s-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in) + (:name |r| :type |CoordS| :direction :in) + (:name |q| :type |CoordS| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4ivARB" multi-tex-coord-4iv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x4)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4iARB" multi-tex-coord-4i-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in) + (:name |r| :type |CoordI| :direction :in) + (:name |q| :type |CoordI| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4fvARB" multi-tex-coord-4fv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x4)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4fARB" multi-tex-coord-4f-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in) + (:name |r| :type |CoordF| :direction :in) + (:name |q| :type |CoordF| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4dvARB" multi-tex-coord-4dv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x4)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord4dARB" multi-tex-coord-4d-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in) + (:name |r| :type |CoordD| :direction :in) + (:name |q| :type |CoordD| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3svARB" multi-tex-coord-3sv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x3)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3sARB" multi-tex-coord-3s-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in) + (:name |r| :type |CoordS| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3ivARB" multi-tex-coord-3iv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x3)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3iARB" multi-tex-coord-3i-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in) + (:name |r| :type |CoordI| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3fvARB" multi-tex-coord-3fv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x3)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3fARB" multi-tex-coord-3f-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in) + (:name |r| :type |CoordF| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3dvARB" multi-tex-coord-3dv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x3)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord3dARB" multi-tex-coord-3d-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in) + (:name |r| :type |CoordD| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2svARB" multi-tex-coord-2sv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x2)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2sARB" multi-tex-coord-2s-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2ivARB" multi-tex-coord-2iv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x2)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2iARB" multi-tex-coord-2i-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2fvARB" multi-tex-coord-2fv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x2)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2fARB" multi-tex-coord-2f-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2dvARB" multi-tex-coord-2dv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x2)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord2dARB" multi-tex-coord-2d-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1svARB" multi-tex-coord-1sv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x1)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1sARB" multi-tex-coord-1s-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1ivARB" multi-tex-coord-1iv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x1)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1iARB" multi-tex-coord-1i-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1fvARB" multi-tex-coord-1fv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x1)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1fARB" multi-tex-coord-1f-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1dvARB" multi-tex-coord-1dv-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x1)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "MultiTexCoord1dARB" multi-tex-coord-1d-arb :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in)) + :category "ARB_multitexture" :version "1.2") +(defglextfun "ClientActiveTextureARB" client-active-texture-arb :return "void" + :args ((:name |texture| :type |TextureUnit| :direction :in)) :category + "ARB_multitexture" :version "1.2") +(defglextfun "ActiveTextureARB" active-texture-arb :return "void" :args + ((:name |texture| :type |TextureUnit| :direction :in)) :category + "ARB_multitexture" :version "1.2") diff --git a/lib/opengl-arb_occlusion_query.lisp b/lib/opengl-arb_occlusion_query.lisp dissimilarity index 86% index a4697cc..38be2a4 100644 --- a/lib/opengl-arb_occlusion_query.lisp +++ b/lib/opengl-arb_occlusion_query.lisp @@ -1,63 +1,45 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_occlusion_query - -(defconstant +query-counter-bits-arb+ #x8864) -(defconstant +current-query-arb+ #x8865) -(defconstant +query-result-arb+ #x8866) -(defconstant +query-result-available-arb+ #x8867) -(defconstant +samples-passed-arb+ #x8914) -(defglextfun - (("GetQueryObjectuivARB" get-query-object-uiv-arb) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size pname)) - :return ("void") :category ("ARB_occlusion_query") :dlflags ("notlistable") - :version ("1.5") :extension nil :alias ("GetQueryObjectuiv") :glsalias - ("GetQueryObjectuiv"))) -(defglextfun - (("GetQueryObjectivARB" get-query-object-iv-arb) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("ARB_occlusion_query") :dlflags ("notlistable") - :version ("1.5") :extension nil :alias ("GetQueryObjectiv") :glsalias - ("GetQueryObjectiv"))) -(defglextfun - (("GetQueryivARB" get-query-iv-arb) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("ARB_occlusion_query") :dlflags ("notlistable") - :version ("1.5") :extension nil :alias ("GetQueryiv") :glsalias - ("GetQueryiv"))) -(defglextfun - (("EndQueryARB" end-query-arb) :args - ((:name |target| :type |GLenum| :direction :in)) :return ("void") :category - ("ARB_occlusion_query") :version ("1.5") :extension nil :alias ("EndQuery") - :glsalias ("EndQuery"))) -(defglextfun - (("BeginQueryARB" begin-query-arb) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |id| :type |UInt32| :direction :in)) - :return ("void") :category ("ARB_occlusion_query") :version ("1.5") - :extension nil :alias ("BeginQuery") :glsalias ("BeginQuery"))) -(defglextfun - (("IsQueryARB" is-query-arb) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("Boolean") :category - ("ARB_occlusion_query") :version ("1.5") :extension nil :alias ("IsQuery") - :glsalias ("IsQuery"))) -(defglextfun - (("DeleteQueriesARB" delete-queries-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |ids| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("ARB_occlusion_query") :version ("1.5") - :extension nil :alias ("DeleteQueries") :glsalias ("DeleteQueries"))) -(defglextfun - (("GenQueriesARB" gen-queries-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |ids| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("ARB_occlusion_query") :version ("1.5") - :extension nil :alias ("GenQueries") :glsalias ("GenQueries"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_occlusion_query + +(defconstant +query-counter-bits-arb+ #x8864) +(defconstant +current-query-arb+ #x8865) +(defconstant +query-result-arb+ #x8866) +(defconstant +query-result-available-arb+ #x8867) +(defconstant +samples-passed-arb+ #x8914) +(defglextfun "GetQueryObjectuivARB" get-query-object-uiv-arb :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size pname)) + :category "ARB_occlusion_query" :version "1.5") +(defglextfun "GetQueryObjectivARB" get-query-object-iv-arb :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "ARB_occlusion_query" :version "1.5") +(defglextfun "GetQueryivARB" get-query-iv-arb :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "ARB_occlusion_query" :version "1.5") +(defglextfun "EndQueryARB" end-query-arb :return "void" :args + ((:name |target| :type |GLenum| :direction :in)) :category + "ARB_occlusion_query" :version "1.5") +(defglextfun "BeginQueryARB" begin-query-arb :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |id| :type |UInt32| :direction :in)) + :category "ARB_occlusion_query" :version "1.5") +(defglextfun "IsQueryARB" is-query-arb :return "Boolean" :args + ((:name |id| :type |UInt32| :direction :in)) :category "ARB_occlusion_query" + :version "1.5") +(defglextfun "DeleteQueriesARB" delete-queries-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |ids| :type |UInt32| :direction :in :array t :size n)) + :category "ARB_occlusion_query" :version "1.5") +(defglextfun "GenQueriesARB" gen-queries-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |ids| :type |UInt32| :direction :out :array t :size n)) + :category "ARB_occlusion_query" :version "1.5") diff --git a/lib/opengl-arb_point_parameters.lisp b/lib/opengl-arb_point_parameters.lisp dissimilarity index 67% index bdaaedd..2ef0217 100644 --- a/lib/opengl-arb_point_parameters.lisp +++ b/lib/opengl-arb_point_parameters.lisp @@ -1,25 +1,19 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_point_parameters - -(defconstant +point-size-min-arb+ #x8126) -(defconstant +point-size-max-arb+ #x8127) -(defconstant +point-fade-threshold-size-arb+ #x8128) -(defconstant +point-distance-attenuation-arb+ #x8129) -(defglextfun - (("PointParameterfvARB" point-parameter-fv-arb) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("ARB_point_parameters") :version ("1.0") - :glxflags ("ARB") :glxropcode ("2066") :extension nil :alias - ("PointParameterfv") :glsalias ("PointParameterfv"))) -(defglextfun - (("PointParameterfARB" point-parameter-f-arb) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("ARB_point_parameters") :version ("1.0") - :glxflags ("ARB") :glxropcode ("2065") :extension nil :alias - ("PointParameterf") :glsalias ("PointParameterf"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_point_parameters + +(defconstant +point-size-min-arb+ #x8126) +(defconstant +point-size-max-arb+ #x8127) +(defconstant +point-fade-threshold-size-arb+ #x8128) +(defconstant +point-distance-attenuation-arb+ #x8129) +(defglextfun "PointParameterfvARB" point-parameter-fv-arb :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "ARB_point_parameters" :version "1.0") +(defglextfun "PointParameterfARB" point-parameter-f-arb :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "ARB_point_parameters" :version "1.0") diff --git a/lib/opengl-arb_shader_objects.lisp b/lib/opengl-arb_shader_objects.lisp dissimilarity index 90% index 60a5d3a..aedb950 100644 --- a/lib/opengl-arb_shader_objects.lisp +++ b/lib/opengl-arb_shader_objects.lisp @@ -1,344 +1,234 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_shader_objects - -(defconstant +program-object-arb+ #x8B40) -(defconstant +shader-object-arb+ #x8B48) -(defconstant +object-type-arb+ #x8B4E) -(defconstant +object-subtype-arb+ #x8B4F) -(defconstant +float-vec2-arb+ #x8B50) -(defconstant +float-vec3-arb+ #x8B51) -(defconstant +float-vec4-arb+ #x8B52) -(defconstant +int-vec2-arb+ #x8B53) -(defconstant +int-vec3-arb+ #x8B54) -(defconstant +int-vec4-arb+ #x8B55) -(defconstant +bool-arb+ #x8B56) -(defconstant +bool-vec2-arb+ #x8B57) -(defconstant +bool-vec3-arb+ #x8B58) -(defconstant +bool-vec4-arb+ #x8B59) -(defconstant +float-mat2-arb+ #x8B5A) -(defconstant +float-mat3-arb+ #x8B5B) -(defconstant +float-mat4-arb+ #x8B5C) -(defconstant +sampler-1d-arb+ #x8B5D) -(defconstant +sampler-2d-arb+ #x8B5E) -(defconstant +sampler-3d-arb+ #x8B5F) -(defconstant +sampler-cube-arb+ #x8B60) -(defconstant +sampler-1d-shadow-arb+ #x8B61) -(defconstant +sampler-2d-shadow-arb+ #x8B62) -(defconstant +sampler-2d-rect-arb+ #x8B63) -(defconstant +sampler-2d-rect-shadow-arb+ #x8B64) -(defconstant +object-delete-status-arb+ #x8B80) -(defconstant +object-compile-status-arb+ #x8B81) -(defconstant +object-link-status-arb+ #x8B82) -(defconstant +object-validate-status-arb+ #x8B83) -(defconstant +object-info-log-length-arb+ #x8B84) -(defconstant +object-attached-objects-arb+ #x8B85) -(defconstant +object-active-uniforms-arb+ #x8B86) -(defconstant +object-active-uniform-max-length-arb+ #x8B87) -(defconstant +object-shader-source-length-arb+ #x8B88) -(defglextfun - (("GetShaderSourceARB" get-shader-source-arb) :args - ((:name |obj| :type |handleARB| :direction :in) - (:name |maxLength| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |source| :type |charARB| :direction :out :array t :size length)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetShaderSource") :glsalias ("GetShaderSource"))) -(defglextfun - (("GetUniformivARB" get-uniform-iv-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |location| :type |Int32| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size location)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetUniformiv") :glsalias ("GetUniformiv"))) -(defglextfun - (("GetUniformfvARB" get-uniform-fv-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |location| :type |Int32| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size location)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetUniformfv") :glsalias ("GetUniformfv"))) -(defglextfun - (("GetActiveUniformARB" get-active-uniform-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |maxLength| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |size| :type |Int32| :direction :out :array t :size #x1) - (:name |type| :type |GLenum| :direction :out :array t :size #x1) - (:name |name| :type |charARB| :direction :out :array t)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetActiveUniform") :glsalias ("GetActiveUniform"))) -(defglextfun - (("GetUniformLocationARB" get-uniform-location-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |name| :type |charARB| :direction :in :array t)) - :return ("Int32") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetUniformLocation") :glsalias ("GetUniformLocation"))) -(defglextfun - (("GetAttachedObjectsARB" get-attached-objects-arb) :args - ((:name |containerObj| :type |handleARB| :direction :in) - (:name |maxCount| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :out :array t :size #x1) - (:name |obj| :type |handleARB| :direction :out :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetAttachedShaders") :glsalias ("GetAttachedShaders"))) -(defglextfun - (("GetInfoLogARB" get-info-log-arb) :args - ((:name |obj| :type |handleARB| :direction :in) - (:name |maxLength| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |infoLog| :type |charARB| :direction :out :array t :size length)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GetObjectParameterivARB" get-object-parameter-iv-arb) :args - ((:name |obj| :type |handleARB| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GetObjectParameterfvARB" get-object-parameter-fv-arb) :args - ((:name |obj| :type |handleARB| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size pname)) - :return ("void") :category ("ARB_shader_objects") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("UniformMatrix4fvARB" uniform-matrix-4fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("UniformMatrix4fv") - :glsalias ("UniformMatrix4fv"))) -(defglextfun - (("UniformMatrix3fvARB" uniform-matrix-3fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("UniformMatrix3fv") - :glsalias ("UniformMatrix3fv"))) -(defglextfun - (("UniformMatrix2fvARB" uniform-matrix-2fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("UniformMatrix2fv") - :glsalias ("UniformMatrix2fv"))) -(defglextfun - (("Uniform4ivARB" uniform-4iv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform4iv") :glsalias - ("Uniform4iv"))) -(defglextfun - (("Uniform3ivARB" uniform-3iv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform3iv") :glsalias - ("Uniform3iv"))) -(defglextfun - (("Uniform2ivARB" uniform-2iv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform2iv") :glsalias - ("Uniform2iv"))) -(defglextfun - (("Uniform1ivARB" uniform-1iv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform1iv") :glsalias - ("Uniform1iv"))) -(defglextfun - (("Uniform4fvARB" uniform-4fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform4fv") :glsalias - ("Uniform4fv"))) -(defglextfun - (("Uniform3fvARB" uniform-3fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform3fv") :glsalias - ("Uniform3fv"))) -(defglextfun - (("Uniform2fvARB" uniform-2fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform2fv") :glsalias - ("Uniform2fv"))) -(defglextfun - (("Uniform1fvARB" uniform-1fv-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform1fv") :glsalias - ("Uniform1fv"))) -(defglextfun - (("Uniform4iARB" uniform-4i-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in) - (:name |v1| :type |Int32| :direction :in) - (:name |v2| :type |Int32| :direction :in) - (:name |v3| :type |Int32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform4i") :glsalias - ("Uniform4i"))) -(defglextfun - (("Uniform3iARB" uniform-3i-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in) - (:name |v1| :type |Int32| :direction :in) - (:name |v2| :type |Int32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform3i") :glsalias - ("Uniform3i"))) -(defglextfun - (("Uniform2iARB" uniform-2i-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in) - (:name |v1| :type |Int32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform2i") :glsalias - ("Uniform2i"))) -(defglextfun - (("Uniform1iARB" uniform-1i-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform1i") :glsalias - ("Uniform1i"))) -(defglextfun - (("Uniform4fARB" uniform-4f-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in) - (:name |v1| :type |Float32| :direction :in) - (:name |v2| :type |Float32| :direction :in) - (:name |v3| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform4f") :glsalias - ("Uniform4f"))) -(defglextfun - (("Uniform3fARB" uniform-3f-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in) - (:name |v1| :type |Float32| :direction :in) - (:name |v2| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform3f") :glsalias - ("Uniform3f"))) -(defglextfun - (("Uniform2fARB" uniform-2f-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in) - (:name |v1| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform2f") :glsalias - ("Uniform2f"))) -(defglextfun - (("Uniform1fARB" uniform-1f-arb) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("Uniform1f") :glsalias - ("Uniform1f"))) -(defglextfun - (("ValidateProgramARB" validate-program-arb) :args - ((:name |programObj| :type |handleARB| :direction :in)) :return ("void") - :category ("ARB_shader_objects") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :alias ("ValidateProgram") :glsalias - ("ValidateProgram"))) -(defglextfun - (("UseProgramObjectARB" use-program-object-arb) :args - ((:name |programObj| :type |handleARB| :direction :in)) :return ("void") - :category ("ARB_shader_objects") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :alias ("UseProgram") :glsalias ("UseProgram"))) -(defglextfun - (("LinkProgramARB" link-program-arb) :args - ((:name |programObj| :type |handleARB| :direction :in)) :return ("void") - :category ("ARB_shader_objects") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :alias ("LinkProgram") :glsalias ("LinkProgram"))) -(defglextfun - (("AttachObjectARB" attach-object-arb) :args - ((:name |containerObj| :type |handleARB| :direction :in) - (:name |obj| :type |handleARB| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("AttachShader") :glsalias - ("AttachShader"))) -(defglextfun - (("CreateProgramObjectARB" create-program-object-arb) :args nil :return - ("handleARB") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("CreateProgram") :glsalias - ("CreateProgram"))) -(defglextfun - (("CompileShaderARB" compile-shader-arb) :args - ((:name |shaderObj| :type |handleARB| :direction :in)) :return ("void") - :category ("ARB_shader_objects") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :alias ("CompileShader") :glsalias - ("CompileShader"))) -(defglextfun - (("ShaderSourceARB" shader-source-arb) :args - ((:name |shaderObj| :type |handleARB| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |string| :type |charPointerARB| :direction :in :array t :size count) - (:name |length| :type |Int32| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("ShaderSource") :glsalias - ("ShaderSource"))) -(defglextfun - (("CreateShaderObjectARB" create-shader-object-arb) :args - ((:name |shaderType| :type |GLenum| :direction :in)) :return ("handleARB") - :category ("ARB_shader_objects") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :alias ("CreateShader") :glsalias - ("CreateShader"))) -(defglextfun - (("DetachObjectARB" detach-object-arb) :args - ((:name |containerObj| :type |handleARB| :direction :in) - (:name |attachedObj| :type |handleARB| :direction :in)) - :return ("void") :category ("ARB_shader_objects") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("DetachShader") :glsalias - ("DetachShader"))) -(defglextfun - (("GetHandleARB" get-handle-arb) :args - ((:name |pname| :type |GLenum| :direction :in)) :return ("handleARB") - :category ("ARB_shader_objects") :dlflags ("notlistable") :version ("1.2") - :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags ("get") - :glsopcode ("?") :offset ("?"))) -(defglextfun - (("DeleteObjectARB" delete-object-arb) :args - ((:name |obj| :type |handleARB| :direction :in)) :return ("void") :category - ("ARB_shader_objects") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_shader_objects + +(defconstant +program-object-arb+ #x8B40) +(defconstant +shader-object-arb+ #x8B48) +(defconstant +object-type-arb+ #x8B4E) +(defconstant +object-subtype-arb+ #x8B4F) +(defconstant +float-vec2-arb+ #x8B50) +(defconstant +float-vec3-arb+ #x8B51) +(defconstant +float-vec4-arb+ #x8B52) +(defconstant +int-vec2-arb+ #x8B53) +(defconstant +int-vec3-arb+ #x8B54) +(defconstant +int-vec4-arb+ #x8B55) +(defconstant +bool-arb+ #x8B56) +(defconstant +bool-vec2-arb+ #x8B57) +(defconstant +bool-vec3-arb+ #x8B58) +(defconstant +bool-vec4-arb+ #x8B59) +(defconstant +float-mat2-arb+ #x8B5A) +(defconstant +float-mat3-arb+ #x8B5B) +(defconstant +float-mat4-arb+ #x8B5C) +(defconstant +sampler-1d-arb+ #x8B5D) +(defconstant +sampler-2d-arb+ #x8B5E) +(defconstant +sampler-3d-arb+ #x8B5F) +(defconstant +sampler-cube-arb+ #x8B60) +(defconstant +sampler-1d-shadow-arb+ #x8B61) +(defconstant +sampler-2d-shadow-arb+ #x8B62) +(defconstant +sampler-2d-rect-arb+ #x8B63) +(defconstant +sampler-2d-rect-shadow-arb+ #x8B64) +(defconstant +object-delete-status-arb+ #x8B80) +(defconstant +object-compile-status-arb+ #x8B81) +(defconstant +object-link-status-arb+ #x8B82) +(defconstant +object-validate-status-arb+ #x8B83) +(defconstant +object-info-log-length-arb+ #x8B84) +(defconstant +object-attached-objects-arb+ #x8B85) +(defconstant +object-active-uniforms-arb+ #x8B86) +(defconstant +object-active-uniform-max-length-arb+ #x8B87) +(defconstant +object-shader-source-length-arb+ #x8B88) +(defglextfun "GetShaderSourceARB" get-shader-source-arb :return "void" :args + ((:name |obj| :type |handleARB| :direction :in) + (:name |maxLength| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |source| :type |charARB| :direction :out :array t :size length)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetUniformivARB" get-uniform-iv-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |location| :type |Int32| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size location)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetUniformfvARB" get-uniform-fv-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |location| :type |Int32| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size location)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetActiveUniformARB" get-active-uniform-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |maxLength| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |size| :type |Int32| :direction :out :array t :size #x1) + (:name |type| :type |GLenum| :direction :out :array t :size #x1) + (:name |name| :type |charARB| :direction :out :array t)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetUniformLocationARB" get-uniform-location-arb :return "Int32" + :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |name| :type |charARB| :direction :in :array t)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetAttachedObjectsARB" get-attached-objects-arb :return "void" + :args + ((:name |containerObj| :type |handleARB| :direction :in) + (:name |maxCount| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :out :array t :size #x1) + (:name |obj| :type |handleARB| :direction :out :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetInfoLogARB" get-info-log-arb :return "void" :args + ((:name |obj| :type |handleARB| :direction :in) + (:name |maxLength| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |infoLog| :type |charARB| :direction :out :array t :size length)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetObjectParameterivARB" get-object-parameter-iv-arb :return + "void" :args + ((:name |obj| :type |handleARB| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetObjectParameterfvARB" get-object-parameter-fv-arb :return + "void" :args + ((:name |obj| :type |handleARB| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size pname)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "UniformMatrix4fvARB" uniform-matrix-4fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "UniformMatrix3fvARB" uniform-matrix-3fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "UniformMatrix2fvARB" uniform-matrix-2fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform4ivARB" uniform-4iv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform3ivARB" uniform-3iv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform2ivARB" uniform-2iv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform1ivARB" uniform-1iv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform4fvARB" uniform-4fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform3fvARB" uniform-3fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform2fvARB" uniform-2fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform1fvARB" uniform-1fv-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform4iARB" uniform-4i-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in) + (:name |v1| :type |Int32| :direction :in) + (:name |v2| :type |Int32| :direction :in) + (:name |v3| :type |Int32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform3iARB" uniform-3i-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in) + (:name |v1| :type |Int32| :direction :in) + (:name |v2| :type |Int32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform2iARB" uniform-2i-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in) + (:name |v1| :type |Int32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform1iARB" uniform-1i-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform4fARB" uniform-4f-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in) + (:name |v1| :type |Float32| :direction :in) + (:name |v2| :type |Float32| :direction :in) + (:name |v3| :type |Float32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform3fARB" uniform-3f-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in) + (:name |v1| :type |Float32| :direction :in) + (:name |v2| :type |Float32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform2fARB" uniform-2f-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in) + (:name |v1| :type |Float32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "Uniform1fARB" uniform-1f-arb :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "ValidateProgramARB" validate-program-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in)) :category + "ARB_shader_objects" :version "1.2") +(defglextfun "UseProgramObjectARB" use-program-object-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in)) :category + "ARB_shader_objects" :version "1.2") +(defglextfun "LinkProgramARB" link-program-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in)) :category + "ARB_shader_objects" :version "1.2") +(defglextfun "AttachObjectARB" attach-object-arb :return "void" :args + ((:name |containerObj| :type |handleARB| :direction :in) + (:name |obj| :type |handleARB| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "CreateProgramObjectARB" create-program-object-arb :return + "handleARB" :args nil :category "ARB_shader_objects" :version "1.2") +(defglextfun "CompileShaderARB" compile-shader-arb :return "void" :args + ((:name |shaderObj| :type |handleARB| :direction :in)) :category + "ARB_shader_objects" :version "1.2") +(defglextfun "ShaderSourceARB" shader-source-arb :return "void" :args + ((:name |shaderObj| :type |handleARB| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |string| :type |charPointerARB| :direction :in :array t :size count) + (:name |length| :type |Int32| :direction :in :array t :size #x1)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "CreateShaderObjectARB" create-shader-object-arb :return + "handleARB" :args ((:name |shaderType| :type |GLenum| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "DetachObjectARB" detach-object-arb :return "void" :args + ((:name |containerObj| :type |handleARB| :direction :in) + (:name |attachedObj| :type |handleARB| :direction :in)) + :category "ARB_shader_objects" :version "1.2") +(defglextfun "GetHandleARB" get-handle-arb :return "handleARB" :args + ((:name |pname| :type |GLenum| :direction :in)) :category "ARB_shader_objects" + :version "1.2") +(defglextfun "DeleteObjectARB" delete-object-arb :return "void" :args + ((:name |obj| :type |handleARB| :direction :in)) :category + "ARB_shader_objects" :version "1.2") diff --git a/lib/opengl-arb_texture_compression.lisp b/lib/opengl-arb_texture_compression.lisp dissimilarity index 88% index 2e6279f..e19a8b6 100644 --- a/lib/opengl-arb_texture_compression.lisp +++ b/lib/opengl-arb_texture_compression.lisp @@ -1,121 +1,99 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_texture_compression - -(defconstant +compressed-alpha-arb+ #x84E9) -(defconstant +compressed-luminance-arb+ #x84EA) -(defconstant +compressed-luminance-alpha-arb+ #x84EB) -(defconstant +compressed-intensity-arb+ #x84EC) -(defconstant +compressed-rgb-arb+ #x84ED) -(defconstant +compressed-rgba-arb+ #x84EE) -(defconstant +texture-compression-hint-arb+ #x84EF) -(defconstant +texture-compressed-image-size-arb+ #x86A0) -(defconstant +texture-compressed-arb+ #x86A1) -(defconstant +num-compressed-texture-formats-arb+ #x86A2) -(defconstant +compressed-texture-formats-arb+ #x86A3) -(defglextfun - (("GetCompressedTexImageARB" get-compressed-tex-image-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |img| :type |CompressedTextureARB| :direction :out :array t :size - (|target| |level|))) - :return ("void") :category ("ARB_texture_compression") :dlflags - ("notlistable") :glxflags ("ARB" "client-handcode" "server-handcode") - :version ("1.2") :glxsingle ("160") :alias ("GetCompressedTexImage") - :glsalias ("GetCompressedTexImage") :wglflags - ("client-handcode" "server-handcode"))) -(defglextfun - (("CompressedTexSubImage1DARB" compressed-tex-sub-image-1d-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("ARB_texture_compression") :dlflags ("handcode") - :glxflags ("ARB" "client-handcode" "server-handcode") :version ("1.2") - :glxropcode ("217") :alias ("CompressedTexSubImage1D") :glsalias - ("CompressedTexSubImage1D") :wglflags ("client-handcode" "server-handcode"))) -(defglextfun - (("CompressedTexSubImage2DARB" compressed-tex-sub-image-2d-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("ARB_texture_compression") :dlflags ("handcode") - :glxflags ("ARB" "client-handcode" "server-handcode") :version ("1.2") - :glxropcode ("218") :alias ("CompressedTexSubImage2D") :glsalias - ("CompressedTexSubImage2D") :wglflags ("client-handcode" "server-handcode"))) -(defglextfun - (("CompressedTexSubImage3DARB" compressed-tex-sub-image-3d-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("ARB_texture_compression") :dlflags ("handcode") - :glxflags ("ARB" "client-handcode" "server-handcode") :version ("1.2") - :glxropcode ("219") :alias ("CompressedTexSubImage3D") :glsalias - ("CompressedTexSubImage3D") :wglflags ("client-handcode" "server-handcode"))) -(defglextfun - (("CompressedTexImage1DARB" compressed-tex-image-1d-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("ARB_texture_compression") :dlflags ("handcode") - :glxflags ("ARB" "client-handcode" "server-handcode") :version ("1.2") - :glxropcode ("214") :alias ("CompressedTexImage1D") :glsalias - ("CompressedTexImage1D") :wglflags ("client-handcode" "server-handcode"))) -(defglextfun - (("CompressedTexImage2DARB" compressed-tex-image-2d-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("ARB_texture_compression") :dlflags ("handcode") - :glxflags ("ARB" "client-handcode" "server-handcode") :version ("1.2") - :glxropcode ("215") :alias ("CompressedTexImage2D") :glsalias - ("CompressedTexImage2D") :wglflags ("client-handcode" "server-handcode"))) -(defglextfun - (("CompressedTexImage3DARB" compressed-tex-image-3d-arb) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("ARB_texture_compression") :dlflags ("handcode") - :glxflags ("ARB" "client-handcode" "server-handcode") :version ("1.2") - :glxropcode ("216") :alias ("CompressedTexImage3D") :glsalias - ("CompressedTexImage3D") :wglflags ("client-handcode" "server-handcode"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_texture_compression + +(defconstant +compressed-alpha-arb+ #x84E9) +(defconstant +compressed-luminance-arb+ #x84EA) +(defconstant +compressed-luminance-alpha-arb+ #x84EB) +(defconstant +compressed-intensity-arb+ #x84EC) +(defconstant +compressed-rgb-arb+ #x84ED) +(defconstant +compressed-rgba-arb+ #x84EE) +(defconstant +texture-compression-hint-arb+ #x84EF) +(defconstant +texture-compressed-image-size-arb+ #x86A0) +(defconstant +texture-compressed-arb+ #x86A1) +(defconstant +num-compressed-texture-formats-arb+ #x86A2) +(defconstant +compressed-texture-formats-arb+ #x86A3) +(defglextfun "GetCompressedTexImageARB" get-compressed-tex-image-arb :return + "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |img| :type |CompressedTextureARB| :direction :out :array t :size + (|target| |level|))) + :category "ARB_texture_compression" :version "1.2") +(defglextfun "CompressedTexSubImage1DARB" compressed-tex-sub-image-1d-arb + :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "ARB_texture_compression" :version "1.2") +(defglextfun "CompressedTexSubImage2DARB" compressed-tex-sub-image-2d-arb + :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "ARB_texture_compression" :version "1.2") +(defglextfun "CompressedTexSubImage3DARB" compressed-tex-sub-image-3d-arb + :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "ARB_texture_compression" :version "1.2") +(defglextfun "CompressedTexImage1DARB" compressed-tex-image-1d-arb :return + "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "ARB_texture_compression" :version "1.2") +(defglextfun "CompressedTexImage2DARB" compressed-tex-image-2d-arb :return + "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "ARB_texture_compression" :version "1.2") +(defglextfun "CompressedTexImage3DARB" compressed-tex-image-3d-arb :return + "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "ARB_texture_compression" :version "1.2") diff --git a/lib/opengl-arb_transpose_matrix.lisp b/lib/opengl-arb_transpose_matrix.lisp dissimilarity index 78% index 067f817..dbab000 100644 --- a/lib/opengl-arb_transpose_matrix.lisp +++ b/lib/opengl-arb_transpose_matrix.lisp @@ -1,34 +1,22 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_transpose_matrix - -(defconstant +transpose-modelview-matrix-arb+ #x84E3) -(defconstant +transpose-projection-matrix-arb+ #x84E4) -(defconstant +transpose-texture-matrix-arb+ #x84E5) -(defconstant +transpose-color-matrix-arb+ #x84E6) -(defglextfun - (("MultTransposeMatrixdARB" mult-transpose-matrix-d-arb) :args - ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :return - ("void") :category ("ARB_transpose_matrix") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :alias ("MultTransposeMatrixd") :glsalias ("MultTransposeMatrixd"))) -(defglextfun - (("MultTransposeMatrixfARB" mult-transpose-matrix-f-arb) :args - ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :return - ("void") :category ("ARB_transpose_matrix") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :alias ("MultTransposeMatrixf") :glsalias ("MultTransposeMatrixf"))) -(defglextfun - (("LoadTransposeMatrixdARB" load-transpose-matrix-d-arb) :args - ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :return - ("void") :category ("ARB_transpose_matrix") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :alias ("LoadTransposeMatrixd") :glsalias ("LoadTransposeMatrixd"))) -(defglextfun - (("LoadTransposeMatrixfARB" load-transpose-matrix-f-arb) :args - ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :return - ("void") :category ("ARB_transpose_matrix") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :alias ("LoadTransposeMatrixf") :glsalias ("LoadTransposeMatrixf"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_transpose_matrix + +(defconstant +transpose-modelview-matrix-arb+ #x84E3) +(defconstant +transpose-projection-matrix-arb+ #x84E4) +(defconstant +transpose-texture-matrix-arb+ #x84E5) +(defconstant +transpose-color-matrix-arb+ #x84E6) +(defglextfun "MultTransposeMatrixdARB" mult-transpose-matrix-d-arb :return + "void" :args ((:name |m| :type |Float64| :direction :in :array t :size #x10)) + :category "ARB_transpose_matrix" :version "1.2") +(defglextfun "MultTransposeMatrixfARB" mult-transpose-matrix-f-arb :return + "void" :args ((:name |m| :type |Float32| :direction :in :array t :size #x10)) + :category "ARB_transpose_matrix" :version "1.2") +(defglextfun "LoadTransposeMatrixdARB" load-transpose-matrix-d-arb :return + "void" :args ((:name |m| :type |Float64| :direction :in :array t :size #x10)) + :category "ARB_transpose_matrix" :version "1.2") +(defglextfun "LoadTransposeMatrixfARB" load-transpose-matrix-f-arb :return + "void" :args ((:name |m| :type |Float32| :direction :in :array t :size #x10)) + :category "ARB_transpose_matrix" :version "1.2") diff --git a/lib/opengl-arb_vertex_blend.lisp b/lib/opengl-arb_vertex_blend.lisp dissimilarity index 64% index a25e67e..9a2e91c 100644 --- a/lib/opengl-arb_vertex_blend.lisp +++ b/lib/opengl-arb_vertex_blend.lisp @@ -1,119 +1,90 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_vertex_blend - -(defconstant +max-vertex-units-arb+ #x86A4) -(defconstant +active-vertex-units-arb+ #x86A5) -(defconstant +weight-sum-unity-arb+ #x86A6) -(defconstant +vertex-blend-arb+ #x86A7) -(defconstant +current-weight-arb+ #x86A8) -(defconstant +weight-array-type-arb+ #x86A9) -(defconstant +weight-array-stride-arb+ #x86AA) -(defconstant +weight-array-size-arb+ #x86AB) -(defconstant +weight-array-pointer-arb+ #x86AC) -(defconstant +weight-array-arb+ #x86AD) -(defconstant +modelview0-arb+ #x1700) -(defconstant +modelview1-arb+ #x850A) -(defconstant +modelview2-arb+ #x8722) -(defconstant +modelview3-arb+ #x8723) -(defconstant +modelview4-arb+ #x8724) -(defconstant +modelview5-arb+ #x8725) -(defconstant +modelview6-arb+ #x8726) -(defconstant +modelview7-arb+ #x8727) -(defconstant +modelview8-arb+ #x8728) -(defconstant +modelview9-arb+ #x8729) -(defconstant +modelview10-arb+ #x872A) -(defconstant +modelview11-arb+ #x872B) -(defconstant +modelview12-arb+ #x872C) -(defconstant +modelview13-arb+ #x872D) -(defconstant +modelview14-arb+ #x872E) -(defconstant +modelview15-arb+ #x872F) -(defconstant +modelview16-arb+ #x8730) -(defconstant +modelview17-arb+ #x8731) -(defconstant +modelview18-arb+ #x8732) -(defconstant +modelview19-arb+ #x8733) -(defconstant +modelview20-arb+ #x8734) -(defconstant +modelview21-arb+ #x8735) -(defconstant +modelview22-arb+ #x8736) -(defconstant +modelview23-arb+ #x8737) -(defconstant +modelview24-arb+ #x8738) -(defconstant +modelview25-arb+ #x8739) -(defconstant +modelview26-arb+ #x873A) -(defconstant +modelview27-arb+ #x873B) -(defconstant +modelview28-arb+ #x873C) -(defconstant +modelview29-arb+ #x873D) -(defconstant +modelview30-arb+ #x873E) -(defconstant +modelview31-arb+ #x873F) -(defglextfun - (("VertexBlendARB" vertex-blend-arb) :args - ((:name |count| :type |Int32| :direction :in)) :return ("void") :category - ("ARB_vertex_blend") :version ("1.1") :extension nil :glxropcode ("226") - :glxflags ("ignore") :glsopcode ("0x020F") :offset ("?"))) -(defglextfun - (("WeightPointerARB" weight-pointer-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |WeightPointerTypeARB| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :dlflags ("notlistable") :glxflags ("ignore") :glsflags ("client") - :glsopcode ("0x020E") :offset ("?"))) -(defglextfun - (("WeightuivARB" weight-uiv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |UInt32| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("225") :glxflags ("ignore") :glsopcode ("0x020D") :offset - ("?"))) -(defglextfun - (("WeightusvARB" weight-usv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |UInt16| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("223") :glxflags ("ignore") :glsopcode ("0x020C") :offset - ("?"))) -(defglextfun - (("WeightubvARB" weight-ubv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |UInt8| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("221") :glxflags ("ignore") :glsopcode ("0x020B") :offset - ("?"))) -(defglextfun - (("WeightdvARB" weight-dv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |Float64| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("228") :glxflags ("ignore") :glsopcode ("0x020A") :offset - ("?"))) -(defglextfun - (("WeightfvARB" weight-fv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |Float32| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("227") :glxflags ("ignore") :glsopcode ("0x0209") :offset - ("?"))) -(defglextfun - (("WeightivARB" weight-iv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |Int32| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("224") :glxflags ("ignore") :glsopcode ("0x0208") :offset - ("?"))) -(defglextfun - (("WeightsvARB" weight-sv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |Int16| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("222") :glxflags ("ignore") :glsopcode ("0x0207") :offset - ("?"))) -(defglextfun - (("WeightbvARB" weight-bv-arb) :args - ((:name |size| :type |Int32| :direction :in) - (:name |weights| :type |Int8| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_blend") :version ("1.1") :extension - nil :glxropcode ("220") :glxflags ("ignore") :glsopcode ("0x0206") :offset - ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_vertex_blend + +(defconstant +max-vertex-units-arb+ #x86A4) +(defconstant +active-vertex-units-arb+ #x86A5) +(defconstant +weight-sum-unity-arb+ #x86A6) +(defconstant +vertex-blend-arb+ #x86A7) +(defconstant +current-weight-arb+ #x86A8) +(defconstant +weight-array-type-arb+ #x86A9) +(defconstant +weight-array-stride-arb+ #x86AA) +(defconstant +weight-array-size-arb+ #x86AB) +(defconstant +weight-array-pointer-arb+ #x86AC) +(defconstant +weight-array-arb+ #x86AD) +(defconstant +modelview0-arb+ #x1700) +(defconstant +modelview1-arb+ #x850A) +(defconstant +modelview2-arb+ #x8722) +(defconstant +modelview3-arb+ #x8723) +(defconstant +modelview4-arb+ #x8724) +(defconstant +modelview5-arb+ #x8725) +(defconstant +modelview6-arb+ #x8726) +(defconstant +modelview7-arb+ #x8727) +(defconstant +modelview8-arb+ #x8728) +(defconstant +modelview9-arb+ #x8729) +(defconstant +modelview10-arb+ #x872A) +(defconstant +modelview11-arb+ #x872B) +(defconstant +modelview12-arb+ #x872C) +(defconstant +modelview13-arb+ #x872D) +(defconstant +modelview14-arb+ #x872E) +(defconstant +modelview15-arb+ #x872F) +(defconstant +modelview16-arb+ #x8730) +(defconstant +modelview17-arb+ #x8731) +(defconstant +modelview18-arb+ #x8732) +(defconstant +modelview19-arb+ #x8733) +(defconstant +modelview20-arb+ #x8734) +(defconstant +modelview21-arb+ #x8735) +(defconstant +modelview22-arb+ #x8736) +(defconstant +modelview23-arb+ #x8737) +(defconstant +modelview24-arb+ #x8738) +(defconstant +modelview25-arb+ #x8739) +(defconstant +modelview26-arb+ #x873A) +(defconstant +modelview27-arb+ #x873B) +(defconstant +modelview28-arb+ #x873C) +(defconstant +modelview29-arb+ #x873D) +(defconstant +modelview30-arb+ #x873E) +(defconstant +modelview31-arb+ #x873F) +(defglextfun "VertexBlendARB" vertex-blend-arb :return "void" :args + ((:name |count| :type |Int32| :direction :in)) :category "ARB_vertex_blend" + :version "1.1") +(defglextfun "WeightPointerARB" weight-pointer-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |WeightPointerTypeARB| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightuivARB" weight-uiv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |UInt32| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightusvARB" weight-usv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |UInt16| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightubvARB" weight-ubv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |UInt8| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightdvARB" weight-dv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |Float64| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightfvARB" weight-fv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |Float32| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightivARB" weight-iv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |Int32| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightsvARB" weight-sv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |Int16| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") +(defglextfun "WeightbvARB" weight-bv-arb :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |weights| :type |Int8| :direction :in :array t :size size)) + :category "ARB_vertex_blend" :version "1.1") diff --git a/lib/opengl-arb_vertex_buffer_object.lisp b/lib/opengl-arb_vertex_buffer_object.lisp dissimilarity index 70% index feef733..cefbe8b 100644 --- a/lib/opengl-arb_vertex_buffer_object.lisp +++ b/lib/opengl-arb_vertex_buffer_object.lisp @@ -1,112 +1,89 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_vertex_buffer_object - -(defconstant +buffer-size-arb+ #x8764) -(defconstant +buffer-usage-arb+ #x8765) -(defconstant +array-buffer-arb+ #x8892) -(defconstant +element-array-buffer-arb+ #x8893) -(defconstant +array-buffer-binding-arb+ #x8894) -(defconstant +element-array-buffer-binding-arb+ #x8895) -(defconstant +vertex-array-buffer-binding-arb+ #x8896) -(defconstant +normal-array-buffer-binding-arb+ #x8897) -(defconstant +color-array-buffer-binding-arb+ #x8898) -(defconstant +index-array-buffer-binding-arb+ #x8899) -(defconstant +texture-coord-array-buffer-binding-arb+ #x889A) -(defconstant +edge-flag-array-buffer-binding-arb+ #x889B) -(defconstant +secondary-color-array-buffer-binding-arb+ #x889C) -(defconstant +fog-coordinate-array-buffer-binding-arb+ #x889D) -(defconstant +weight-array-buffer-binding-arb+ #x889E) -(defconstant +vertex-attrib-array-buffer-binding-arb+ #x889F) -(defconstant +read-only-arb+ #x88B8) -(defconstant +write-only-arb+ #x88B9) -(defconstant +read-write-arb+ #x88BA) -(defconstant +buffer-access-arb+ #x88BB) -(defconstant +buffer-mapped-arb+ #x88BC) -(defconstant +buffer-map-pointer-arb+ #x88BD) -(defconstant +stream-draw-arb+ #x88E0) -(defconstant +stream-read-arb+ #x88E1) -(defconstant +stream-copy-arb+ #x88E2) -(defconstant +static-draw-arb+ #x88E4) -(defconstant +static-read-arb+ #x88E5) -(defconstant +static-copy-arb+ #x88E6) -(defconstant +dynamic-draw-arb+ #x88E8) -(defconstant +dynamic-read-arb+ #x88E9) -(defconstant +dynamic-copy-arb+ #x88EA) -(defglextfun - (("GetBufferPointervARB" get-buffer-pointerv-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |pname| :type |BufferPointerNameARB| :direction :in) - (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :category ("ARB_vertex_buffer_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :alias ("GetBufferPointerv") - :glsalias ("GetBufferPointerv"))) -(defglextfun - (("GetBufferParameterivARB" get-buffer-parameter-iv-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |pname| :type |BufferPNameARB| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("ARB_vertex_buffer_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :alias - ("GetBufferParameteriv") :glsalias ("GetBufferParameteriv"))) -(defglextfun - (("UnmapBufferARB" unmap-buffer-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in)) :return ("Boolean") - :category ("ARB_vertex_buffer_object") :version ("1.2") :extension nil :alias - ("UnmapBuffer") :glsalias ("UnmapBuffer"))) -(defglextfun - (("MapBufferARB" map-buffer-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |access| :type |BufferAccessARB| :direction :in)) - :return ("VoidPointer") :category ("ARB_vertex_buffer_object") :version - ("1.2") :extension nil :alias ("MapBuffer") :glsalias ("MapBuffer"))) -(defglextfun - (("GetBufferSubDataARB" get-buffer-sub-data-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |offset| :type |BufferOffsetARB| :direction :in) - (:name |size| :type |BufferSizeARB| :direction :in) - (:name |data| :type |Void| :direction :out :array t :size size)) - :return ("void") :category ("ARB_vertex_buffer_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :alias ("GetBufferSubData") - :glsalias ("GetBufferSubData"))) -(defglextfun - (("BufferSubDataARB" buffer-sub-data-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |offset| :type |BufferOffsetARB| :direction :in) - (:name |size| :type |BufferSizeARB| :direction :in) - (:name |data| :type |ConstVoid| :direction :in :array t :size size)) - :return ("void") :category ("ARB_vertex_buffer_object") :version ("1.2") - :extension nil :alias ("BufferSubData") :glsalias ("BufferSubData"))) -(defglextfun - (("BufferDataARB" buffer-data-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |size| :type |BufferSizeARB| :direction :in) - (:name |data| :type |ConstVoid| :direction :in :array t :size size) - (:name |usage| :type |BufferUsageARB| :direction :in)) - :return ("void") :category ("ARB_vertex_buffer_object") :version ("1.2") - :extension nil :alias ("BufferData") :glsalias ("BufferData"))) -(defglextfun - (("IsBufferARB" is-buffer-arb) :args - ((:name |buffer| :type |UInt32| :direction :in)) :return ("Boolean") - :category ("ARB_vertex_buffer_object") :version ("1.2") :extension nil :alias - ("IsBuffer") :glsalias ("IsBuffer"))) -(defglextfun - (("GenBuffersARB" gen-buffers-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |buffers| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("ARB_vertex_buffer_object") :version ("1.2") - :extension nil :alias ("GenBuffers") :glsalias ("GenBuffers"))) -(defglextfun - (("DeleteBuffersARB" delete-buffers-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |buffers| :type |ConstUInt32| :direction :in :array t :size n)) - :return ("void") :category ("ARB_vertex_buffer_object") :version ("1.2") - :extension nil :alias ("DeleteBuffers") :glsalias ("DeleteBuffers"))) -(defglextfun - (("BindBufferARB" bind-buffer-arb) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |buffer| :type |UInt32| :direction :in)) - :return ("void") :category ("ARB_vertex_buffer_object") :version ("1.2") - :extension nil :alias ("BindBuffer") :glsalias ("BindBuffer"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_vertex_buffer_object + +(defconstant +buffer-size-arb+ #x8764) +(defconstant +buffer-usage-arb+ #x8765) +(defconstant +array-buffer-arb+ #x8892) +(defconstant +element-array-buffer-arb+ #x8893) +(defconstant +array-buffer-binding-arb+ #x8894) +(defconstant +element-array-buffer-binding-arb+ #x8895) +(defconstant +vertex-array-buffer-binding-arb+ #x8896) +(defconstant +normal-array-buffer-binding-arb+ #x8897) +(defconstant +color-array-buffer-binding-arb+ #x8898) +(defconstant +index-array-buffer-binding-arb+ #x8899) +(defconstant +texture-coord-array-buffer-binding-arb+ #x889A) +(defconstant +edge-flag-array-buffer-binding-arb+ #x889B) +(defconstant +secondary-color-array-buffer-binding-arb+ #x889C) +(defconstant +fog-coordinate-array-buffer-binding-arb+ #x889D) +(defconstant +weight-array-buffer-binding-arb+ #x889E) +(defconstant +vertex-attrib-array-buffer-binding-arb+ #x889F) +(defconstant +read-only-arb+ #x88B8) +(defconstant +write-only-arb+ #x88B9) +(defconstant +read-write-arb+ #x88BA) +(defconstant +buffer-access-arb+ #x88BB) +(defconstant +buffer-mapped-arb+ #x88BC) +(defconstant +buffer-map-pointer-arb+ #x88BD) +(defconstant +stream-draw-arb+ #x88E0) +(defconstant +stream-read-arb+ #x88E1) +(defconstant +stream-copy-arb+ #x88E2) +(defconstant +static-draw-arb+ #x88E4) +(defconstant +static-read-arb+ #x88E5) +(defconstant +static-copy-arb+ #x88E6) +(defconstant +dynamic-draw-arb+ #x88E8) +(defconstant +dynamic-read-arb+ #x88E9) +(defconstant +dynamic-copy-arb+ #x88EA) +(defglextfun "GetBufferPointervARB" get-buffer-pointerv-arb :return "void" + :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |pname| :type |BufferPointerNameARB| :direction :in) + (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "GetBufferParameterivARB" get-buffer-parameter-iv-arb :return + "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |pname| :type |BufferPNameARB| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "UnmapBufferARB" unmap-buffer-arb :return "Boolean" :args + ((:name |target| :type |BufferTargetARB| :direction :in)) :category + "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "MapBufferARB" map-buffer-arb :return "VoidPointer" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |access| :type |BufferAccessARB| :direction :in)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "GetBufferSubDataARB" get-buffer-sub-data-arb :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |offset| :type |BufferOffsetARB| :direction :in) + (:name |size| :type |BufferSizeARB| :direction :in) + (:name |data| :type |Void| :direction :out :array t :size size)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "BufferSubDataARB" buffer-sub-data-arb :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |offset| :type |BufferOffsetARB| :direction :in) + (:name |size| :type |BufferSizeARB| :direction :in) + (:name |data| :type |ConstVoid| :direction :in :array t :size size)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "BufferDataARB" buffer-data-arb :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |size| :type |BufferSizeARB| :direction :in) + (:name |data| :type |ConstVoid| :direction :in :array t :size size) + (:name |usage| :type |BufferUsageARB| :direction :in)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "IsBufferARB" is-buffer-arb :return "Boolean" :args + ((:name |buffer| :type |UInt32| :direction :in)) :category + "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "GenBuffersARB" gen-buffers-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |buffers| :type |UInt32| :direction :out :array t :size n)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "DeleteBuffersARB" delete-buffers-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |buffers| :type |ConstUInt32| :direction :in :array t :size n)) + :category "ARB_vertex_buffer_object" :version "1.2") +(defglextfun "BindBufferARB" bind-buffer-arb :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |buffer| :type |UInt32| :direction :in)) + :category "ARB_vertex_buffer_object" :version "1.2") diff --git a/lib/opengl-arb_vertex_program.lisp b/lib/opengl-arb_vertex_program.lisp dissimilarity index 87% index 732d0bf..7ab33ef 100644 --- a/lib/opengl-arb_vertex_program.lisp +++ b/lib/opengl-arb_vertex_program.lisp @@ -1,583 +1,409 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_vertex_program - -(defconstant +color-sum-arb+ #x8458) -(defconstant +vertex-program-arb+ #x8620) -(defconstant +vertex-attrib-array-enabled-arb+ #x8622) -(defconstant +vertex-attrib-array-size-arb+ #x8623) -(defconstant +vertex-attrib-array-stride-arb+ #x8624) -(defconstant +vertex-attrib-array-type-arb+ #x8625) -(defconstant +current-vertex-attrib-arb+ #x8626) -(defconstant +program-length-arb+ #x8627) -(defconstant +program-string-arb+ #x8628) -(defconstant +max-program-matrix-stack-depth-arb+ #x862E) -(defconstant +max-program-matrices-arb+ #x862F) -(defconstant +current-matrix-stack-depth-arb+ #x8640) -(defconstant +current-matrix-arb+ #x8641) -(defconstant +vertex-program-point-size-arb+ #x8642) -(defconstant +vertex-program-two-side-arb+ #x8643) -(defconstant +vertex-attrib-array-pointer-arb+ #x8645) -(defconstant +program-error-position-arb+ #x864B) -(defconstant +program-binding-arb+ #x8677) -(defconstant +max-vertex-attribs-arb+ #x8869) -(defconstant +vertex-attrib-array-normalized-arb+ #x886A) -(defconstant +program-error-string-arb+ #x8874) -(defconstant +program-format-ascii-arb+ #x8875) -(defconstant +program-format-arb+ #x8876) -(defconstant +program-instructions-arb+ #x88A0) -(defconstant +max-program-instructions-arb+ #x88A1) -(defconstant +program-native-instructions-arb+ #x88A2) -(defconstant +max-program-native-instructions-arb+ #x88A3) -(defconstant +program-temporaries-arb+ #x88A4) -(defconstant +max-program-temporaries-arb+ #x88A5) -(defconstant +program-native-temporaries-arb+ #x88A6) -(defconstant +max-program-native-temporaries-arb+ #x88A7) -(defconstant +program-parameters-arb+ #x88A8) -(defconstant +max-program-parameters-arb+ #x88A9) -(defconstant +program-native-parameters-arb+ #x88AA) -(defconstant +max-program-native-parameters-arb+ #x88AB) -(defconstant +program-attribs-arb+ #x88AC) -(defconstant +max-program-attribs-arb+ #x88AD) -(defconstant +program-native-attribs-arb+ #x88AE) -(defconstant +max-program-native-attribs-arb+ #x88AF) -(defconstant +program-address-registers-arb+ #x88B0) -(defconstant +max-program-address-registers-arb+ #x88B1) -(defconstant +program-native-address-registers-arb+ #x88B2) -(defconstant +max-program-native-address-registers-arb+ #x88B3) -(defconstant +max-program-local-parameters-arb+ #x88B4) -(defconstant +max-program-env-parameters-arb+ #x88B5) -(defconstant +program-under-native-limits-arb+ #x88B6) -(defconstant +transpose-current-matrix-arb+ #x88B7) -(defconstant +matrix0-arb+ #x88C0) -(defconstant +matrix1-arb+ #x88C1) -(defconstant +matrix2-arb+ #x88C2) -(defconstant +matrix3-arb+ #x88C3) -(defconstant +matrix4-arb+ #x88C4) -(defconstant +matrix5-arb+ #x88C5) -(defconstant +matrix6-arb+ #x88C6) -(defconstant +matrix7-arb+ #x88C7) -(defconstant +matrix8-arb+ #x88C8) -(defconstant +matrix9-arb+ #x88C9) -(defconstant +matrix10-arb+ #x88CA) -(defconstant +matrix11-arb+ #x88CB) -(defconstant +matrix12-arb+ #x88CC) -(defconstant +matrix13-arb+ #x88CD) -(defconstant +matrix14-arb+ #x88CE) -(defconstant +matrix15-arb+ #x88CF) -(defconstant +matrix16-arb+ #x88D0) -(defconstant +matrix17-arb+ #x88D1) -(defconstant +matrix18-arb+ #x88D2) -(defconstant +matrix19-arb+ #x88D3) -(defconstant +matrix20-arb+ #x88D4) -(defconstant +matrix21-arb+ #x88D5) -(defconstant +matrix22-arb+ #x88D6) -(defconstant +matrix23-arb+ #x88D7) -(defconstant +matrix24-arb+ #x88D8) -(defconstant +matrix25-arb+ #x88D9) -(defconstant +matrix26-arb+ #x88DA) -(defconstant +matrix27-arb+ #x88DB) -(defconstant +matrix28-arb+ #x88DC) -(defconstant +matrix29-arb+ #x88DD) -(defconstant +matrix30-arb+ #x88DE) -(defconstant +matrix31-arb+ #x88DF) -(defglextfun - (("IsProgramARB" is-program-arb) :args - ((:name |program| :type |UInt32| :direction :in)) :return ("Boolean") - :dlflags ("notlistable") :category ("ARB_vertex_program") :version ("1.3") - :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1304") :glsflags - ("get") :alias ("IsProgram") :glsalias ("IsProgram"))) -(defglextfun - (("GetVertexAttribPointervARB" get-vertex-attrib-pointerv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPointerPropertyARB| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("client" "get") :glsopcode ("0x0235") :alias - ("GetVertexAttribPointerv") :glsalias ("GetVertexAttribPointerv"))) -(defglextfun - (("GetVertexAttribivARB" get-vertex-attrib-iv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPropertyARB| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1303") - :glsflags ("client" "get") :glsopcode ("0x0234") :alias ("GetVertexAttribiv") - :glsalias ("GetVertexAttribiv"))) -(defglextfun - (("GetVertexAttribfvARB" get-vertex-attrib-fv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPropertyARB| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1302") - :glsflags ("client" "get") :glsopcode ("0x0233") :alias ("GetVertexAttribfv") - :glsalias ("GetVertexAttribfv"))) -(defglextfun - (("GetVertexAttribdvARB" get-vertex-attrib-dv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPropertyARB| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1301") - :glsflags ("client" "get") :glsopcode ("0x0232") :alias ("GetVertexAttribdv") - :glsalias ("GetVertexAttribdv"))) -(defglextfun - (("GetProgramStringARB" get-program-string-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |pname| :type |ProgramStringPropertyARB| :direction :in) - (:name |string| :type |Void| :direction :out :array t :size - (|target| |pname|))) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("681"))) -(defglextfun - (("GetProgramivARB" get-program-iv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |pname| :type |ProgramPropertyARB| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("680"))) -(defglextfun - (("GetProgramLocalParameterfvARB" get-program-local-parameter-fv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("679"))) -(defglextfun - (("GetProgramLocalParameterdvARB" get-program-local-parameter-dv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("678"))) -(defglextfun - (("GetProgramEnvParameterfvARB" get-program-env-parameter-fv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("677"))) -(defglextfun - (("GetProgramEnvParameterdvARB" get-program-env-parameter-dv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("676"))) -(defglextfun - (("ProgramLocalParameter4fvARB" program-local-parameter-4fv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("675"))) -(defglextfun - (("ProgramLocalParameter4fARB" program-local-parameter-4f-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("ProgramLocalParameter4fvARB") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("674"))) -(defglextfun - (("ProgramLocalParameter4dvARB" program-local-parameter-4dv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("673"))) -(defglextfun - (("ProgramLocalParameter4dARB" program-local-parameter-4d-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("ProgramLocalParameter4dvARB") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("672"))) -(defglextfun - (("ProgramEnvParameter4fvARB" program-env-parameter-4fv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("671"))) -(defglextfun - (("ProgramEnvParameter4fARB" program-env-parameter-4f-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("ProgramEnvParameter4fvARB") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("670"))) -(defglextfun - (("ProgramEnvParameter4dvARB" program-env-parameter-4dv-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("669"))) -(defglextfun - (("ProgramEnvParameter4dARB" program-env-parameter-4d-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("ProgramEnvParameter4dvARB") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("668"))) -(defglextfun - (("GenProgramsARB" gen-programs-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |programs| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1295") - :glsopcode ("0x022A") :offset ("582"))) -(defglextfun - (("DeleteProgramsARB" delete-programs-arb) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |programs| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1294") - :glsopcode ("0x0228") :offset ("580"))) -(defglextfun - (("BindProgramARB" bind-program-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |program| :type |UInt32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4180") :glsopcode ("0x0227") :offset - ("579"))) -(defglextfun - (("ProgramStringARB" program-string-arb) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |format| :type |ProgramFormatARB| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |string| :type |Void| :direction :in :array t :size len)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("667"))) -(defglextfun - (("DisableVertexAttribArrayARB" disable-vertex-attrib-array-arb) :args - ((:name |index| :type |UInt32| :direction :in)) :return ("void") :dlflags - ("notlistable") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("DisableVertexAttribArray") :glsalias - ("DisableVertexAttribArray"))) -(defglextfun - (("EnableVertexAttribArrayARB" enable-vertex-attrib-array-arb) :args - ((:name |index| :type |UInt32| :direction :in)) :return ("void") :dlflags - ("notlistable") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("EnableVertexAttribArray") :glsalias - ("EnableVertexAttribArray"))) -(defglextfun - (("VertexAttribPointerARB" vertex-attrib-pointer-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexAttribPointerTypeARB| :direction :in) - (:name |normalized| :type |Boolean| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :dlflags ("notlistable") :category ("ARB_vertex_program") - :version ("1.3") :extension ("soft" "WINSOFT" "NV10") :alias - ("VertexAttribPointer") :glsalias ("VertexAttribPointer"))) -(defglextfun - (("VertexAttrib4usvARB" vertex-attrib-4usv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt16| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4usv") :glsalias - ("VertexAttrib4usv"))) -(defglextfun - (("VertexAttrib4uivARB" vertex-attrib-4uiv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4uiv") :glsalias - ("VertexAttrib4uiv"))) -(defglextfun - (("VertexAttrib4ubvARB" vertex-attrib-4ubv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt8| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4ubv") :glsalias - ("VertexAttrib4ubv"))) -(defglextfun - (("VertexAttrib4svARB" vertex-attrib-4sv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4192") :glsopcode ("0x0247") :alias - ("VertexAttrib4sv") :glsalias ("VertexAttrib4sv"))) -(defglextfun - (("VertexAttrib4sARB" vertex-attrib-4s-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in) - (:name |w| :type |Int16| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib4svARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib4s") :glsalias ("VertexAttrib4s"))) -(defglextfun - (("VertexAttrib4ivARB" vertex-attrib-4iv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4iv") :glsalias - ("VertexAttrib4iv"))) -(defglextfun - (("VertexAttrib4fvARB" vertex-attrib-4fv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4196") :glsopcode ("0x0248") :alias - ("VertexAttrib4fv") :glsalias ("VertexAttrib4fv"))) -(defglextfun - (("VertexAttrib4fARB" vertex-attrib-4f-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib4fvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib4f") :glsalias ("VertexAttrib4f"))) -(defglextfun - (("VertexAttrib4dvARB" vertex-attrib-4dv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4200") :glsopcode ("0x0249") :alias - ("VertexAttrib4dv") :glsalias ("VertexAttrib4dv"))) -(defglextfun - (("VertexAttrib4dARB" vertex-attrib-4d-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib4dvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib4d") :glsalias ("VertexAttrib4d"))) -(defglextfun - (("VertexAttrib4bvARB" vertex-attrib-4bv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int8| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4bv") :glsalias - ("VertexAttrib4bv"))) -(defglextfun - (("VertexAttrib4NusvARB" vertex-attrib-4n-usv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt16| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4Nusv") :glsalias - ("VertexAttrib4Nusv"))) -(defglextfun - (("VertexAttrib4NuivARB" vertex-attrib-4n-uiv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4Nuiv") :glsalias - ("VertexAttrib4Nuiv"))) -(defglextfun - (("VertexAttrib4NubvARB" vertex-attrib-4n-ubv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt8| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4201") :glsopcode ("0x024A") :alias - ("VertexAttrib4Nubv") :glsalias ("VertexAttrib4Nubv"))) -(defglextfun - (("VertexAttrib4NubARB" vertex-attrib-4n-ub-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt8| :direction :in) - (:name |y| :type |UInt8| :direction :in) - (:name |z| :type |UInt8| :direction :in) - (:name |w| :type |UInt8| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4Nub") :glsalias - ("VertexAttrib4Nub"))) -(defglextfun - (("VertexAttrib4NsvARB" vertex-attrib-4n-sv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4Nsv") :glsalias - ("VertexAttrib4Nsv"))) -(defglextfun - (("VertexAttrib4NivARB" vertex-attrib-4n-iv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4Niv") :glsalias - ("VertexAttrib4Niv"))) -(defglextfun - (("VertexAttrib4NbvARB" vertex-attrib-4n-bv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int8| :direction :in :array t :size #x4)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :alias ("VertexAttrib4Nbv") :glsalias - ("VertexAttrib4Nbv"))) -(defglextfun - (("VertexAttrib3svARB" vertex-attrib-3sv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4191") :glsopcode ("0x0244") :alias - ("VertexAttrib3sv") :glsalias ("VertexAttrib3sv"))) -(defglextfun - (("VertexAttrib3sARB" vertex-attrib-3s-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib3svARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib3s") :glsalias ("VertexAttrib3s"))) -(defglextfun - (("VertexAttrib3fvARB" vertex-attrib-3fv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4195") :glsopcode ("0x0245") :alias - ("VertexAttrib3fv") :glsalias ("VertexAttrib3fv"))) -(defglextfun - (("VertexAttrib3fARB" vertex-attrib-3f-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib3fvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib3f") :glsalias ("VertexAttrib3f"))) -(defglextfun - (("VertexAttrib3dvARB" vertex-attrib-3dv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x3)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4199") :glsopcode ("0x0246") :alias - ("VertexAttrib3dv") :glsalias ("VertexAttrib3dv"))) -(defglextfun - (("VertexAttrib3dARB" vertex-attrib-3d-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib3dvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib3d") :glsalias ("VertexAttrib3d"))) -(defglextfun - (("VertexAttrib2svARB" vertex-attrib-2sv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4190") :glsopcode ("0x0241") :alias - ("VertexAttrib2sv") :glsalias ("VertexAttrib2sv"))) -(defglextfun - (("VertexAttrib2sARB" vertex-attrib-2s-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib2svARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib2s") :glsalias ("VertexAttrib2s"))) -(defglextfun - (("VertexAttrib2fvARB" vertex-attrib-2fv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4194") :glsopcode ("0x0242") :alias - ("VertexAttrib2fv") :glsalias ("VertexAttrib2fv"))) -(defglextfun - (("VertexAttrib2fARB" vertex-attrib-2f-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib2fvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib2f") :glsalias ("VertexAttrib2f"))) -(defglextfun - (("VertexAttrib2dvARB" vertex-attrib-2dv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x2)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4198") :glsopcode ("0x0243") :alias - ("VertexAttrib2dv") :glsalias ("VertexAttrib2dv"))) -(defglextfun - (("VertexAttrib2dARB" vertex-attrib-2d-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib2dvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib2d") :glsalias ("VertexAttrib2d"))) -(defglextfun - (("VertexAttrib1svARB" vertex-attrib-1sv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4189") :glsopcode ("0x023E") :alias - ("VertexAttrib1sv") :glsalias ("VertexAttrib1sv"))) -(defglextfun - (("VertexAttrib1sARB" vertex-attrib-1s-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib1svARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib1s") :glsalias ("VertexAttrib1s"))) -(defglextfun - (("VertexAttrib1fvARB" vertex-attrib-1fv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4193") :glsopcode ("0x023F") :alias - ("VertexAttrib1fv") :glsalias ("VertexAttrib1fv"))) -(defglextfun - (("VertexAttrib1fARB" vertex-attrib-1f-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib1fvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib1f") :glsalias ("VertexAttrib1f"))) -(defglextfun - (("VertexAttrib1dvARB" vertex-attrib-1dv-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x1)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4197") :glsopcode ("0x0240") :alias - ("VertexAttrib1dv") :glsalias ("VertexAttrib1dv"))) -(defglextfun - (("VertexAttrib1dARB" vertex-attrib-1d-arb) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in)) - :return ("void") :category ("ARB_vertex_program") :version ("1.3") - :vectorequiv ("VertexAttrib1dvARB") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib1d") :glsalias ("VertexAttrib1d"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_vertex_program + +(defconstant +color-sum-arb+ #x8458) +(defconstant +vertex-program-arb+ #x8620) +(defconstant +vertex-attrib-array-enabled-arb+ #x8622) +(defconstant +vertex-attrib-array-size-arb+ #x8623) +(defconstant +vertex-attrib-array-stride-arb+ #x8624) +(defconstant +vertex-attrib-array-type-arb+ #x8625) +(defconstant +current-vertex-attrib-arb+ #x8626) +(defconstant +program-length-arb+ #x8627) +(defconstant +program-string-arb+ #x8628) +(defconstant +max-program-matrix-stack-depth-arb+ #x862E) +(defconstant +max-program-matrices-arb+ #x862F) +(defconstant +current-matrix-stack-depth-arb+ #x8640) +(defconstant +current-matrix-arb+ #x8641) +(defconstant +vertex-program-point-size-arb+ #x8642) +(defconstant +vertex-program-two-side-arb+ #x8643) +(defconstant +vertex-attrib-array-pointer-arb+ #x8645) +(defconstant +program-error-position-arb+ #x864B) +(defconstant +program-binding-arb+ #x8677) +(defconstant +max-vertex-attribs-arb+ #x8869) +(defconstant +vertex-attrib-array-normalized-arb+ #x886A) +(defconstant +program-error-string-arb+ #x8874) +(defconstant +program-format-ascii-arb+ #x8875) +(defconstant +program-format-arb+ #x8876) +(defconstant +program-instructions-arb+ #x88A0) +(defconstant +max-program-instructions-arb+ #x88A1) +(defconstant +program-native-instructions-arb+ #x88A2) +(defconstant +max-program-native-instructions-arb+ #x88A3) +(defconstant +program-temporaries-arb+ #x88A4) +(defconstant +max-program-temporaries-arb+ #x88A5) +(defconstant +program-native-temporaries-arb+ #x88A6) +(defconstant +max-program-native-temporaries-arb+ #x88A7) +(defconstant +program-parameters-arb+ #x88A8) +(defconstant +max-program-parameters-arb+ #x88A9) +(defconstant +program-native-parameters-arb+ #x88AA) +(defconstant +max-program-native-parameters-arb+ #x88AB) +(defconstant +program-attribs-arb+ #x88AC) +(defconstant +max-program-attribs-arb+ #x88AD) +(defconstant +program-native-attribs-arb+ #x88AE) +(defconstant +max-program-native-attribs-arb+ #x88AF) +(defconstant +program-address-registers-arb+ #x88B0) +(defconstant +max-program-address-registers-arb+ #x88B1) +(defconstant +program-native-address-registers-arb+ #x88B2) +(defconstant +max-program-native-address-registers-arb+ #x88B3) +(defconstant +max-program-local-parameters-arb+ #x88B4) +(defconstant +max-program-env-parameters-arb+ #x88B5) +(defconstant +program-under-native-limits-arb+ #x88B6) +(defconstant +transpose-current-matrix-arb+ #x88B7) +(defconstant +matrix0-arb+ #x88C0) +(defconstant +matrix1-arb+ #x88C1) +(defconstant +matrix2-arb+ #x88C2) +(defconstant +matrix3-arb+ #x88C3) +(defconstant +matrix4-arb+ #x88C4) +(defconstant +matrix5-arb+ #x88C5) +(defconstant +matrix6-arb+ #x88C6) +(defconstant +matrix7-arb+ #x88C7) +(defconstant +matrix8-arb+ #x88C8) +(defconstant +matrix9-arb+ #x88C9) +(defconstant +matrix10-arb+ #x88CA) +(defconstant +matrix11-arb+ #x88CB) +(defconstant +matrix12-arb+ #x88CC) +(defconstant +matrix13-arb+ #x88CD) +(defconstant +matrix14-arb+ #x88CE) +(defconstant +matrix15-arb+ #x88CF) +(defconstant +matrix16-arb+ #x88D0) +(defconstant +matrix17-arb+ #x88D1) +(defconstant +matrix18-arb+ #x88D2) +(defconstant +matrix19-arb+ #x88D3) +(defconstant +matrix20-arb+ #x88D4) +(defconstant +matrix21-arb+ #x88D5) +(defconstant +matrix22-arb+ #x88D6) +(defconstant +matrix23-arb+ #x88D7) +(defconstant +matrix24-arb+ #x88D8) +(defconstant +matrix25-arb+ #x88D9) +(defconstant +matrix26-arb+ #x88DA) +(defconstant +matrix27-arb+ #x88DB) +(defconstant +matrix28-arb+ #x88DC) +(defconstant +matrix29-arb+ #x88DD) +(defconstant +matrix30-arb+ #x88DE) +(defconstant +matrix31-arb+ #x88DF) +(defglextfun "IsProgramARB" is-program-arb :return "Boolean" :args + ((:name |program| :type |UInt32| :direction :in)) :category + "ARB_vertex_program" :version "1.3") +(defglextfun "GetVertexAttribPointervARB" get-vertex-attrib-pointerv-arb + :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPointerPropertyARB| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetVertexAttribivARB" get-vertex-attrib-iv-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPropertyARB| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetVertexAttribfvARB" get-vertex-attrib-fv-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPropertyARB| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetVertexAttribdvARB" get-vertex-attrib-dv-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPropertyARB| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetProgramStringARB" get-program-string-arb :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |pname| :type |ProgramStringPropertyARB| :direction :in) + (:name |string| :type |Void| :direction :out :array t :size + (|target| |pname|))) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetProgramivARB" get-program-iv-arb :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |pname| :type |ProgramPropertyARB| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetProgramLocalParameterfvARB" get-program-local-parameter-fv-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetProgramLocalParameterdvARB" get-program-local-parameter-dv-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetProgramEnvParameterfvARB" get-program-env-parameter-fv-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GetProgramEnvParameterdvARB" get-program-env-parameter-dv-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramLocalParameter4fvARB" program-local-parameter-4fv-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramLocalParameter4fARB" program-local-parameter-4f-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramLocalParameter4dvARB" program-local-parameter-4dv-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float64| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramLocalParameter4dARB" program-local-parameter-4d-arb + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramEnvParameter4fvARB" program-env-parameter-4fv-arb :return + "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramEnvParameter4fARB" program-env-parameter-4f-arb :return + "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramEnvParameter4dvARB" program-env-parameter-4dv-arb :return + "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Float64| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramEnvParameter4dARB" program-env-parameter-4d-arb :return + "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "GenProgramsARB" gen-programs-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |programs| :type |UInt32| :direction :out :array t :size n)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "DeleteProgramsARB" delete-programs-arb :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |programs| :type |UInt32| :direction :in :array t :size n)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "BindProgramARB" bind-program-arb :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |program| :type |UInt32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "ProgramStringARB" program-string-arb :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |format| :type |ProgramFormatARB| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |string| :type |Void| :direction :in :array t :size len)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "DisableVertexAttribArrayARB" disable-vertex-attrib-array-arb + :return "void" :args ((:name |index| :type |UInt32| :direction :in)) :category + "ARB_vertex_program" :version "1.3") +(defglextfun "EnableVertexAttribArrayARB" enable-vertex-attrib-array-arb + :return "void" :args ((:name |index| :type |UInt32| :direction :in)) :category + "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttribPointerARB" vertex-attrib-pointer-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexAttribPointerTypeARB| :direction :in) + (:name |normalized| :type |Boolean| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4usvARB" vertex-attrib-4usv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt16| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4uivARB" vertex-attrib-4uiv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4ubvARB" vertex-attrib-4ubv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt8| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4svARB" vertex-attrib-4sv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4sARB" vertex-attrib-4s-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in) + (:name |w| :type |Int16| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4ivARB" vertex-attrib-4iv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4fvARB" vertex-attrib-4fv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4fARB" vertex-attrib-4f-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4dvARB" vertex-attrib-4dv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4dARB" vertex-attrib-4d-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4bvARB" vertex-attrib-4bv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int8| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NusvARB" vertex-attrib-4n-usv-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt16| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NuivARB" vertex-attrib-4n-uiv-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NubvARB" vertex-attrib-4n-ubv-arb :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt8| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NubARB" vertex-attrib-4n-ub-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt8| :direction :in) + (:name |y| :type |UInt8| :direction :in) + (:name |z| :type |UInt8| :direction :in) + (:name |w| :type |UInt8| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NsvARB" vertex-attrib-4n-sv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NivARB" vertex-attrib-4n-iv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib4NbvARB" vertex-attrib-4n-bv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int8| :direction :in :array t :size #x4)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib3svARB" vertex-attrib-3sv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x3)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib3sARB" vertex-attrib-3s-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib3fvARB" vertex-attrib-3fv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib3fARB" vertex-attrib-3f-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib3dvARB" vertex-attrib-3dv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x3)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib3dARB" vertex-attrib-3d-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib2svARB" vertex-attrib-2sv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x2)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib2sARB" vertex-attrib-2s-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib2fvARB" vertex-attrib-2fv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x2)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib2fARB" vertex-attrib-2f-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib2dvARB" vertex-attrib-2dv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x2)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib2dARB" vertex-attrib-2d-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib1svARB" vertex-attrib-1sv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x1)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib1sARB" vertex-attrib-1s-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib1fvARB" vertex-attrib-1fv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x1)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib1fARB" vertex-attrib-1f-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib1dvARB" vertex-attrib-1dv-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x1)) + :category "ARB_vertex_program" :version "1.3") +(defglextfun "VertexAttrib1dARB" vertex-attrib-1d-arb :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in)) + :category "ARB_vertex_program" :version "1.3") diff --git a/lib/opengl-arb_vertex_shader.lisp b/lib/opengl-arb_vertex_shader.lisp dissimilarity index 75% index 60e13bb..88a0e4c 100644 --- a/lib/opengl-arb_vertex_shader.lisp +++ b/lib/opengl-arb_vertex_shader.lisp @@ -1,39 +1,32 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_vertex_shader - -(defconstant +vertex-shader-arb+ #x8B31) -(defconstant +max-vertex-uniform-components-arb+ #x8B4A) -(defconstant +max-varying-floats-arb+ #x8B4B) -(defconstant +max-combined-texture-image-units-arb+ #x8B4D) -(defconstant +object-active-attributes-arb+ #x8B89) -(defconstant +object-active-attribute-max-length-arb+ #x8B8A) -(defglextfun - (("GetAttribLocationARB" get-attrib-location-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |name| :type |charARB| :direction :in :array t)) - :return ("Int32") :category ("ARB_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetAttribLocation") :glsalias ("GetAttribLocation"))) -(defglextfun - (("GetActiveAttribARB" get-active-attrib-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |maxLength| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |size| :type |Int32| :direction :out :array t :size #x1) - (:name |type| :type |GLenum| :direction :out :array t :size #x1) - (:name |name| :type |charARB| :direction :out :array t)) - :return ("void") :category ("ARB_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") :alias - ("GetActiveAttrib") :glsalias ("GetActiveAttrib"))) -(defglextfun - (("BindAttribLocationARB" bind-attrib-location-arb) :args - ((:name |programObj| :type |handleARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |name| :type |charARB| :direction :in :array t)) - :return ("void") :category ("ARB_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :alias ("BindAttribLocation") - :glsalias ("BindAttribLocation"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_vertex_shader + +(defconstant +vertex-shader-arb+ #x8B31) +(defconstant +max-vertex-uniform-components-arb+ #x8B4A) +(defconstant +max-varying-floats-arb+ #x8B4B) +(defconstant +max-combined-texture-image-units-arb+ #x8B4D) +(defconstant +object-active-attributes-arb+ #x8B89) +(defconstant +object-active-attribute-max-length-arb+ #x8B8A) +(defglextfun "GetAttribLocationARB" get-attrib-location-arb :return "Int32" + :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |name| :type |charARB| :direction :in :array t)) + :category "ARB_vertex_shader" :version "1.2") +(defglextfun "GetActiveAttribARB" get-active-attrib-arb :return "void" :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |maxLength| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |size| :type |Int32| :direction :out :array t :size #x1) + (:name |type| :type |GLenum| :direction :out :array t :size #x1) + (:name |name| :type |charARB| :direction :out :array t)) + :category "ARB_vertex_shader" :version "1.2") +(defglextfun "BindAttribLocationARB" bind-attrib-location-arb :return "void" + :args + ((:name |programObj| :type |handleARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |name| :type |charARB| :direction :in :array t)) + :category "ARB_vertex_shader" :version "1.2") diff --git a/lib/opengl-arb_window_pos.lisp b/lib/opengl-arb_window_pos.lisp dissimilarity index 96% index e72e1a2..294dc5c 100644 --- a/lib/opengl-arb_window_pos.lisp +++ b/lib/opengl-arb_window_pos.lisp @@ -1,114 +1,66 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; arb_window_pos - -(defglextfun - (("WindowPos3svARB" window-pos-3sv-arb) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos3sv") - :glsalias ("WindowPos3sv"))) -(defglextfun - (("WindowPos3sARB" window-pos-3s-arb) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos3svARB") :version ("1.0") :alias ("WindowPos3s") :glsalias - ("WindowPos3s"))) -(defglextfun - (("WindowPos3ivARB" window-pos-3iv-arb) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos3iv") - :glsalias ("WindowPos3iv"))) -(defglextfun - (("WindowPos3iARB" window-pos-3i-arb) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos3ivARB") :version ("1.0") :alias ("WindowPos3i") :glsalias - ("WindowPos3i"))) -(defglextfun - (("WindowPos3fvARB" window-pos-3fv-arb) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos3fv") - :glsalias ("WindowPos3fv"))) -(defglextfun - (("WindowPos3fARB" window-pos-3f-arb) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos3fvARB") :version ("1.0") :alias ("WindowPos3f") :glsalias - ("WindowPos3f"))) -(defglextfun - (("WindowPos3dvARB" window-pos-3dv-arb) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos3dv") - :glsalias ("WindowPos3dv"))) -(defglextfun - (("WindowPos3dARB" window-pos-3d-arb) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in)) - :return ("void") :vectorequiv ("WindowPos3dvARB") :category - ("ARB_window_pos") :version ("1.0") :alias ("WindowPos3d") :glsalias - ("WindowPos3d"))) -(defglextfun - (("WindowPos2svARB" window-pos-2sv-arb) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos2sv") - :glsalias ("WindowPos2sv"))) -(defglextfun - (("WindowPos2sARB" window-pos-2s-arb) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos2svARB") :version ("1.0") :alias ("WindowPos2s") :glsalias - ("WindowPos2s"))) -(defglextfun - (("WindowPos2ivARB" window-pos-2iv-arb) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos2iv") - :glsalias ("WindowPos2iv"))) -(defglextfun - (("WindowPos2iARB" window-pos-2i-arb) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos2ivARB") :version ("1.0") :alias ("WindowPos2i") :glsalias - ("WindowPos2i"))) -(defglextfun - (("WindowPos2fvARB" window-pos-2fv-arb) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos2fv") - :glsalias ("WindowPos2fv"))) -(defglextfun - (("WindowPos2fARB" window-pos-2f-arb) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos2fvARB") :version ("1.0") :alias ("WindowPos2f") :glsalias - ("WindowPos2f"))) -(defglextfun - (("WindowPos2dvARB" window-pos-2dv-arb) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("ARB_window_pos") :version ("1.0") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :alias ("WindowPos2dv") - :glsalias ("WindowPos2dv"))) -(defglextfun - (("WindowPos2dARB" window-pos-2d-arb) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in)) - :return ("void") :category ("ARB_window_pos") :vectorequiv - ("WindowPos2dvARB") :version ("1.0") :alias ("WindowPos2d") :glsalias - ("WindowPos2d"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; arb_window_pos + +(defglextfun "WindowPos3svARB" window-pos-3sv-arb :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3sARB" window-pos-3s-arb :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3ivARB" window-pos-3iv-arb :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3iARB" window-pos-3i-arb :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3fvARB" window-pos-3fv-arb :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3fARB" window-pos-3f-arb :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3dvARB" window-pos-3dv-arb :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos3dARB" window-pos-3d-arb :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2svARB" window-pos-2sv-arb :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2sARB" window-pos-2s-arb :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2ivARB" window-pos-2iv-arb :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2iARB" window-pos-2i-arb :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2fvARB" window-pos-2fv-arb :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2fARB" window-pos-2f-arb :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in)) + :category "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2dvARB" window-pos-2dv-arb :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :category + "ARB_window_pos" :version "1.0") +(defglextfun "WindowPos2dARB" window-pos-2d-arb :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in)) + :category "ARB_window_pos" :version "1.0") diff --git a/lib/opengl-ati_draw_buffers.lisp b/lib/opengl-ati_draw_buffers.lisp index fb99450..af54339 100644 --- a/lib/opengl-ati_draw_buffers.lisp +++ b/lib/opengl-ati_draw_buffers.lisp @@ -21,9 +21,7 @@ (defconstant +draw-buffer13-ati+ #x8832) (defconstant +draw-buffer14-ati+ #x8833) (defconstant +draw-buffer15-ati+ #x8834) -(defglextfun - (("DrawBuffersATI" draw-buffers-ati) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |bufs| :type |DrawBufferModeATI| :direction :in :array t :size n)) - :return ("void") :category ("ATI_draw_buffers") :version ("1.2") :extension - nil :glxropcode ("233") :alias ("DrawBuffers") :glsalias ("DrawBuffers"))) +(defglextfun "DrawBuffersATI" draw-buffers-ati :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |bufs| :type |DrawBufferModeATI| :direction :in :array t :size n)) + :category "ATI_draw_buffers" :version "1.2") diff --git a/lib/opengl-ati_element_array.lisp b/lib/opengl-ati_element_array.lisp dissimilarity index 79% index e0dfd35..908c284 100644 --- a/lib/opengl-ati_element_array.lisp +++ b/lib/opengl-ati_element_array.lisp @@ -1,33 +1,25 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_element_array - -(defconstant +element-array-ati+ #x8768) -(defconstant +element-array-type-ati+ #x8769) -(defconstant +element-array-pointer-ati+ #x876A) -(defglextfun - (("DrawRangeElementArrayATI" draw-range-element-array-ati) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |start| :type |UInt32| :direction :in) - (:name |end| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("ATI_element_array") :dlflags ("handcode") - :glxflags ("client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("DrawElementArrayATI" draw-element-array-ati) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("ATI_element_array") :dlflags ("handcode") - :glxflags ("client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("ElementPointerATI" element-pointer-ati) :args - ((:name |type| :type |ElementPointerTypeATI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size (|type|) - :retained t)) - :return ("void") :category ("ATI_element_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "client-intercept" "server-handcode") :version - ("1.2") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_element_array + +(defconstant +element-array-ati+ #x8768) +(defconstant +element-array-type-ati+ #x8769) +(defconstant +element-array-pointer-ati+ #x876A) +(defglextfun "DrawRangeElementArrayATI" draw-range-element-array-ati :return + "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |start| :type |UInt32| :direction :in) + (:name |end| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "ATI_element_array" :version "1.2") +(defglextfun "DrawElementArrayATI" draw-element-array-ati :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "ATI_element_array" :version "1.2") +(defglextfun "ElementPointerATI" element-pointer-ati :return "void" :args + ((:name |type| :type |ElementPointerTypeATI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type|) + :retained t)) + :category "ATI_element_array" :version "1.2") diff --git a/lib/opengl-ati_envmap_bumpmap.lisp b/lib/opengl-ati_envmap_bumpmap.lisp dissimilarity index 74% index 6747c1d..725af1b 100644 --- a/lib/opengl-ati_envmap_bumpmap.lisp +++ b/lib/opengl-ati_envmap_bumpmap.lisp @@ -1,42 +1,34 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_envmap_bumpmap - -(defconstant +bump-rot-matrix-ati+ #x8775) -(defconstant +bump-rot-matrix-size-ati+ #x8776) -(defconstant +bump-num-tex-units-ati+ #x8777) -(defconstant +bump-tex-units-ati+ #x8778) -(defconstant +dudv-ati+ #x8779) -(defconstant +du8dv8-ati+ #x877A) -(defconstant +bump-envmap-ati+ #x877B) -(defconstant +bump-target-ati+ #x877C) -(defglextfun - (("GetTexBumpParameterfvATI" get-tex-bump-parameter-fv-ati) :args - ((:name |pname| :type |GetTexBumpParameterATI| :direction :in) - (:name |param| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("ATI_envmap_bumpmap") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetTexBumpParameterivATI" get-tex-bump-parameter-iv-ati) :args - ((:name |pname| :type |GetTexBumpParameterATI| :direction :in) - (:name |param| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("ATI_envmap_bumpmap") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("TexBumpParameterfvATI" tex-bump-parameter-fv-ati) :args - ((:name |pname| :type |TexBumpParameterATI| :direction :in) - (:name |param| :type |Float32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("ATI_envmap_bumpmap") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("TexBumpParameterivATI" tex-bump-parameter-iv-ati) :args - ((:name |pname| :type |TexBumpParameterATI| :direction :in) - (:name |param| :type |Int32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("ATI_envmap_bumpmap") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_envmap_bumpmap + +(defconstant +bump-rot-matrix-ati+ #x8775) +(defconstant +bump-rot-matrix-size-ati+ #x8776) +(defconstant +bump-num-tex-units-ati+ #x8777) +(defconstant +bump-tex-units-ati+ #x8778) +(defconstant +dudv-ati+ #x8779) +(defconstant +du8dv8-ati+ #x877A) +(defconstant +bump-envmap-ati+ #x877B) +(defconstant +bump-target-ati+ #x877C) +(defglextfun "GetTexBumpParameterfvATI" get-tex-bump-parameter-fv-ati :return + "void" :args + ((:name |pname| :type |GetTexBumpParameterATI| :direction :in) + (:name |param| :type |Float32| :direction :out :array t :size (|pname|))) + :category "ATI_envmap_bumpmap" :version "1.2") +(defglextfun "GetTexBumpParameterivATI" get-tex-bump-parameter-iv-ati :return + "void" :args + ((:name |pname| :type |GetTexBumpParameterATI| :direction :in) + (:name |param| :type |Int32| :direction :out :array t :size (|pname|))) + :category "ATI_envmap_bumpmap" :version "1.2") +(defglextfun "TexBumpParameterfvATI" tex-bump-parameter-fv-ati :return "void" + :args + ((:name |pname| :type |TexBumpParameterATI| :direction :in) + (:name |param| :type |Float32| :direction :in :array t :size (|pname|))) + :category "ATI_envmap_bumpmap" :version "1.2") +(defglextfun "TexBumpParameterivATI" tex-bump-parameter-iv-ati :return "void" + :args + ((:name |pname| :type |TexBumpParameterATI| :direction :in) + (:name |param| :type |Int32| :direction :in :array t :size (|pname|))) + :category "ATI_envmap_bumpmap" :version "1.2") diff --git a/lib/opengl-ati_fragment_shader.lisp b/lib/opengl-ati_fragment_shader.lisp dissimilarity index 62% index 55619d4..5a7213e 100644 --- a/lib/opengl-ati_fragment_shader.lisp +++ b/lib/opengl-ati_fragment_shader.lisp @@ -1,244 +1,208 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_fragment_shader - -(defconstant +fragment-shader-ati+ #x8920) -(defconstant +reg-0-ati+ #x8921) -(defconstant +reg-1-ati+ #x8922) -(defconstant +reg-2-ati+ #x8923) -(defconstant +reg-3-ati+ #x8924) -(defconstant +reg-4-ati+ #x8925) -(defconstant +reg-5-ati+ #x8926) -(defconstant +reg-6-ati+ #x8927) -(defconstant +reg-7-ati+ #x8928) -(defconstant +reg-8-ati+ #x8929) -(defconstant +reg-9-ati+ #x892A) -(defconstant +reg-10-ati+ #x892B) -(defconstant +reg-11-ati+ #x892C) -(defconstant +reg-12-ati+ #x892D) -(defconstant +reg-13-ati+ #x892E) -(defconstant +reg-14-ati+ #x892F) -(defconstant +reg-15-ati+ #x8930) -(defconstant +reg-16-ati+ #x8931) -(defconstant +reg-17-ati+ #x8932) -(defconstant +reg-18-ati+ #x8933) -(defconstant +reg-19-ati+ #x8934) -(defconstant +reg-20-ati+ #x8935) -(defconstant +reg-21-ati+ #x8936) -(defconstant +reg-22-ati+ #x8937) -(defconstant +reg-23-ati+ #x8938) -(defconstant +reg-24-ati+ #x8939) -(defconstant +reg-25-ati+ #x893A) -(defconstant +reg-26-ati+ #x893B) -(defconstant +reg-27-ati+ #x893C) -(defconstant +reg-28-ati+ #x893D) -(defconstant +reg-29-ati+ #x893E) -(defconstant +reg-30-ati+ #x893F) -(defconstant +reg-31-ati+ #x8940) -(defconstant +con-0-ati+ #x8941) -(defconstant +con-1-ati+ #x8942) -(defconstant +con-2-ati+ #x8943) -(defconstant +con-3-ati+ #x8944) -(defconstant +con-4-ati+ #x8945) -(defconstant +con-5-ati+ #x8946) -(defconstant +con-6-ati+ #x8947) -(defconstant +con-7-ati+ #x8948) -(defconstant +con-8-ati+ #x8949) -(defconstant +con-9-ati+ #x894A) -(defconstant +con-10-ati+ #x894B) -(defconstant +con-11-ati+ #x894C) -(defconstant +con-12-ati+ #x894D) -(defconstant +con-13-ati+ #x894E) -(defconstant +con-14-ati+ #x894F) -(defconstant +con-15-ati+ #x8950) -(defconstant +con-16-ati+ #x8951) -(defconstant +con-17-ati+ #x8952) -(defconstant +con-18-ati+ #x8953) -(defconstant +con-19-ati+ #x8954) -(defconstant +con-20-ati+ #x8955) -(defconstant +con-21-ati+ #x8956) -(defconstant +con-22-ati+ #x8957) -(defconstant +con-23-ati+ #x8958) -(defconstant +con-24-ati+ #x8959) -(defconstant +con-25-ati+ #x895A) -(defconstant +con-26-ati+ #x895B) -(defconstant +con-27-ati+ #x895C) -(defconstant +con-28-ati+ #x895D) -(defconstant +con-29-ati+ #x895E) -(defconstant +con-30-ati+ #x895F) -(defconstant +con-31-ati+ #x8960) -(defconstant +mov-ati+ #x8961) -(defconstant +add-ati+ #x8963) -(defconstant +mul-ati+ #x8964) -(defconstant +sub-ati+ #x8965) -(defconstant +dot3-ati+ #x8966) -(defconstant +dot4-ati+ #x8967) -(defconstant +mad-ati+ #x8968) -(defconstant +lerp-ati+ #x8969) -(defconstant +cnd-ati+ #x896A) -(defconstant +cnd0-ati+ #x896B) -(defconstant +dot2-add-ati+ #x896C) -(defconstant +secondary-interpolator-ati+ #x896D) -(defconstant +num-fragment-registers-ati+ #x896E) -(defconstant +num-fragment-constants-ati+ #x896F) -(defconstant +num-passes-ati+ #x8970) -(defconstant +num-instructions-per-pass-ati+ #x8971) -(defconstant +num-instructions-total-ati+ #x8972) -(defconstant +num-input-interpolator-components-ati+ #x8973) -(defconstant +num-loopback-components-ati+ #x8974) -(defconstant +color-alpha-pairing-ati+ #x8975) -(defconstant +swizzle-str-ati+ #x8976) -(defconstant +swizzle-stq-ati+ #x8977) -(defconstant +swizzle-str-dr-ati+ #x8978) -(defconstant +swizzle-stq-dq-ati+ #x8979) -(defconstant +swizzle-strq-ati+ #x897A) -(defconstant +swizzle-strq-dq-ati+ #x897B) -(defconstant +red-bit-ati+ #x1) -(defconstant +green-bit-ati+ #x2) -(defconstant +blue-bit-ati+ #x4) -(defconstant +2x-bit-ati+ #x1) -(defconstant +4x-bit-ati+ #x2) -(defconstant +8x-bit-ati+ #x4) -(defconstant +half-bit-ati+ #x8) -(defconstant +quarter-bit-ati+ #x10) -(defconstant +eighth-bit-ati+ #x20) -(defconstant +saturate-bit-ati+ #x40) -(defconstant +2x-bit-ati+ #x1) -(defconstant +comp-bit-ati+ #x2) -(defconstant +negate-bit-ati+ #x4) -(defconstant +bias-bit-ati+ #x8) -(defglextfun - (("SetFragmentShaderConstantATI" set-fragment-shader-constant-ati) :args - ((:name |dst| :type |UInt32| :direction :in) - (:name |value| :type |ConstFloat32| :direction :in :array t :size #x4)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("AlphaFragmentOp3ATI" alpha-fragment-op-3-ati) :args - ((:name |op| :type |FragmentOpATI| :direction :in) - (:name |dst| :type |UInt32| :direction :in) - (:name |dstMod| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg1Rep| :type |UInt32| :direction :in) - (:name |arg1Mod| :type |UInt32| :direction :in) - (:name |arg2| :type |UInt32| :direction :in) - (:name |arg2Rep| :type |UInt32| :direction :in) - (:name |arg2Mod| :type |UInt32| :direction :in) - (:name |arg3| :type |UInt32| :direction :in) - (:name |arg3Rep| :type |UInt32| :direction :in) - (:name |arg3Mod| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("AlphaFragmentOp2ATI" alpha-fragment-op-2-ati) :args - ((:name |op| :type |FragmentOpATI| :direction :in) - (:name |dst| :type |UInt32| :direction :in) - (:name |dstMod| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg1Rep| :type |UInt32| :direction :in) - (:name |arg1Mod| :type |UInt32| :direction :in) - (:name |arg2| :type |UInt32| :direction :in) - (:name |arg2Rep| :type |UInt32| :direction :in) - (:name |arg2Mod| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("AlphaFragmentOp1ATI" alpha-fragment-op-1-ati) :args - ((:name |op| :type |FragmentOpATI| :direction :in) - (:name |dst| :type |UInt32| :direction :in) - (:name |dstMod| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg1Rep| :type |UInt32| :direction :in) - (:name |arg1Mod| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("ColorFragmentOp3ATI" color-fragment-op-3-ati) :args - ((:name |op| :type |FragmentOpATI| :direction :in) - (:name |dst| :type |UInt32| :direction :in) - (:name |dstMask| :type |UInt32| :direction :in) - (:name |dstMod| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg1Rep| :type |UInt32| :direction :in) - (:name |arg1Mod| :type |UInt32| :direction :in) - (:name |arg2| :type |UInt32| :direction :in) - (:name |arg2Rep| :type |UInt32| :direction :in) - (:name |arg2Mod| :type |UInt32| :direction :in) - (:name |arg3| :type |UInt32| :direction :in) - (:name |arg3Rep| :type |UInt32| :direction :in) - (:name |arg3Mod| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("ColorFragmentOp2ATI" color-fragment-op-2-ati) :args - ((:name |op| :type |FragmentOpATI| :direction :in) - (:name |dst| :type |UInt32| :direction :in) - (:name |dstMask| :type |UInt32| :direction :in) - (:name |dstMod| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg1Rep| :type |UInt32| :direction :in) - (:name |arg1Mod| :type |UInt32| :direction :in) - (:name |arg2| :type |UInt32| :direction :in) - (:name |arg2Rep| :type |UInt32| :direction :in) - (:name |arg2Mod| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("ColorFragmentOp1ATI" color-fragment-op-1-ati) :args - ((:name |op| :type |FragmentOpATI| :direction :in) - (:name |dst| :type |UInt32| :direction :in) - (:name |dstMask| :type |UInt32| :direction :in) - (:name |dstMod| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg1Rep| :type |UInt32| :direction :in) - (:name |arg1Mod| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("SampleMapATI" sample-map-ati) :args - ((:name |dst| :type |UInt32| :direction :in) - (:name |interp| :type |UInt32| :direction :in) - (:name |swizzle| :type |SwizzleOpATI| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("PassTexCoordATI" pass-tex-coord-ati) :args - ((:name |dst| :type |UInt32| :direction :in) - (:name |coord| :type |UInt32| :direction :in) - (:name |swizzle| :type |SwizzleOpATI| :direction :in)) - :return ("void") :category ("ATI_fragment_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("EndFragmentShaderATI" end-fragment-shader-ati) :args nil :return ("void") - :category ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("BeginFragmentShaderATI" begin-fragment-shader-ati) :args nil :return - ("void") :category ("ATI_fragment_shader") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("DeleteFragmentShaderATI" delete-fragment-shader-ati) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("BindFragmentShaderATI" bind-fragment-shader-ati) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("GenFragmentShadersATI" gen-fragment-shaders-ati) :args - ((:name |range| :type |UInt32| :direction :in)) :return ("UInt32") :category - ("ATI_fragment_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_fragment_shader + +(defconstant +fragment-shader-ati+ #x8920) +(defconstant +reg-0-ati+ #x8921) +(defconstant +reg-1-ati+ #x8922) +(defconstant +reg-2-ati+ #x8923) +(defconstant +reg-3-ati+ #x8924) +(defconstant +reg-4-ati+ #x8925) +(defconstant +reg-5-ati+ #x8926) +(defconstant +reg-6-ati+ #x8927) +(defconstant +reg-7-ati+ #x8928) +(defconstant +reg-8-ati+ #x8929) +(defconstant +reg-9-ati+ #x892A) +(defconstant +reg-10-ati+ #x892B) +(defconstant +reg-11-ati+ #x892C) +(defconstant +reg-12-ati+ #x892D) +(defconstant +reg-13-ati+ #x892E) +(defconstant +reg-14-ati+ #x892F) +(defconstant +reg-15-ati+ #x8930) +(defconstant +reg-16-ati+ #x8931) +(defconstant +reg-17-ati+ #x8932) +(defconstant +reg-18-ati+ #x8933) +(defconstant +reg-19-ati+ #x8934) +(defconstant +reg-20-ati+ #x8935) +(defconstant +reg-21-ati+ #x8936) +(defconstant +reg-22-ati+ #x8937) +(defconstant +reg-23-ati+ #x8938) +(defconstant +reg-24-ati+ #x8939) +(defconstant +reg-25-ati+ #x893A) +(defconstant +reg-26-ati+ #x893B) +(defconstant +reg-27-ati+ #x893C) +(defconstant +reg-28-ati+ #x893D) +(defconstant +reg-29-ati+ #x893E) +(defconstant +reg-30-ati+ #x893F) +(defconstant +reg-31-ati+ #x8940) +(defconstant +con-0-ati+ #x8941) +(defconstant +con-1-ati+ #x8942) +(defconstant +con-2-ati+ #x8943) +(defconstant +con-3-ati+ #x8944) +(defconstant +con-4-ati+ #x8945) +(defconstant +con-5-ati+ #x8946) +(defconstant +con-6-ati+ #x8947) +(defconstant +con-7-ati+ #x8948) +(defconstant +con-8-ati+ #x8949) +(defconstant +con-9-ati+ #x894A) +(defconstant +con-10-ati+ #x894B) +(defconstant +con-11-ati+ #x894C) +(defconstant +con-12-ati+ #x894D) +(defconstant +con-13-ati+ #x894E) +(defconstant +con-14-ati+ #x894F) +(defconstant +con-15-ati+ #x8950) +(defconstant +con-16-ati+ #x8951) +(defconstant +con-17-ati+ #x8952) +(defconstant +con-18-ati+ #x8953) +(defconstant +con-19-ati+ #x8954) +(defconstant +con-20-ati+ #x8955) +(defconstant +con-21-ati+ #x8956) +(defconstant +con-22-ati+ #x8957) +(defconstant +con-23-ati+ #x8958) +(defconstant +con-24-ati+ #x8959) +(defconstant +con-25-ati+ #x895A) +(defconstant +con-26-ati+ #x895B) +(defconstant +con-27-ati+ #x895C) +(defconstant +con-28-ati+ #x895D) +(defconstant +con-29-ati+ #x895E) +(defconstant +con-30-ati+ #x895F) +(defconstant +con-31-ati+ #x8960) +(defconstant +mov-ati+ #x8961) +(defconstant +add-ati+ #x8963) +(defconstant +mul-ati+ #x8964) +(defconstant +sub-ati+ #x8965) +(defconstant +dot3-ati+ #x8966) +(defconstant +dot4-ati+ #x8967) +(defconstant +mad-ati+ #x8968) +(defconstant +lerp-ati+ #x8969) +(defconstant +cnd-ati+ #x896A) +(defconstant +cnd0-ati+ #x896B) +(defconstant +dot2-add-ati+ #x896C) +(defconstant +secondary-interpolator-ati+ #x896D) +(defconstant +num-fragment-registers-ati+ #x896E) +(defconstant +num-fragment-constants-ati+ #x896F) +(defconstant +num-passes-ati+ #x8970) +(defconstant +num-instructions-per-pass-ati+ #x8971) +(defconstant +num-instructions-total-ati+ #x8972) +(defconstant +num-input-interpolator-components-ati+ #x8973) +(defconstant +num-loopback-components-ati+ #x8974) +(defconstant +color-alpha-pairing-ati+ #x8975) +(defconstant +swizzle-str-ati+ #x8976) +(defconstant +swizzle-stq-ati+ #x8977) +(defconstant +swizzle-str-dr-ati+ #x8978) +(defconstant +swizzle-stq-dq-ati+ #x8979) +(defconstant +swizzle-strq-ati+ #x897A) +(defconstant +swizzle-strq-dq-ati+ #x897B) +(defconstant +red-bit-ati+ #x1) +(defconstant +green-bit-ati+ #x2) +(defconstant +blue-bit-ati+ #x4) +(defconstant +2x-bit-ati+ #x1) +(defconstant +4x-bit-ati+ #x2) +(defconstant +8x-bit-ati+ #x4) +(defconstant +half-bit-ati+ #x8) +(defconstant +quarter-bit-ati+ #x10) +(defconstant +eighth-bit-ati+ #x20) +(defconstant +saturate-bit-ati+ #x40) +(defconstant +2x-bit-ati+ #x1) +(defconstant +comp-bit-ati+ #x2) +(defconstant +negate-bit-ati+ #x4) +(defconstant +bias-bit-ati+ #x8) +(defglextfun "SetFragmentShaderConstantATI" set-fragment-shader-constant-ati + :return "void" :args + ((:name |dst| :type |UInt32| :direction :in) + (:name |value| :type |ConstFloat32| :direction :in :array t :size #x4)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "AlphaFragmentOp3ATI" alpha-fragment-op-3-ati :return "void" :args + ((:name |op| :type |FragmentOpATI| :direction :in) + (:name |dst| :type |UInt32| :direction :in) + (:name |dstMod| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg1Rep| :type |UInt32| :direction :in) + (:name |arg1Mod| :type |UInt32| :direction :in) + (:name |arg2| :type |UInt32| :direction :in) + (:name |arg2Rep| :type |UInt32| :direction :in) + (:name |arg2Mod| :type |UInt32| :direction :in) + (:name |arg3| :type |UInt32| :direction :in) + (:name |arg3Rep| :type |UInt32| :direction :in) + (:name |arg3Mod| :type |UInt32| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "AlphaFragmentOp2ATI" alpha-fragment-op-2-ati :return "void" :args + ((:name |op| :type |FragmentOpATI| :direction :in) + (:name |dst| :type |UInt32| :direction :in) + (:name |dstMod| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg1Rep| :type |UInt32| :direction :in) + (:name |arg1Mod| :type |UInt32| :direction :in) + (:name |arg2| :type |UInt32| :direction :in) + (:name |arg2Rep| :type |UInt32| :direction :in) + (:name |arg2Mod| :type |UInt32| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "AlphaFragmentOp1ATI" alpha-fragment-op-1-ati :return "void" :args + ((:name |op| :type |FragmentOpATI| :direction :in) + (:name |dst| :type |UInt32| :direction :in) + (:name |dstMod| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg1Rep| :type |UInt32| :direction :in) + (:name |arg1Mod| :type |UInt32| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "ColorFragmentOp3ATI" color-fragment-op-3-ati :return "void" :args + ((:name |op| :type |FragmentOpATI| :direction :in) + (:name |dst| :type |UInt32| :direction :in) + (:name |dstMask| :type |UInt32| :direction :in) + (:name |dstMod| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg1Rep| :type |UInt32| :direction :in) + (:name |arg1Mod| :type |UInt32| :direction :in) + (:name |arg2| :type |UInt32| :direction :in) + (:name |arg2Rep| :type |UInt32| :direction :in) + (:name |arg2Mod| :type |UInt32| :direction :in) + (:name |arg3| :type |UInt32| :direction :in) + (:name |arg3Rep| :type |UInt32| :direction :in) + (:name |arg3Mod| :type |UInt32| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "ColorFragmentOp2ATI" color-fragment-op-2-ati :return "void" :args + ((:name |op| :type |FragmentOpATI| :direction :in) + (:name |dst| :type |UInt32| :direction :in) + (:name |dstMask| :type |UInt32| :direction :in) + (:name |dstMod| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg1Rep| :type |UInt32| :direction :in) + (:name |arg1Mod| :type |UInt32| :direction :in) + (:name |arg2| :type |UInt32| :direction :in) + (:name |arg2Rep| :type |UInt32| :direction :in) + (:name |arg2Mod| :type |UInt32| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "ColorFragmentOp1ATI" color-fragment-op-1-ati :return "void" :args + ((:name |op| :type |FragmentOpATI| :direction :in) + (:name |dst| :type |UInt32| :direction :in) + (:name |dstMask| :type |UInt32| :direction :in) + (:name |dstMod| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg1Rep| :type |UInt32| :direction :in) + (:name |arg1Mod| :type |UInt32| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "SampleMapATI" sample-map-ati :return "void" :args + ((:name |dst| :type |UInt32| :direction :in) + (:name |interp| :type |UInt32| :direction :in) + (:name |swizzle| :type |SwizzleOpATI| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "PassTexCoordATI" pass-tex-coord-ati :return "void" :args + ((:name |dst| :type |UInt32| :direction :in) + (:name |coord| :type |UInt32| :direction :in) + (:name |swizzle| :type |SwizzleOpATI| :direction :in)) + :category "ATI_fragment_shader" :version "1.2") +(defglextfun "EndFragmentShaderATI" end-fragment-shader-ati :return "void" + :args nil :category "ATI_fragment_shader" :version "1.2") +(defglextfun "BeginFragmentShaderATI" begin-fragment-shader-ati :return "void" + :args nil :category "ATI_fragment_shader" :version "1.2") +(defglextfun "DeleteFragmentShaderATI" delete-fragment-shader-ati :return + "void" :args ((:name |id| :type |UInt32| :direction :in)) :category + "ATI_fragment_shader" :version "1.2") +(defglextfun "BindFragmentShaderATI" bind-fragment-shader-ati :return "void" + :args ((:name |id| :type |UInt32| :direction :in)) :category + "ATI_fragment_shader" :version "1.2") +(defglextfun "GenFragmentShadersATI" gen-fragment-shaders-ati :return "UInt32" + :args ((:name |range| :type |UInt32| :direction :in)) :category + "ATI_fragment_shader" :version "1.2") diff --git a/lib/opengl-ati_map_object_buffer.lisp b/lib/opengl-ati_map_object_buffer.lisp dissimilarity index 76% index ad4c523..417cf4e 100644 --- a/lib/opengl-ati_map_object_buffer.lisp +++ b/lib/opengl-ati_map_object_buffer.lisp @@ -1,16 +1,12 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_map_object_buffer - -(defglextfun - (("UnmapObjectBufferATI" unmap-object-buffer-ati) :args - ((:name |buffer| :type |UInt32| :direction :in)) :return ("void") :category - ("ATI_map_object_buffer") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MapObjectBufferATI" map-object-buffer-ati) :args - ((:name |buffer| :type |UInt32| :direction :in)) :return ("VoidPointer") - :category ("ATI_map_object_buffer") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_map_object_buffer + +(defglextfun "UnmapObjectBufferATI" unmap-object-buffer-ati :return "void" + :args ((:name |buffer| :type |UInt32| :direction :in)) :category + "ATI_map_object_buffer" :version "1.2") +(defglextfun "MapObjectBufferATI" map-object-buffer-ati :return "VoidPointer" + :args ((:name |buffer| :type |UInt32| :direction :in)) :category + "ATI_map_object_buffer" :version "1.2") diff --git a/lib/opengl-ati_pn_triangles.lisp b/lib/opengl-ati_pn_triangles.lisp index 20c1bc8..da55a33 100644 --- a/lib/opengl-ati_pn_triangles.lisp +++ b/lib/opengl-ati_pn_triangles.lisp @@ -13,17 +13,11 @@ (defconstant +pn-triangles-point-mode-cubic-ati+ #x87F6) (defconstant +pn-triangles-normal-mode-linear-ati+ #x87F7) (defconstant +pn-triangles-normal-mode-quadratic-ati+ #x87F8) -(defglextfun - (("PNTrianglesfATI" pntriangles-f-ati) :args - ((:name |pname| :type |PNTrianglesPNameATI| :direction :in) - (:name |param| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_pn_triangles") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("PNTrianglesiATI" pntriangles-i-ati) :args - ((:name |pname| :type |PNTrianglesPNameATI| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_pn_triangles") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) +(defglextfun "PNTrianglesfATI" pntriangles-f-ati :return "void" :args + ((:name |pname| :type |PNTrianglesPNameATI| :direction :in) + (:name |param| :type |Float32| :direction :in)) + :category "ATI_pn_triangles" :version "1.2") +(defglextfun "PNTrianglesiATI" pntriangles-i-ati :return "void" :args + ((:name |pname| :type |PNTrianglesPNameATI| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "ATI_pn_triangles" :version "1.2") diff --git a/lib/opengl-ati_separate_stencil.lisp b/lib/opengl-ati_separate_stencil.lisp dissimilarity index 72% index a2f7047..d9ca4d9 100644 --- a/lib/opengl-ati_separate_stencil.lisp +++ b/lib/opengl-ati_separate_stencil.lisp @@ -1,28 +1,24 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_separate_stencil - -(defconstant +stencil-back-func-ati+ #x8800) -(defconstant +stencil-back-fail-ati+ #x8801) -(defconstant +stencil-back-pass-depth-fail-ati+ #x8802) -(defconstant +stencil-back-pass-depth-pass-ati+ #x8803) -(defglextfun - (("StencilFuncSeparateATI" stencil-func-separate-ati) :args - ((:name |frontfunc| :type |StencilFunction| :direction :in) - (:name |backfunc| :type |StencilFunction| :direction :in) - (:name |ref| :type |ClampedStencilValue| :direction :in) - (:name |mask| :type |MaskedStencilValue| :direction :in)) - :return ("void") :category ("ATI_separate_stencil") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :alias - ("StencilFuncSeparate") :glsalias ("StencilFuncSeparate"))) -(defglextfun - (("StencilOpSeparateATI" stencil-op-separate-ati) :args - ((:name |face| :type |StencilFaceDirection| :direction :in) - (:name |sfail| :type |StencilOp| :direction :in) - (:name |dpfail| :type |StencilOp| :direction :in) - (:name |dppass| :type |StencilOp| :direction :in)) - :return ("void") :category ("ATI_separate_stencil") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :alias - ("StencilOpSeparate") :glsalias ("StencilOpSeparate"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_separate_stencil + +(defconstant +stencil-back-func-ati+ #x8800) +(defconstant +stencil-back-fail-ati+ #x8801) +(defconstant +stencil-back-pass-depth-fail-ati+ #x8802) +(defconstant +stencil-back-pass-depth-pass-ati+ #x8803) +(defglextfun "StencilFuncSeparateATI" stencil-func-separate-ati :return "void" + :args + ((:name |frontfunc| :type |StencilFunction| :direction :in) + (:name |backfunc| :type |StencilFunction| :direction :in) + (:name |ref| :type |ClampedStencilValue| :direction :in) + (:name |mask| :type |MaskedStencilValue| :direction :in)) + :category "ATI_separate_stencil" :version "1.2") +(defglextfun "StencilOpSeparateATI" stencil-op-separate-ati :return "void" + :args + ((:name |face| :type |StencilFaceDirection| :direction :in) + (:name |sfail| :type |StencilOp| :direction :in) + (:name |dpfail| :type |StencilOp| :direction :in) + (:name |dppass| :type |StencilOp| :direction :in)) + :category "ATI_separate_stencil" :version "1.2") diff --git a/lib/opengl-ati_vertex_array_object.lisp b/lib/opengl-ati_vertex_array_object.lisp dissimilarity index 90% index 47dd84a..7e11a1a 100644 --- a/lib/opengl-ati_vertex_array_object.lisp +++ b/lib/opengl-ati_vertex_array_object.lisp @@ -1,112 +1,83 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_vertex_array_object - -(defconstant +static-ati+ #x8760) -(defconstant +dynamic-ati+ #x8761) -(defconstant +preserve-ati+ #x8762) -(defconstant +discard-ati+ #x8763) -(defconstant +object-buffer-size-ati+ #x8764) -(defconstant +object-buffer-usage-ati+ #x8765) -(defconstant +array-object-buffer-ati+ #x8766) -(defconstant +array-object-offset-ati+ #x8767) -(defglextfun - (("GetVariantArrayObjectivATI" get-variant-array-object-iv-ati) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("ATI_vertex_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetVariantArrayObjectfvATI" get-variant-array-object-fv-ati) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x1)) - :return ("void") :category ("ATI_vertex_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("VariantArrayObjectATI" variant-array-object-ati) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |type| :type |ScalarType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |offset| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_vertex_array_object") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GetArrayObjectivATI" get-array-object-iv-ati) :args - ((:name |array| :type |EnableCap| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("ATI_vertex_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetArrayObjectfvATI" get-array-object-fv-ati) :args - ((:name |array| :type |EnableCap| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x1)) - :return ("void") :category ("ATI_vertex_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("ArrayObjectATI" array-object-ati) :args - ((:name |array| :type |EnableCap| :direction :in) - (:name |size| :type |Int32| :direction :in) - (:name |type| :type |ScalarType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |offset| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_vertex_array_object") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("FreeObjectBufferATI" free-object-buffer-ati) :args - ((:name |buffer| :type |UInt32| :direction :in)) :return ("void") :category - ("ATI_vertex_array_object") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("GetObjectBufferivATI" get-object-buffer-iv-ati) :args - ((:name |buffer| :type |UInt32| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("ATI_vertex_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetObjectBufferfvATI" get-object-buffer-fv-ati) :args - ((:name |buffer| :type |UInt32| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x1)) - :return ("void") :category ("ATI_vertex_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("UpdateObjectBufferATI" update-object-buffer-ati) :args - ((:name |buffer| :type |UInt32| :direction :in) - (:name |offset| :type |UInt32| :direction :in) - (:name |size| :type |SizeI| :direction :in) - (:name |pointer| :type |ConstVoid| :direction :in :array t :size size) - (:name |preserve| :type |PreserveModeATI| :direction :in)) - :return ("void") :category ("ATI_vertex_array_object") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("IsObjectBufferATI" is-object-buffer-ati) :args - ((:name |buffer| :type |UInt32| :direction :in)) :return ("Boolean") - :category ("ATI_vertex_array_object") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore" "get") :offset - ("?"))) -(defglextfun - (("NewObjectBufferATI" new-object-buffer-ati) :args - ((:name |size| :type |SizeI| :direction :in) - (:name |pointer| :type |ConstVoid| :direction :in :array t :size size) - (:name |usage| :type |ArrayObjectUsageATI| :direction :in)) - :return ("UInt32") :category ("ATI_vertex_array_object") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_vertex_array_object + +(defconstant +static-ati+ #x8760) +(defconstant +dynamic-ati+ #x8761) +(defconstant +preserve-ati+ #x8762) +(defconstant +discard-ati+ #x8763) +(defconstant +object-buffer-size-ati+ #x8764) +(defconstant +object-buffer-usage-ati+ #x8765) +(defconstant +array-object-buffer-ati+ #x8766) +(defconstant +array-object-offset-ati+ #x8767) +(defglextfun "GetVariantArrayObjectivATI" get-variant-array-object-iv-ati + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "GetVariantArrayObjectfvATI" get-variant-array-object-fv-ati + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x1)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "VariantArrayObjectATI" variant-array-object-ati :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |type| :type |ScalarType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |offset| :type |UInt32| :direction :in)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "GetArrayObjectivATI" get-array-object-iv-ati :return "void" :args + ((:name |array| :type |EnableCap| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "GetArrayObjectfvATI" get-array-object-fv-ati :return "void" :args + ((:name |array| :type |EnableCap| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x1)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "ArrayObjectATI" array-object-ati :return "void" :args + ((:name |array| :type |EnableCap| :direction :in) + (:name |size| :type |Int32| :direction :in) + (:name |type| :type |ScalarType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |offset| :type |UInt32| :direction :in)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "FreeObjectBufferATI" free-object-buffer-ati :return "void" :args + ((:name |buffer| :type |UInt32| :direction :in)) :category + "ATI_vertex_array_object" :version "1.2") +(defglextfun "GetObjectBufferivATI" get-object-buffer-iv-ati :return "void" + :args + ((:name |buffer| :type |UInt32| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "GetObjectBufferfvATI" get-object-buffer-fv-ati :return "void" + :args + ((:name |buffer| :type |UInt32| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x1)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "UpdateObjectBufferATI" update-object-buffer-ati :return "void" + :args + ((:name |buffer| :type |UInt32| :direction :in) + (:name |offset| :type |UInt32| :direction :in) + (:name |size| :type |SizeI| :direction :in) + (:name |pointer| :type |ConstVoid| :direction :in :array t :size size) + (:name |preserve| :type |PreserveModeATI| :direction :in)) + :category "ATI_vertex_array_object" :version "1.2") +(defglextfun "IsObjectBufferATI" is-object-buffer-ati :return "Boolean" :args + ((:name |buffer| :type |UInt32| :direction :in)) :category + "ATI_vertex_array_object" :version "1.2") +(defglextfun "NewObjectBufferATI" new-object-buffer-ati :return "UInt32" :args + ((:name |size| :type |SizeI| :direction :in) + (:name |pointer| :type |ConstVoid| :direction :in :array t :size size) + (:name |usage| :type |ArrayObjectUsageATI| :direction :in)) + :category "ATI_vertex_array_object" :version "1.2") diff --git a/lib/opengl-ati_vertex_attrib_array_object.lisp b/lib/opengl-ati_vertex_attrib_array_object.lisp dissimilarity index 89% index f72e57b..f7deef7 100644 --- a/lib/opengl-ati_vertex_attrib_array_object.lisp +++ b/lib/opengl-ati_vertex_attrib_array_object.lisp @@ -1,36 +1,28 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_vertex_attrib_array_object - -(defglextfun - (("GetVertexAttribArrayObjectivATI" get-vertex-attrib-array-object-iv-ati) - :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("ATI_vertex_attrib_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GetVertexAttribArrayObjectfvATI" get-vertex-attrib-array-object-fv-ati) - :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |ArrayObjectPNameATI| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size pname)) - :return ("void") :category ("ATI_vertex_attrib_array_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxsingle ("?") :glxflags - ("ignore") :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttribArrayObjectATI" vertex-attrib-array-object-ati) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexAttribPointerTypeARB| :direction :in) - (:name |normalized| :type |Boolean| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |offset| :type |UInt32| :direction :in)) - :return ("void") :category ("ATI_vertex_attrib_array_object") :version - ("1.2") :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode - ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_vertex_attrib_array_object + +(defglextfun "GetVertexAttribArrayObjectivATI" + get-vertex-attrib-array-object-iv-ati :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "ATI_vertex_attrib_array_object" :version "1.2") +(defglextfun "GetVertexAttribArrayObjectfvATI" + get-vertex-attrib-array-object-fv-ati :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |ArrayObjectPNameATI| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size pname)) + :category "ATI_vertex_attrib_array_object" :version "1.2") +(defglextfun "VertexAttribArrayObjectATI" vertex-attrib-array-object-ati + :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexAttribPointerTypeARB| :direction :in) + (:name |normalized| :type |Boolean| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |offset| :type |UInt32| :direction :in)) + :category "ATI_vertex_attrib_array_object" :version "1.2") diff --git a/lib/opengl-ati_vertex_streams.lisp b/lib/opengl-ati_vertex_streams.lisp dissimilarity index 96% index cbcc004..a3396d0 100644 --- a/lib/opengl-ati_vertex_streams.lisp +++ b/lib/opengl-ati_vertex_streams.lisp @@ -1,363 +1,229 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ati_vertex_streams - -(defconstant +max-vertex-streams-ati+ #x876B) -(defconstant +vertex-stream0-ati+ #x876C) -(defconstant +vertex-stream1-ati+ #x876D) -(defconstant +vertex-stream2-ati+ #x876E) -(defconstant +vertex-stream3-ati+ #x876F) -(defconstant +vertex-stream4-ati+ #x8770) -(defconstant +vertex-stream5-ati+ #x8771) -(defconstant +vertex-stream6-ati+ #x8772) -(defconstant +vertex-stream7-ati+ #x8773) -(defconstant +vertex-source-ati+ #x8774) -(defglextfun - (("VertexBlendEnvfATI" vertex-blend-env-f-ati) :args - ((:name |pname| :type |VertexStreamATI| :direction :in) - (:name |param| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexBlendEnviATI" vertex-blend-env-i-ati) :args - ((:name |pname| :type |VertexStreamATI| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("ClientActiveVertexStreamATI" client-active-vertex-stream-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in)) :return ("void") - :category ("ATI_vertex_streams") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("NormalStream3dvATI" normal-stream-3dv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float64| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3dATI" normal-stream-3d-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |nx| :type |Float64| :direction :in) - (:name |ny| :type |Float64| :direction :in) - (:name |nz| :type |Float64| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3fvATI" normal-stream-3fv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3fATI" normal-stream-3f-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3ivATI" normal-stream-3iv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int32| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3iATI" normal-stream-3i-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |nx| :type |Int32| :direction :in) - (:name |ny| :type |Int32| :direction :in) - (:name |nz| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3svATI" normal-stream-3sv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int16| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3sATI" normal-stream-3s-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |nx| :type |Int16| :direction :in) - (:name |ny| :type |Int16| :direction :in) - (:name |nz| :type |Int16| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3bvATI" normal-stream-3bv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int8| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("NormalStream3bATI" normal-stream-3b-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |nx| :type |Int8| :direction :in) - (:name |ny| :type |Int8| :direction :in) - (:name |nz| :type |Int8| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4dvATI" vertex-stream-4dv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4dATI" vertex-stream-4d-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4fvATI" vertex-stream-4fv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4fATI" vertex-stream-4f-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4ivATI" vertex-stream-4iv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4iATI" vertex-stream-4i-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in) - (:name |z| :type |Int32| :direction :in) - (:name |w| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4svATI" vertex-stream-4sv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream4sATI" vertex-stream-4s-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in) - (:name |w| :type |Int16| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3dvATI" vertex-stream-3dv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float64| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3dATI" vertex-stream-3d-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3fvATI" vertex-stream-3fv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3fATI" vertex-stream-3f-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3ivATI" vertex-stream-3iv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int32| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3iATI" vertex-stream-3i-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in) - (:name |z| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3svATI" vertex-stream-3sv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int16| :direction :in :array t :size #x3)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream3sATI" vertex-stream-3s-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2dvATI" vertex-stream-2dv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float64| :direction :in :array t :size #x2)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2dATI" vertex-stream-2d-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2fvATI" vertex-stream-2fv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float32| :direction :in :array t :size #x2)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2fATI" vertex-stream-2f-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2ivATI" vertex-stream-2iv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int32| :direction :in :array t :size #x2)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2iATI" vertex-stream-2i-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2svATI" vertex-stream-2sv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int16| :direction :in :array t :size #x2)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream2sATI" vertex-stream-2s-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1dvATI" vertex-stream-1dv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float64| :direction :in :array t :size #x1)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1dATI" vertex-stream-1d-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float64| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1fvATI" vertex-stream-1fv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Float32| :direction :in :array t :size #x1)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1fATI" vertex-stream-1f-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Float32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1ivATI" vertex-stream-1iv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int32| :direction :in :array t :size #x1)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1iATI" vertex-stream-1i-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int32| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1svATI" vertex-stream-1sv-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |coords| :type |Int16| :direction :in :array t :size #x1)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VertexStream1sATI" vertex-stream-1s-ati) :args - ((:name |stream| :type |VertexStreamATI| :direction :in) - (:name |x| :type |Int16| :direction :in)) - :return ("void") :category ("ATI_vertex_streams") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ati_vertex_streams + +(defconstant +max-vertex-streams-ati+ #x876B) +(defconstant +vertex-stream0-ati+ #x876C) +(defconstant +vertex-stream1-ati+ #x876D) +(defconstant +vertex-stream2-ati+ #x876E) +(defconstant +vertex-stream3-ati+ #x876F) +(defconstant +vertex-stream4-ati+ #x8770) +(defconstant +vertex-stream5-ati+ #x8771) +(defconstant +vertex-stream6-ati+ #x8772) +(defconstant +vertex-stream7-ati+ #x8773) +(defconstant +vertex-source-ati+ #x8774) +(defglextfun "VertexBlendEnvfATI" vertex-blend-env-f-ati :return "void" :args + ((:name |pname| :type |VertexStreamATI| :direction :in) + (:name |param| :type |Float32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexBlendEnviATI" vertex-blend-env-i-ati :return "void" :args + ((:name |pname| :type |VertexStreamATI| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "ClientActiveVertexStreamATI" client-active-vertex-stream-ati + :return "void" :args ((:name |stream| :type |VertexStreamATI| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3dvATI" normal-stream-3dv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float64| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3dATI" normal-stream-3d-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |nx| :type |Float64| :direction :in) + (:name |ny| :type |Float64| :direction :in) + (:name |nz| :type |Float64| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3fvATI" normal-stream-3fv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float32| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3fATI" normal-stream-3f-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3ivATI" normal-stream-3iv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int32| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3iATI" normal-stream-3i-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |nx| :type |Int32| :direction :in) + (:name |ny| :type |Int32| :direction :in) + (:name |nz| :type |Int32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3svATI" normal-stream-3sv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int16| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3sATI" normal-stream-3s-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |nx| :type |Int16| :direction :in) + (:name |ny| :type |Int16| :direction :in) + (:name |nz| :type |Int16| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3bvATI" normal-stream-3bv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int8| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "NormalStream3bATI" normal-stream-3b-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |nx| :type |Int8| :direction :in) + (:name |ny| :type |Int8| :direction :in) + (:name |nz| :type |Int8| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4dvATI" vertex-stream-4dv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float64| :direction :in :array t :size #x4)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4dATI" vertex-stream-4d-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4fvATI" vertex-stream-4fv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float32| :direction :in :array t :size #x4)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4fATI" vertex-stream-4f-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4ivATI" vertex-stream-4iv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int32| :direction :in :array t :size #x4)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4iATI" vertex-stream-4i-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in) + (:name |z| :type |Int32| :direction :in) + (:name |w| :type |Int32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4svATI" vertex-stream-4sv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int16| :direction :in :array t :size #x4)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream4sATI" vertex-stream-4s-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in) + (:name |w| :type |Int16| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3dvATI" vertex-stream-3dv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float64| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3dATI" vertex-stream-3d-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3fvATI" vertex-stream-3fv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float32| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3fATI" vertex-stream-3f-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3ivATI" vertex-stream-3iv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int32| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3iATI" vertex-stream-3i-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in) + (:name |z| :type |Int32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3svATI" vertex-stream-3sv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int16| :direction :in :array t :size #x3)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream3sATI" vertex-stream-3s-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2dvATI" vertex-stream-2dv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float64| :direction :in :array t :size #x2)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2dATI" vertex-stream-2d-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2fvATI" vertex-stream-2fv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float32| :direction :in :array t :size #x2)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2fATI" vertex-stream-2f-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2ivATI" vertex-stream-2iv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int32| :direction :in :array t :size #x2)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2iATI" vertex-stream-2i-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2svATI" vertex-stream-2sv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int16| :direction :in :array t :size #x2)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream2sATI" vertex-stream-2s-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1dvATI" vertex-stream-1dv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float64| :direction :in :array t :size #x1)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1dATI" vertex-stream-1d-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float64| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1fvATI" vertex-stream-1fv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Float32| :direction :in :array t :size #x1)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1fATI" vertex-stream-1f-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Float32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1ivATI" vertex-stream-1iv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int32| :direction :in :array t :size #x1)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1iATI" vertex-stream-1i-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int32| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1svATI" vertex-stream-1sv-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |coords| :type |Int16| :direction :in :array t :size #x1)) + :category "ATI_vertex_streams" :version "1.2") +(defglextfun "VertexStream1sATI" vertex-stream-1s-ati :return "void" :args + ((:name |stream| :type |VertexStreamATI| :direction :in) + (:name |x| :type |Int16| :direction :in)) + :category "ATI_vertex_streams" :version "1.2") diff --git a/lib/opengl-ext_bindable_uniform.lisp b/lib/opengl-ext_bindable_uniform.lisp dissimilarity index 69% index f5d0646..7130058 100644 --- a/lib/opengl-ext_bindable_uniform.lisp +++ b/lib/opengl-ext_bindable_uniform.lisp @@ -1,34 +1,27 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_bindable_uniform - -(defconstant +max-vertex-bindable-uniforms-ext+ #x8DE2) -(defconstant +max-fragment-bindable-uniforms-ext+ #x8DE3) -(defconstant +max-geometry-bindable-uniforms-ext+ #x8DE4) -(defconstant +max-bindable-uniform-size-ext+ #x8DED) -(defconstant +uniform-buffer-ext+ #x8DEE) -(defconstant +uniform-buffer-binding-ext+ #x8DEF) -(defglextfun - (("GetUniformOffsetEXT" get-uniform-offset-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :in)) - :return ("BufferOffset") :category ("EXT_bindable_uniform") :dlflags - ("notlistable") :version ("2.0") :extension ("soft" "WINSOFT") :glfflags - ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetUniformBufferSizeEXT" get-uniform-buffer-size-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :in)) - :return ("Int32") :category ("EXT_bindable_uniform") :dlflags ("notlistable") - :version ("2.0") :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("UniformBufferEXT" uniform-buffer-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :in) - (:name |buffer| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_bindable_uniform") :version ("2.0") - :extension ("soft" "WINSOFT") :glxflags ("ignore") :glfflags ("ignore") - :glsflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_bindable_uniform + +(defconstant +max-vertex-bindable-uniforms-ext+ #x8DE2) +(defconstant +max-fragment-bindable-uniforms-ext+ #x8DE3) +(defconstant +max-geometry-bindable-uniforms-ext+ #x8DE4) +(defconstant +max-bindable-uniform-size-ext+ #x8DED) +(defconstant +uniform-buffer-ext+ #x8DEE) +(defconstant +uniform-buffer-binding-ext+ #x8DEF) +(defglextfun "GetUniformOffsetEXT" get-uniform-offset-ext :return + "BufferOffset" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :in)) + :category "EXT_bindable_uniform" :version "2.0") +(defglextfun "GetUniformBufferSizeEXT" get-uniform-buffer-size-ext :return + "Int32" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :in)) + :category "EXT_bindable_uniform" :version "2.0") +(defglextfun "UniformBufferEXT" uniform-buffer-ext :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :in) + (:name |buffer| :type |UInt32| :direction :in)) + :category "EXT_bindable_uniform" :version "2.0") diff --git a/lib/opengl-ext_blend_color.lisp b/lib/opengl-ext_blend_color.lisp dissimilarity index 72% index 3ed0826..b3bf88a 100644 --- a/lib/opengl-ext_blend_color.lisp +++ b/lib/opengl-ext_blend_color.lisp @@ -1,15 +1,12 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_blend_color - -(defglextfun - (("BlendColorEXT" blend-color-ext) :args - ((:name |red| :type |ClampedColorF| :direction :in) - (:name |green| :type |ClampedColorF| :direction :in) - (:name |blue| :type |ClampedColorF| :direction :in) - (:name |alpha| :type |ClampedColorF| :direction :in)) - :return ("void") :category ("EXT_blend_color") :version ("1.0") :glxropcode - ("4096") :glxflags ("EXT") :extension ("soft") :alias ("BlendColor") - :glsalias ("BlendColor"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_blend_color + +(defglextfun "BlendColorEXT" blend-color-ext :return "void" :args + ((:name |red| :type |ClampedColorF| :direction :in) + (:name |green| :type |ClampedColorF| :direction :in) + (:name |blue| :type |ClampedColorF| :direction :in) + (:name |alpha| :type |ClampedColorF| :direction :in)) + :category "EXT_blend_color" :version "1.0") diff --git a/lib/opengl-ext_blend_equation_separate.lisp b/lib/opengl-ext_blend_equation_separate.lisp index 2e44758..b8af19a 100644 --- a/lib/opengl-ext_blend_equation_separate.lisp +++ b/lib/opengl-ext_blend_equation_separate.lisp @@ -6,10 +6,8 @@ (defconstant +blend-equation-rgb-ext+ #x8009) (defconstant +blend-equation-alpha-ext+ #x883D) -(defglextfun - (("BlendEquationSeparateEXT" blend-equation-separate-ext) :args - ((:name |modeRGB| :type |BlendEquationModeEXT| :direction :in) - (:name |modeAlpha| :type |BlendEquationModeEXT| :direction :in)) - :return ("void") :category ("EXT_blend_equation_separate") :version ("1.2") - :extension nil :glxropcode ("4228") :alias ("BlendEquationSeparate") - :glsalias ("BlendEquationSeparate"))) +(defglextfun "BlendEquationSeparateEXT" blend-equation-separate-ext :return + "void" :args + ((:name |modeRGB| :type |BlendEquationModeEXT| :direction :in) + (:name |modeAlpha| :type |BlendEquationModeEXT| :direction :in)) + :category "EXT_blend_equation_separate" :version "1.2") diff --git a/lib/opengl-ext_blend_func_separate.lisp b/lib/opengl-ext_blend_func_separate.lisp dissimilarity index 61% index 295a7c1..555eefd 100644 --- a/lib/opengl-ext_blend_func_separate.lisp +++ b/lib/opengl-ext_blend_func_separate.lisp @@ -1,19 +1,17 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_blend_func_separate - -(defconstant +blend-dst-rgb-ext+ #x80C8) -(defconstant +blend-src-rgb-ext+ #x80C9) -(defconstant +blend-dst-alpha-ext+ #x80CA) -(defconstant +blend-src-alpha-ext+ #x80CB) -(defglextfun - (("BlendFuncSeparateEXT" blend-func-separate-ext) :args - ((:name |sfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |dfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |sfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |dfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in)) - :return ("void") :category ("EXT_blend_func_separate") :glxropcode ("4134") - :version ("1.0") :extension nil :alias ("BlendFuncSeparate") :glsalias - ("BlendFuncSeparate"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_blend_func_separate + +(defconstant +blend-dst-rgb-ext+ #x80C8) +(defconstant +blend-src-rgb-ext+ #x80C9) +(defconstant +blend-dst-alpha-ext+ #x80CA) +(defconstant +blend-src-alpha-ext+ #x80CB) +(defglextfun "BlendFuncSeparateEXT" blend-func-separate-ext :return "void" + :args + ((:name |sfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |dfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |sfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |dfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in)) + :category "EXT_blend_func_separate" :version "1.0") diff --git a/lib/opengl-ext_blend_minmax.lisp b/lib/opengl-ext_blend_minmax.lisp dissimilarity index 64% index ed30ca2..719d524 100644 --- a/lib/opengl-ext_blend_minmax.lisp +++ b/lib/opengl-ext_blend_minmax.lisp @@ -1,12 +1,9 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_blend_minmax - -(defglextfun - (("BlendEquationEXT" blend-equation-ext) :args - ((:name |mode| :type |BlendEquationModeEXT| :direction :in)) :return ("void") - :category ("EXT_blend_minmax") :version ("1.0") :glxropcode ("4097") - :glxflags ("EXT") :extension ("soft") :alias ("BlendEquation") :glsalias - ("BlendEquation"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_blend_minmax + +(defglextfun "BlendEquationEXT" blend-equation-ext :return "void" :args + ((:name |mode| :type |BlendEquationModeEXT| :direction :in)) :category + "EXT_blend_minmax" :version "1.0") diff --git a/lib/opengl-ext_color_subtable.lisp b/lib/opengl-ext_color_subtable.lisp dissimilarity index 85% index a90932d..6e88a9d 100644 --- a/lib/opengl-ext_color_subtable.lisp +++ b/lib/opengl-ext_color_subtable.lisp @@ -1,26 +1,23 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_color_subtable - -(defglextfun - (("CopyColorSubTableEXT" copy-color-sub-table-ext) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |start| :type |SizeI| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_color_subtable") :version ("1.2") :alias - ("CopyColorSubTable") :glsalias ("CopyColorSubTable"))) -(defglextfun - (("ColorSubTableEXT" color-sub-table-ext) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |start| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |data| :type |Void| :direction :in :array t :size - (|format| |type| |count|))) - :return ("void") :category ("EXT_color_subtable") :version ("1.2") :alias - ("ColorSubTable") :glsalias ("ColorSubTable"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_color_subtable + +(defglextfun "CopyColorSubTableEXT" copy-color-sub-table-ext :return "void" + :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |start| :type |SizeI| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "EXT_color_subtable" :version "1.2") +(defglextfun "ColorSubTableEXT" color-sub-table-ext :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |start| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |data| :type |Void| :direction :in :array t :size + (|format| |type| |count|))) + :category "EXT_color_subtable" :version "1.2") diff --git a/lib/opengl-ext_compiled_vertex_array.lisp b/lib/opengl-ext_compiled_vertex_array.lisp dissimilarity index 67% index ca95bb9..ad66158 100644 --- a/lib/opengl-ext_compiled_vertex_array.lisp +++ b/lib/opengl-ext_compiled_vertex_array.lisp @@ -1,20 +1,14 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_compiled_vertex_array - -(defconstant +array-element-lock-first-ext+ #x81A8) -(defconstant +array-element-lock-count-ext+ #x81A9) -(defglextfun - (("UnlockArraysEXT" unlock-arrays-ext) :args nil :return ("void") :category - ("EXT_compiled_vertex_array") :version ("1.1") :dlflags ("notlistable") - :extension ("soft") :glxflags ("ignore") :glsopcode ("0x01D4") :offset - ("541"))) -(defglextfun - (("LockArraysEXT" lock-arrays-ext) :args - ((:name |first| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_compiled_vertex_array") :version ("1.1") - :dlflags ("notlistable") :extension ("soft") :glxflags ("ignore") :glsopcode - ("0x01D3") :offset ("540"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_compiled_vertex_array + +(defconstant +array-element-lock-first-ext+ #x81A8) +(defconstant +array-element-lock-count-ext+ #x81A9) +(defglextfun "UnlockArraysEXT" unlock-arrays-ext :return "void" :args nil + :category "EXT_compiled_vertex_array" :version "1.1") +(defglextfun "LockArraysEXT" lock-arrays-ext :return "void" :args + ((:name |first| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "EXT_compiled_vertex_array" :version "1.1") diff --git a/lib/opengl-ext_convolution.lisp b/lib/opengl-ext_convolution.lisp dissimilarity index 97% index 2705b01..232e082 100644 --- a/lib/opengl-ext_convolution.lisp +++ b/lib/opengl-ext_convolution.lisp @@ -1,146 +1,115 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_convolution - -(defglextfun - (("SeparableFilter2DEXT" separable-filter-2d-ext) :args - ((:name |target| :type |SeparableTargetEXT| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |row| :type |Void| :direction :in :array t :size - (|target| |format| |type| |width|)) - (:name |column| :type |Void| :direction :in :array t :size - (|target| |format| |type| |height|))) - :return ("void") :category ("EXT_convolution") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxropcode ("4109") :extension nil :alias ("SeparableFilter2D") :glsalias - ("SeparableFilter2D"))) -(defglextfun - (("GetSeparableFilterEXT" get-separable-filter-ext) :args - ((:name |target| :type |SeparableTargetEXT| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |row| :type |Void| :direction :out :array t :size - (|target| |format| |type|)) - (:name |column| :type |Void| :direction :out :array t :size - (|target| |format| |type|)) - (:name |span| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("EXT_convolution") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxvendorpriv ("4") :extension nil :glsflags ("get" "pixel-pack") :glsopcode - ("0x0130") :offset ("426"))) -(defglextfun - (("GetConvolutionParameterivEXT" get-convolution-parameter-iv-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |pname| :type |ConvolutionParameterEXT| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_convolution") :dlflags ("notlistable") - :version ("1.0") :glxvendorpriv ("3") :glxflags ("EXT") :extension nil - :glsflags ("get") :glsopcode ("0x012F") :offset ("425"))) -(defglextfun - (("GetConvolutionParameterfvEXT" get-convolution-parameter-fv-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |pname| :type |ConvolutionParameterEXT| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_convolution") :dlflags ("notlistable") - :version ("1.0") :glxvendorpriv ("2") :glxflags ("EXT") :extension nil - :glsflags ("get") :glsopcode ("0x012E") :offset ("424"))) -(defglextfun - (("GetConvolutionFilterEXT" get-convolution-filter-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |image| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("EXT_convolution") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxvendorpriv ("1") :extension nil :glsflags ("get" "pixel-pack") :glsopcode - ("0x012D") :offset ("423"))) -(defglextfun - (("CopyConvolutionFilter2DEXT" copy-convolution-filter-2d-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_convolution") :version ("1.0") :glxropcode - ("4108") :glxflags ("EXT") :extension nil :alias ("CopyConvolutionFilter2D") - :glsalias ("CopyConvolutionFilter2D"))) -(defglextfun - (("CopyConvolutionFilter1DEXT" copy-convolution-filter-1d-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_convolution") :version ("1.0") :glxropcode - ("4107") :glxflags ("EXT") :extension nil :alias ("CopyConvolutionFilter1D") - :glsalias ("CopyConvolutionFilter1D"))) -(defglextfun - (("ConvolutionParameterivEXT" convolution-parameter-iv-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |pname| :type |ConvolutionParameterEXT| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("EXT_convolution") :version ("1.0") :glxropcode - ("4106") :glxflags ("EXT") :extension nil :alias ("ConvolutionParameteriv") - :glsalias ("ConvolutionParameteriv"))) -(defglextfun - (("ConvolutionParameteriEXT" convolution-parameter-i-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |pname| :type |ConvolutionParameterEXT| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("EXT_convolution") :version ("1.0") :glxropcode - ("4105") :glxflags ("EXT") :extension nil :alias ("ConvolutionParameteri") - :glsalias ("ConvolutionParameteri"))) -(defglextfun - (("ConvolutionParameterfvEXT" convolution-parameter-fv-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |pname| :type |ConvolutionParameterEXT| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("EXT_convolution") :version ("1.0") :glxropcode - ("4104") :glxflags ("EXT") :extension nil :alias ("ConvolutionParameterfv") - :glsalias ("ConvolutionParameterfv"))) -(defglextfun - (("ConvolutionParameterfEXT" convolution-parameter-f-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |pname| :type |ConvolutionParameterEXT| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("EXT_convolution") :version ("1.0") :glxropcode - ("4103") :glxflags ("EXT") :extension nil :alias ("ConvolutionParameterf") - :glsalias ("ConvolutionParameterf"))) -(defglextfun - (("ConvolutionFilter2DEXT" convolution-filter-2d-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |image| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("EXT_convolution") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxropcode ("4102") :extension nil :alias ("ConvolutionFilter2D") :glsalias - ("ConvolutionFilter2D"))) -(defglextfun - (("ConvolutionFilter1DEXT" convolution-filter-1d-ext) :args - ((:name |target| :type |ConvolutionTargetEXT| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |image| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("EXT_convolution") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxropcode ("4101") :extension nil :alias ("ConvolutionFilter1D") :glsalias - ("ConvolutionFilter1D"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_convolution + +(defglextfun "SeparableFilter2DEXT" separable-filter-2d-ext :return "void" + :args + ((:name |target| :type |SeparableTargetEXT| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |row| :type |Void| :direction :in :array t :size + (|target| |format| |type| |width|)) + (:name |column| :type |Void| :direction :in :array t :size + (|target| |format| |type| |height|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "GetSeparableFilterEXT" get-separable-filter-ext :return "void" + :args + ((:name |target| :type |SeparableTargetEXT| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |row| :type |Void| :direction :out :array t :size + (|target| |format| |type|)) + (:name |column| :type |Void| :direction :out :array t :size + (|target| |format| |type|)) + (:name |span| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "GetConvolutionParameterivEXT" get-convolution-parameter-iv-ext + :return "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |pname| :type |ConvolutionParameterEXT| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "GetConvolutionParameterfvEXT" get-convolution-parameter-fv-ext + :return "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |pname| :type |ConvolutionParameterEXT| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "GetConvolutionFilterEXT" get-convolution-filter-ext :return + "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |image| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "CopyConvolutionFilter2DEXT" copy-convolution-filter-2d-ext + :return "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "EXT_convolution" :version "1.0") +(defglextfun "CopyConvolutionFilter1DEXT" copy-convolution-filter-1d-ext + :return "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "EXT_convolution" :version "1.0") +(defglextfun "ConvolutionParameterivEXT" convolution-parameter-iv-ext :return + "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |pname| :type |ConvolutionParameterEXT| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "ConvolutionParameteriEXT" convolution-parameter-i-ext :return + "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |pname| :type |ConvolutionParameterEXT| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in)) + :category "EXT_convolution" :version "1.0") +(defglextfun "ConvolutionParameterfvEXT" convolution-parameter-fv-ext :return + "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |pname| :type |ConvolutionParameterEXT| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "ConvolutionParameterfEXT" convolution-parameter-f-ext :return + "void" :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |pname| :type |ConvolutionParameterEXT| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in)) + :category "EXT_convolution" :version "1.0") +(defglextfun "ConvolutionFilter2DEXT" convolution-filter-2d-ext :return "void" + :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |image| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height|))) + :category "EXT_convolution" :version "1.0") +(defglextfun "ConvolutionFilter1DEXT" convolution-filter-1d-ext :return "void" + :args + ((:name |target| :type |ConvolutionTargetEXT| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |image| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "EXT_convolution" :version "1.0") diff --git a/lib/opengl-ext_coordinate_frame.lisp b/lib/opengl-ext_coordinate_frame.lisp dissimilarity index 89% index 3e7dcf4..49e908d 100644 --- a/lib/opengl-ext_coordinate_frame.lisp +++ b/lib/opengl-ext_coordinate_frame.lisp @@ -1,158 +1,112 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_coordinate_frame - -(defconstant +tangent-array-ext+ #x8439) -(defconstant +binormal-array-ext+ #x843A) -(defconstant +current-tangent-ext+ #x843B) -(defconstant +current-binormal-ext+ #x843C) -(defconstant +tangent-array-type-ext+ #x843E) -(defconstant +tangent-array-stride-ext+ #x843F) -(defconstant +binormal-array-type-ext+ #x8440) -(defconstant +binormal-array-stride-ext+ #x8441) -(defconstant +tangent-array-pointer-ext+ #x8442) -(defconstant +binormal-array-pointer-ext+ #x8443) -(defconstant +map1-tangent-ext+ #x8444) -(defconstant +map2-tangent-ext+ #x8445) -(defconstant +map1-binormal-ext+ #x8446) -(defconstant +map2-binormal-ext+ #x8447) -(defglextfun - (("BinormalPointerEXT" binormal-pointer-ext) :args - ((:name |type| :type |BinormalPointerTypeEXT| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("EXT_coordinate_frame") :dlflags ("notlistable") - :glxflags ("client-handcode" "client-intercept" "server-handcode") :version - ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TangentPointerEXT" tangent-pointer-ext) :args - ((:name |type| :type |TangentPointerTypeEXT| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("EXT_coordinate_frame") :dlflags ("notlistable") - :glxflags ("client-handcode" "client-intercept" "server-handcode") :version - ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3svEXT" binormal-3sv-ext) :args - ((:name |v| :type |Int16| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3sEXT" binormal-3s-ext) :args - ((:name |bx| :type |Int16| :direction :in) - (:name |by| :type |Int16| :direction :in) - (:name |bz| :type |Int16| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Binormal3svEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3ivEXT" binormal-3iv-ext) :args - ((:name |v| :type |Int32| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3iEXT" binormal-3i-ext) :args - ((:name |bx| :type |Int32| :direction :in) - (:name |by| :type |Int32| :direction :in) - (:name |bz| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Binormal3ivEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3fvEXT" binormal-3fv-ext) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3fEXT" binormal-3f-ext) :args - ((:name |bx| :type |CoordF| :direction :in) - (:name |by| :type |CoordF| :direction :in) - (:name |bz| :type |CoordF| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Binormal3fvEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3dvEXT" binormal-3dv-ext) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3dEXT" binormal-3d-ext) :args - ((:name |bx| :type |CoordD| :direction :in) - (:name |by| :type |CoordD| :direction :in) - (:name |bz| :type |CoordD| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Binormal3dvEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3bvEXT" binormal-3bv-ext) :args - ((:name |v| :type |Int8| :direction :in :array t :size #x3)) :return ("void") - :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Binormal3bEXT" binormal-3b-ext) :args - ((:name |bx| :type |Int8| :direction :in) - (:name |by| :type |Int8| :direction :in) - (:name |bz| :type |Int8| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Binormal3bvEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3svEXT" tangent-3sv-ext) :args - ((:name |v| :type |Int16| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3sEXT" tangent-3s-ext) :args - ((:name |tx| :type |Int16| :direction :in) - (:name |ty| :type |Int16| :direction :in) - (:name |tz| :type |Int16| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Tangent3svEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3ivEXT" tangent-3iv-ext) :args - ((:name |v| :type |Int32| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3iEXT" tangent-3i-ext) :args - ((:name |tx| :type |Int32| :direction :in) - (:name |ty| :type |Int32| :direction :in) - (:name |tz| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Tangent3ivEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3fvEXT" tangent-3fv-ext) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3fEXT" tangent-3f-ext) :args - ((:name |tx| :type |CoordF| :direction :in) - (:name |ty| :type |CoordF| :direction :in) - (:name |tz| :type |CoordF| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Tangent3fvEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3dvEXT" tangent-3dv-ext) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3dEXT" tangent-3d-ext) :args - ((:name |tx| :type |CoordD| :direction :in) - (:name |ty| :type |CoordD| :direction :in) - (:name |tz| :type |CoordD| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Tangent3dvEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3bvEXT" tangent-3bv-ext) :args - ((:name |v| :type |Int8| :direction :in :array t :size #x3)) :return ("void") - :category ("EXT_coordinate_frame") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Tangent3bEXT" tangent-3b-ext) :args - ((:name |tx| :type |Int8| :direction :in) - (:name |ty| :type |Int8| :direction :in) - (:name |tz| :type |Int8| :direction :in)) - :return ("void") :category ("EXT_coordinate_frame") :vectorequiv - ("Tangent3bvEXT") :version ("1.1") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_coordinate_frame + +(defconstant +tangent-array-ext+ #x8439) +(defconstant +binormal-array-ext+ #x843A) +(defconstant +current-tangent-ext+ #x843B) +(defconstant +current-binormal-ext+ #x843C) +(defconstant +tangent-array-type-ext+ #x843E) +(defconstant +tangent-array-stride-ext+ #x843F) +(defconstant +binormal-array-type-ext+ #x8440) +(defconstant +binormal-array-stride-ext+ #x8441) +(defconstant +tangent-array-pointer-ext+ #x8442) +(defconstant +binormal-array-pointer-ext+ #x8443) +(defconstant +map1-tangent-ext+ #x8444) +(defconstant +map2-tangent-ext+ #x8445) +(defconstant +map1-binormal-ext+ #x8446) +(defconstant +map2-binormal-ext+ #x8447) +(defglextfun "BinormalPointerEXT" binormal-pointer-ext :return "void" :args + ((:name |type| :type |BinormalPointerTypeEXT| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "TangentPointerEXT" tangent-pointer-ext :return "void" :args + ((:name |type| :type |TangentPointerTypeEXT| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3svEXT" binormal-3sv-ext :return "void" :args + ((:name |v| :type |Int16| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3sEXT" binormal-3s-ext :return "void" :args + ((:name |bx| :type |Int16| :direction :in) + (:name |by| :type |Int16| :direction :in) + (:name |bz| :type |Int16| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3ivEXT" binormal-3iv-ext :return "void" :args + ((:name |v| :type |Int32| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3iEXT" binormal-3i-ext :return "void" :args + ((:name |bx| :type |Int32| :direction :in) + (:name |by| :type |Int32| :direction :in) + (:name |bz| :type |Int32| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3fvEXT" binormal-3fv-ext :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3fEXT" binormal-3f-ext :return "void" :args + ((:name |bx| :type |CoordF| :direction :in) + (:name |by| :type |CoordF| :direction :in) + (:name |bz| :type |CoordF| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3dvEXT" binormal-3dv-ext :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3dEXT" binormal-3d-ext :return "void" :args + ((:name |bx| :type |CoordD| :direction :in) + (:name |by| :type |CoordD| :direction :in) + (:name |bz| :type |CoordD| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3bvEXT" binormal-3bv-ext :return "void" :args + ((:name |v| :type |Int8| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Binormal3bEXT" binormal-3b-ext :return "void" :args + ((:name |bx| :type |Int8| :direction :in) + (:name |by| :type |Int8| :direction :in) + (:name |bz| :type |Int8| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3svEXT" tangent-3sv-ext :return "void" :args + ((:name |v| :type |Int16| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3sEXT" tangent-3s-ext :return "void" :args + ((:name |tx| :type |Int16| :direction :in) + (:name |ty| :type |Int16| :direction :in) + (:name |tz| :type |Int16| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3ivEXT" tangent-3iv-ext :return "void" :args + ((:name |v| :type |Int32| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3iEXT" tangent-3i-ext :return "void" :args + ((:name |tx| :type |Int32| :direction :in) + (:name |ty| :type |Int32| :direction :in) + (:name |tz| :type |Int32| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3fvEXT" tangent-3fv-ext :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3fEXT" tangent-3f-ext :return "void" :args + ((:name |tx| :type |CoordF| :direction :in) + (:name |ty| :type |CoordF| :direction :in) + (:name |tz| :type |CoordF| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3dvEXT" tangent-3dv-ext :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3dEXT" tangent-3d-ext :return "void" :args + ((:name |tx| :type |CoordD| :direction :in) + (:name |ty| :type |CoordD| :direction :in) + (:name |tz| :type |CoordD| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3bvEXT" tangent-3bv-ext :return "void" :args + ((:name |v| :type |Int8| :direction :in :array t :size #x3)) :category + "EXT_coordinate_frame" :version "1.1") +(defglextfun "Tangent3bEXT" tangent-3b-ext :return "void" :args + ((:name |tx| :type |Int8| :direction :in) + (:name |ty| :type |Int8| :direction :in) + (:name |tz| :type |Int8| :direction :in)) + :category "EXT_coordinate_frame" :version "1.1") diff --git a/lib/opengl-ext_copy_texture.lisp b/lib/opengl-ext_copy_texture.lisp dissimilarity index 95% index d1816bf..57806be 100644 --- a/lib/opengl-ext_copy_texture.lisp +++ b/lib/opengl-ext_copy_texture.lisp @@ -1,69 +1,57 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_copy_texture - -(defglextfun - (("CopyTexSubImage3DEXT" copy-tex-sub-image-3d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_copy_texture") :version ("1.0") :glxflags - ("EXT") :glxropcode ("4123") :extension nil :alias ("CopyTexSubImage3D") - :glsalias ("CopyTexSubImage3D"))) -(defglextfun - (("CopyTexSubImage2DEXT" copy-tex-sub-image-2d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_copy_texture") :version ("1.0") :glxflags - ("EXT") :glxropcode ("4122") :extension nil :alias ("CopyTexSubImage2D") - :glsalias ("CopyTexSubImage2D"))) -(defglextfun - (("CopyTexSubImage1DEXT" copy-tex-sub-image-1d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_copy_texture") :version ("1.0") :glxflags - ("EXT") :glxropcode ("4121") :extension nil :alias ("CopyTexSubImage1D") - :glsalias ("CopyTexSubImage1D"))) -(defglextfun - (("CopyTexImage2DEXT" copy-tex-image-2d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("EXT_copy_texture") :version ("1.0") :glxflags - ("EXT") :glxropcode ("4120") :extension nil :alias ("CopyTexImage2D") - :glsalias ("CopyTexImage2D"))) -(defglextfun - (("CopyTexImage1DEXT" copy-tex-image-1d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("EXT_copy_texture") :version ("1.0") :glxflags - ("EXT") :glxropcode ("4119") :extension nil :alias ("CopyTexImage1D") - :glsalias ("CopyTexImage1D"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_copy_texture + +(defglextfun "CopyTexSubImage3DEXT" copy-tex-sub-image-3d-ext :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "EXT_copy_texture" :version "1.0") +(defglextfun "CopyTexSubImage2DEXT" copy-tex-sub-image-2d-ext :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "EXT_copy_texture" :version "1.0") +(defglextfun "CopyTexSubImage1DEXT" copy-tex-sub-image-1d-ext :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "EXT_copy_texture" :version "1.0") +(defglextfun "CopyTexImage2DEXT" copy-tex-image-2d-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in)) + :category "EXT_copy_texture" :version "1.0") +(defglextfun "CopyTexImage1DEXT" copy-tex-image-1d-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in)) + :category "EXT_copy_texture" :version "1.0") diff --git a/lib/opengl-ext_cull_vertex.lisp b/lib/opengl-ext_cull_vertex.lisp dissimilarity index 69% index 7b7d016..564be40 100644 --- a/lib/opengl-ext_cull_vertex.lisp +++ b/lib/opengl-ext_cull_vertex.lisp @@ -1,23 +1,17 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_cull_vertex - -(defconstant +cull-vertex-ext+ #x81AA) -(defconstant +cull-vertex-eye-position-ext+ #x81AB) -(defconstant +cull-vertex-object-position-ext+ #x81AC) -(defglextfun - (("CullParameterfvEXT" cull-parameter-fv-ext) :args - ((:name |pname| :type |CullParameterEXT| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :category ("EXT_cull_vertex") :version ("1.1") :dlflags - ("notlistable") :extension ("soft") :glxflags ("ignore") :glsopcode - ("0x01D6") :offset ("543"))) -(defglextfun - (("CullParameterdvEXT" cull-parameter-dv-ext) :args - ((:name |pname| :type |CullParameterEXT| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :category ("EXT_cull_vertex") :version ("1.1") :dlflags - ("notlistable") :extension ("soft") :glxflags ("ignore") :glsopcode - ("0x01D5") :offset ("542"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_cull_vertex + +(defconstant +cull-vertex-ext+ #x81AA) +(defconstant +cull-vertex-eye-position-ext+ #x81AB) +(defconstant +cull-vertex-object-position-ext+ #x81AC) +(defglextfun "CullParameterfvEXT" cull-parameter-fv-ext :return "void" :args + ((:name |pname| :type |CullParameterEXT| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "EXT_cull_vertex" :version "1.1") +(defglextfun "CullParameterdvEXT" cull-parameter-dv-ext :return "void" :args + ((:name |pname| :type |CullParameterEXT| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "EXT_cull_vertex" :version "1.1") diff --git a/lib/opengl-ext_depth_bounds_test.lisp b/lib/opengl-ext_depth_bounds_test.lisp index 0b2a74a..b77669f 100644 --- a/lib/opengl-ext_depth_bounds_test.lisp +++ b/lib/opengl-ext_depth_bounds_test.lisp @@ -6,9 +6,7 @@ (defconstant +depth-bounds-test-ext+ #x8890) (defconstant +depth-bounds-ext+ #x8891) -(defglextfun - (("DepthBoundsEXT" depth-bounds-ext) :args - ((:name |zmin| :type |ClampedFloat64| :direction :in) - (:name |zmax| :type |ClampedFloat64| :direction :in)) - :return ("void") :category ("EXT_depth_bounds_test") :version ("1.2") - :extension nil :glxropcode ("4229") :glsopcode ("?") :offset ("699"))) +(defglextfun "DepthBoundsEXT" depth-bounds-ext :return "void" :args + ((:name |zmin| :type |ClampedFloat64| :direction :in) + (:name |zmax| :type |ClampedFloat64| :direction :in)) + :category "EXT_depth_bounds_test" :version "1.2") diff --git a/lib/opengl-ext_draw_buffers2.lisp b/lib/opengl-ext_draw_buffers2.lisp dissimilarity index 93% index 4ee2f17..4c5de1e 100644 --- a/lib/opengl-ext_draw_buffers2.lisp +++ b/lib/opengl-ext_draw_buffers2.lisp @@ -1,53 +1,38 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_draw_buffers2 - -(defglextfun - (("IsEnabledIndexedEXT" is-enabled-indexed-ext) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in)) - :return ("Boolean") :category ("EXT_draw_buffers2") :version ("2.0") :dlflags - ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("DisableIndexedEXT" disable-indexed-ext) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_draw_buffers2") :version ("2.0") :glxflags - ("ignore") :glfflags ("ignore") :glsflags ("ignore") :extension - ("soft" "WINSOFT"))) -(defglextfun - (("EnableIndexedEXT" enable-indexed-ext) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_draw_buffers2") :version ("2.0") :glxflags - ("ignore") :glfflags ("ignore") :glsflags ("ignore") :extension - ("soft" "WINSOFT"))) -(defglextfun - (("GetIntegerIndexedvEXT" get-integer-indexed-v-ext) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |data| :type |Int32| :direction :out :array t :size (|target|))) - :return ("void") :category ("EXT_draw_buffers2") :version ("2.0") :dlflags - ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("GetBooleanIndexedvEXT" get-boolean-indexed-v-ext) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |data| :type |Boolean| :direction :out :array t :size (|target|))) - :return ("void") :category ("EXT_draw_buffers2") :version ("2.0") :dlflags - ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("ColorMaskIndexedEXT" color-mask-indexed-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |r| :type |Boolean| :direction :in) - (:name |g| :type |Boolean| :direction :in) - (:name |b| :type |Boolean| :direction :in) - (:name |a| :type |Boolean| :direction :in)) - :return ("void") :category ("EXT_draw_buffers2") :version ("2.0") :glxflags - ("ignore") :glfflags ("ignore") :glsflags ("ignore") :extension - ("soft" "WINSOFT"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_draw_buffers2 + +(defglextfun "IsEnabledIndexedEXT" is-enabled-indexed-ext :return "Boolean" + :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in)) + :category "EXT_draw_buffers2" :version "2.0") +(defglextfun "DisableIndexedEXT" disable-indexed-ext :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in)) + :category "EXT_draw_buffers2" :version "2.0") +(defglextfun "EnableIndexedEXT" enable-indexed-ext :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in)) + :category "EXT_draw_buffers2" :version "2.0") +(defglextfun "GetIntegerIndexedvEXT" get-integer-indexed-v-ext :return "void" + :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |data| :type |Int32| :direction :out :array t :size (|target|))) + :category "EXT_draw_buffers2" :version "2.0") +(defglextfun "GetBooleanIndexedvEXT" get-boolean-indexed-v-ext :return "void" + :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |data| :type |Boolean| :direction :out :array t :size (|target|))) + :category "EXT_draw_buffers2" :version "2.0") +(defglextfun "ColorMaskIndexedEXT" color-mask-indexed-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |r| :type |Boolean| :direction :in) + (:name |g| :type |Boolean| :direction :in) + (:name |b| :type |Boolean| :direction :in) + (:name |a| :type |Boolean| :direction :in)) + :category "EXT_draw_buffers2" :version "2.0") diff --git a/lib/opengl-ext_draw_instanced.lisp b/lib/opengl-ext_draw_instanced.lisp dissimilarity index 86% index 2e04a5f..004c243 100644 --- a/lib/opengl-ext_draw_instanced.lisp +++ b/lib/opengl-ext_draw_instanced.lisp @@ -1,26 +1,21 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_draw_instanced - -(defglextfun - (("DrawElementsInstancedEXT" draw-elements-instanced-ext) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |Void| :direction :in :array t :size - (|count| |type|)) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_draw_instanced") :version ("2.0") :extension - ("soft" "WINSOFT") :dlflags ("notlistable") :vectorequiv ("ArrayElement") - :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("DrawArraysInstancedEXT" draw-arrays-instanced-ext) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |start| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_draw_instanced") :version ("2.0") :extension - ("soft" "WINSOFT") :dlflags ("notlistable") :vectorequiv ("ArrayElement") - :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_draw_instanced + +(defglextfun "DrawElementsInstancedEXT" draw-elements-instanced-ext :return + "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |Void| :direction :in :array t :size (|count| |type|)) + (:name |primcount| :type |SizeI| :direction :in)) + :category "EXT_draw_instanced" :version "2.0") +(defglextfun "DrawArraysInstancedEXT" draw-arrays-instanced-ext :return "void" + :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |start| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |primcount| :type |SizeI| :direction :in)) + :category "EXT_draw_instanced" :version "2.0") diff --git a/lib/opengl-ext_draw_range_elements.lisp b/lib/opengl-ext_draw_range_elements.lisp dissimilarity index 69% index f1027b0..78f0db5 100644 --- a/lib/opengl-ext_draw_range_elements.lisp +++ b/lib/opengl-ext_draw_range_elements.lisp @@ -1,20 +1,18 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_draw_range_elements - -(defconstant +max-elements-vertices-ext+ #x80E8) -(defconstant +max-elements-indices-ext+ #x80E9) -(defglextfun - (("DrawRangeElementsEXT" draw-range-elements-ext) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |start| :type |UInt32| :direction :in) - (:name |end| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |Void| :direction :in :array t :size - (|count| |type|))) - :return ("void") :category ("EXT_draw_range_elements") :dlflags ("handcode") - :glxflags ("client-handcode" "client-intercept" "server-handcode") :version - ("1.1") :alias ("DrawRangeElements") :glsalias ("DrawRangeElements"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_draw_range_elements + +(defconstant +max-elements-vertices-ext+ #x80E8) +(defconstant +max-elements-indices-ext+ #x80E9) +(defglextfun "DrawRangeElementsEXT" draw-range-elements-ext :return "void" + :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |start| :type |UInt32| :direction :in) + (:name |end| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |Void| :direction :in :array t :size + (|count| |type|))) + :category "EXT_draw_range_elements" :version "1.1") diff --git a/lib/opengl-ext_fog_coord.lisp b/lib/opengl-ext_fog_coord.lisp dissimilarity index 72% index 8cdb8ce..9f0c643 100644 --- a/lib/opengl-ext_fog_coord.lisp +++ b/lib/opengl-ext_fog_coord.lisp @@ -1,43 +1,32 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_fog_coord - -(defconstant +fog-coordinate-source-ext+ #x8450) -(defconstant +fog-coordinate-ext+ #x8451) -(defconstant +fragment-depth-ext+ #x8452) -(defconstant +current-fog-coordinate-ext+ #x8453) -(defconstant +fog-coordinate-array-type-ext+ #x8454) -(defconstant +fog-coordinate-array-stride-ext+ #x8455) -(defconstant +fog-coordinate-array-pointer-ext+ #x8456) -(defconstant +fog-coordinate-array-ext+ #x8457) -(defglextfun - (("FogCoordPointerEXT" fog-coord-pointer-ext) :args - ((:name |type| :type |FogPointerTypeEXT| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("EXT_fog_coord") :dlflags ("notlistable") - :version ("1.1") :glxflags ("client-handcode" "server-handcode" "EXT") :alias - ("FogCoordPointer") :glsalias ("FogCoordPointer"))) -(defglextfun - (("FogCoorddvEXT" fog-coord-dv-ext) :args - ((:name |coord| :type |CoordD| :direction :in :array t :size #x1)) :return - ("void") :category ("EXT_fog_coord") :version ("1.1") :glxropcode ("4125") - :alias ("FogCoorddv") :glsalias ("FogCoorddv"))) -(defglextfun - (("FogCoorddEXT" fog-coord-d-ext) :args - ((:name |coord| :type |CoordD| :direction :in)) :return ("void") :category - ("EXT_fog_coord") :vectorequiv ("FogCoorddvEXT") :version ("1.1") :alias - ("FogCoordd") :glsalias ("FogCoordd"))) -(defglextfun - (("FogCoordfvEXT" fog-coord-fv-ext) :args - ((:name |coord| :type |CoordF| :direction :in :array t :size #x1)) :return - ("void") :category ("EXT_fog_coord") :version ("1.1") :glxropcode ("4124") - :alias ("FogCoordfv") :glsalias ("FogCoordfv"))) -(defglextfun - (("FogCoordfEXT" fog-coord-f-ext) :args - ((:name |coord| :type |CoordF| :direction :in)) :return ("void") :category - ("EXT_fog_coord") :vectorequiv ("FogCoordfvEXT") :version ("1.1") :alias - ("FogCoordf") :glsalias ("FogCoordf"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_fog_coord + +(defconstant +fog-coordinate-source-ext+ #x8450) +(defconstant +fog-coordinate-ext+ #x8451) +(defconstant +fragment-depth-ext+ #x8452) +(defconstant +current-fog-coordinate-ext+ #x8453) +(defconstant +fog-coordinate-array-type-ext+ #x8454) +(defconstant +fog-coordinate-array-stride-ext+ #x8455) +(defconstant +fog-coordinate-array-pointer-ext+ #x8456) +(defconstant +fog-coordinate-array-ext+ #x8457) +(defglextfun "FogCoordPointerEXT" fog-coord-pointer-ext :return "void" :args + ((:name |type| :type |FogPointerTypeEXT| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "EXT_fog_coord" :version "1.1") +(defglextfun "FogCoorddvEXT" fog-coord-dv-ext :return "void" :args + ((:name |coord| :type |CoordD| :direction :in :array t :size #x1)) :category + "EXT_fog_coord" :version "1.1") +(defglextfun "FogCoorddEXT" fog-coord-d-ext :return "void" :args + ((:name |coord| :type |CoordD| :direction :in)) :category "EXT_fog_coord" + :version "1.1") +(defglextfun "FogCoordfvEXT" fog-coord-fv-ext :return "void" :args + ((:name |coord| :type |CoordF| :direction :in :array t :size #x1)) :category + "EXT_fog_coord" :version "1.1") +(defglextfun "FogCoordfEXT" fog-coord-f-ext :return "void" :args + ((:name |coord| :type |CoordF| :direction :in)) :category "EXT_fog_coord" + :version "1.1") diff --git a/lib/opengl-ext_framebuffer_blit.lisp b/lib/opengl-ext_framebuffer_blit.lisp dissimilarity index 64% index 67e9ab5..9dad576 100644 --- a/lib/opengl-ext_framebuffer_blit.lisp +++ b/lib/opengl-ext_framebuffer_blit.lisp @@ -1,24 +1,22 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_framebuffer_blit - -(defconstant +read-framebuffer-ext+ #x8CA8) -(defconstant +draw-framebuffer-ext+ #x8CA9) -(defconstant +read-framebuffer-binding-ext+ #x8CA6) -(defconstant +draw-framebuffer-binding-ext+ #x8CAA) -(defglextfun - (("BlitFramebufferEXT" blit-framebuffer-ext) :args - ((:name |srcX0| :type |Int32| :direction :in) - (:name |srcY0| :type |Int32| :direction :in) - (:name |srcX1| :type |Int32| :direction :in) - (:name |srcY1| :type |Int32| :direction :in) - (:name |dstX0| :type |Int32| :direction :in) - (:name |dstY0| :type |Int32| :direction :in) - (:name |dstX1| :type |Int32| :direction :in) - (:name |dstY1| :type |Int32| :direction :in) - (:name |mask| :type |ClearBufferMask| :direction :in) - (:name |filter| :type |GLenum| :direction :in)) - :return ("void") :category ("EXT_framebuffer_blit") :version ("1.5") - :glxropcode ("4330") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_framebuffer_blit + +(defconstant +read-framebuffer-ext+ #x8CA8) +(defconstant +draw-framebuffer-ext+ #x8CA9) +(defconstant +read-framebuffer-binding-ext+ #x8CA6) +(defconstant +draw-framebuffer-binding-ext+ #x8CAA) +(defglextfun "BlitFramebufferEXT" blit-framebuffer-ext :return "void" :args + ((:name |srcX0| :type |Int32| :direction :in) + (:name |srcY0| :type |Int32| :direction :in) + (:name |srcX1| :type |Int32| :direction :in) + (:name |srcY1| :type |Int32| :direction :in) + (:name |dstX0| :type |Int32| :direction :in) + (:name |dstY0| :type |Int32| :direction :in) + (:name |dstX1| :type |Int32| :direction :in) + (:name |dstY1| :type |Int32| :direction :in) + (:name |mask| :type |ClearBufferMask| :direction :in) + (:name |filter| :type |GLenum| :direction :in)) + :category "EXT_framebuffer_blit" :version "1.5") diff --git a/lib/opengl-ext_framebuffer_multisample.lisp b/lib/opengl-ext_framebuffer_multisample.lisp index 528b3ed..3bc39ff 100644 --- a/lib/opengl-ext_framebuffer_multisample.lisp +++ b/lib/opengl-ext_framebuffer_multisample.lisp @@ -7,13 +7,11 @@ (defconstant +renderbuffer-samples-ext+ #x8CAB) (defconstant +framebuffer-incomplete-multisample-ext+ #x8D56) (defconstant +max-samples-ext+ #x8D57) -(defglextfun - (("RenderbufferStorageMultisampleEXT" renderbuffer-storage-multisample-ext) - :args - ((:name |target| :type |GLenum| :direction :in) - (:name |samples| :type |SizeI| :direction :in) - (:name |internalformat| :type |GLenum| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_framebuffer_multisample") :version ("1.5") - :glxropcode ("4331") :glsopcode ("?") :offset ("?"))) +(defglextfun "RenderbufferStorageMultisampleEXT" + renderbuffer-storage-multisample-ext :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |samples| :type |SizeI| :direction :in) + (:name |internalformat| :type |GLenum| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "EXT_framebuffer_multisample" :version "1.5") diff --git a/lib/opengl-ext_framebuffer_object.lisp b/lib/opengl-ext_framebuffer_object.lisp dissimilarity index 71% index c72d84f..a28c81e 100644 --- a/lib/opengl-ext_framebuffer_object.lisp +++ b/lib/opengl-ext_framebuffer_object.lisp @@ -1,188 +1,147 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_framebuffer_object - -(defconstant +invalid-framebuffer-operation-ext+ #x506) -(defconstant +max-renderbuffer-size-ext+ #x84E8) -(defconstant +framebuffer-binding-ext+ #x8CA6) -(defconstant +renderbuffer-binding-ext+ #x8CA7) -(defconstant +framebuffer-attachment-object-type-ext+ #x8CD0) -(defconstant +framebuffer-attachment-object-name-ext+ #x8CD1) -(defconstant +framebuffer-attachment-texture-level-ext+ #x8CD2) -(defconstant +framebuffer-attachment-texture-cube-map-face-ext+ #x8CD3) -(defconstant +framebuffer-attachment-texture-3d-zoffset-ext+ #x8CD4) -(defconstant +framebuffer-complete-ext+ #x8CD5) -(defconstant +framebuffer-incomplete-attachment-ext+ #x8CD6) -(defconstant +framebuffer-incomplete-missing-attachment-ext+ #x8CD7) -(defconstant +framebuffer-incomplete-dimensions-ext+ #x8CD9) -(defconstant +framebuffer-incomplete-formats-ext+ #x8CDA) -(defconstant +framebuffer-incomplete-draw-buffer-ext+ #x8CDB) -(defconstant +framebuffer-incomplete-read-buffer-ext+ #x8CDC) -(defconstant +framebuffer-unsupported-ext+ #x8CDD) -(defconstant +max-color-attachments-ext+ #x8CDF) -(defconstant +color-attachment0-ext+ #x8CE0) -(defconstant +color-attachment1-ext+ #x8CE1) -(defconstant +color-attachment2-ext+ #x8CE2) -(defconstant +color-attachment3-ext+ #x8CE3) -(defconstant +color-attachment4-ext+ #x8CE4) -(defconstant +color-attachment5-ext+ #x8CE5) -(defconstant +color-attachment6-ext+ #x8CE6) -(defconstant +color-attachment7-ext+ #x8CE7) -(defconstant +color-attachment8-ext+ #x8CE8) -(defconstant +color-attachment9-ext+ #x8CE9) -(defconstant +color-attachment10-ext+ #x8CEA) -(defconstant +color-attachment11-ext+ #x8CEB) -(defconstant +color-attachment12-ext+ #x8CEC) -(defconstant +color-attachment13-ext+ #x8CED) -(defconstant +color-attachment14-ext+ #x8CEE) -(defconstant +color-attachment15-ext+ #x8CEF) -(defconstant +depth-attachment-ext+ #x8D00) -(defconstant +stencil-attachment-ext+ #x8D20) -(defconstant +framebuffer-ext+ #x8D40) -(defconstant +renderbuffer-ext+ #x8D41) -(defconstant +renderbuffer-width-ext+ #x8D42) -(defconstant +renderbuffer-height-ext+ #x8D43) -(defconstant +renderbuffer-internal-format-ext+ #x8D44) -(defconstant +stencil-index1-ext+ #x8D46) -(defconstant +stencil-index4-ext+ #x8D47) -(defconstant +stencil-index8-ext+ #x8D48) -(defconstant +stencil-index16-ext+ #x8D49) -(defconstant +renderbuffer-red-size-ext+ #x8D50) -(defconstant +renderbuffer-green-size-ext+ #x8D51) -(defconstant +renderbuffer-blue-size-ext+ #x8D52) -(defconstant +renderbuffer-alpha-size-ext+ #x8D53) -(defconstant +renderbuffer-depth-size-ext+ #x8D54) -(defconstant +renderbuffer-stencil-size-ext+ #x8D55) -(defglextfun - (("GenerateMipmapEXT" generate-mipmap-ext) :args - ((:name |target| :type |GLenum| :direction :in)) :return ("void") :category - ("EXT_framebuffer_object") :version ("1.2") :extension nil :glxropcode - ("4325") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GetFramebufferAttachmentParameterivEXT" - get-framebuffer-attachment-parameter-iv-ext) - :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_framebuffer_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxvendorpriv ("1428") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("FramebufferRenderbufferEXT" framebuffer-renderbuffer-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |renderbuffertarget| :type |RenderbufferTarget| :direction :in) - (:name |renderbuffer| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4324") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("FramebufferTexture3DEXT" framebuffer-texture-3d-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |textarget| :type |GLenum| :direction :in) - (:name |texture| :type |UInt32| :direction :in) - (:name |level| :type |Int32| :direction :in) - (:name |zoffset| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4323") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("FramebufferTexture2DEXT" framebuffer-texture-2d-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |textarget| :type |GLenum| :direction :in) - (:name |texture| :type |UInt32| :direction :in) - (:name |level| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4322") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("FramebufferTexture1DEXT" framebuffer-texture-1d-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |textarget| :type |GLenum| :direction :in) - (:name |texture| :type |UInt32| :direction :in) - (:name |level| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4321") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("CheckFramebufferStatusEXT" check-framebuffer-status-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in)) :return - ("GLenum") :category ("EXT_framebuffer_object") :version ("1.2") :extension - nil :glxvendorpriv ("1427") :glxflags ("ignore") :glsopcode ("?") :offset - ("?"))) -(defglextfun - (("GenFramebuffersEXT" gen-framebuffers-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |framebuffers| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxvendorpriv ("1426") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("DeleteFramebuffersEXT" delete-framebuffers-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |framebuffers| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4320") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("BindFramebufferEXT" bind-framebuffer-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |framebuffer| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4319") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("IsFramebufferEXT" is-framebuffer-ext) :args - ((:name |framebuffer| :type |UInt32| :direction :in)) :return ("Boolean") - :category ("EXT_framebuffer_object") :version ("1.2") :extension nil - :glxvendorpriv ("1425") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GetRenderbufferParameterivEXT" get-renderbuffer-parameter-iv-ext) :args - ((:name |target| :type |RenderbufferTarget| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_framebuffer_object") :dlflags - ("notlistable") :version ("1.2") :extension nil :glxvendorpriv ("1424") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("RenderbufferStorageEXT" renderbuffer-storage-ext) :args - ((:name |target| :type |RenderbufferTarget| :direction :in) - (:name |internalformat| :type |GLenum| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4318") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("GenRenderbuffersEXT" gen-renderbuffers-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |renderbuffers| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxvendorpriv ("1423") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("DeleteRenderbuffersEXT" delete-renderbuffers-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |renderbuffers| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4317") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("BindRenderbufferEXT" bind-renderbuffer-ext) :args - ((:name |target| :type |RenderbufferTarget| :direction :in) - (:name |renderbuffer| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_framebuffer_object") :version ("1.2") - :extension nil :glxropcode ("4316") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) -(defglextfun - (("IsRenderbufferEXT" is-renderbuffer-ext) :args - ((:name |renderbuffer| :type |UInt32| :direction :in)) :return ("Boolean") - :category ("EXT_framebuffer_object") :version ("1.2") :extension nil - :glxvendorpriv ("1422") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_framebuffer_object + +(defconstant +invalid-framebuffer-operation-ext+ #x506) +(defconstant +max-renderbuffer-size-ext+ #x84E8) +(defconstant +framebuffer-binding-ext+ #x8CA6) +(defconstant +renderbuffer-binding-ext+ #x8CA7) +(defconstant +framebuffer-attachment-object-type-ext+ #x8CD0) +(defconstant +framebuffer-attachment-object-name-ext+ #x8CD1) +(defconstant +framebuffer-attachment-texture-level-ext+ #x8CD2) +(defconstant +framebuffer-attachment-texture-cube-map-face-ext+ #x8CD3) +(defconstant +framebuffer-attachment-texture-3d-zoffset-ext+ #x8CD4) +(defconstant +framebuffer-complete-ext+ #x8CD5) +(defconstant +framebuffer-incomplete-attachment-ext+ #x8CD6) +(defconstant +framebuffer-incomplete-missing-attachment-ext+ #x8CD7) +(defconstant +framebuffer-incomplete-dimensions-ext+ #x8CD9) +(defconstant +framebuffer-incomplete-formats-ext+ #x8CDA) +(defconstant +framebuffer-incomplete-draw-buffer-ext+ #x8CDB) +(defconstant +framebuffer-incomplete-read-buffer-ext+ #x8CDC) +(defconstant +framebuffer-unsupported-ext+ #x8CDD) +(defconstant +max-color-attachments-ext+ #x8CDF) +(defconstant +color-attachment0-ext+ #x8CE0) +(defconstant +color-attachment1-ext+ #x8CE1) +(defconstant +color-attachment2-ext+ #x8CE2) +(defconstant +color-attachment3-ext+ #x8CE3) +(defconstant +color-attachment4-ext+ #x8CE4) +(defconstant +color-attachment5-ext+ #x8CE5) +(defconstant +color-attachment6-ext+ #x8CE6) +(defconstant +color-attachment7-ext+ #x8CE7) +(defconstant +color-attachment8-ext+ #x8CE8) +(defconstant +color-attachment9-ext+ #x8CE9) +(defconstant +color-attachment10-ext+ #x8CEA) +(defconstant +color-attachment11-ext+ #x8CEB) +(defconstant +color-attachment12-ext+ #x8CEC) +(defconstant +color-attachment13-ext+ #x8CED) +(defconstant +color-attachment14-ext+ #x8CEE) +(defconstant +color-attachment15-ext+ #x8CEF) +(defconstant +depth-attachment-ext+ #x8D00) +(defconstant +stencil-attachment-ext+ #x8D20) +(defconstant +framebuffer-ext+ #x8D40) +(defconstant +renderbuffer-ext+ #x8D41) +(defconstant +renderbuffer-width-ext+ #x8D42) +(defconstant +renderbuffer-height-ext+ #x8D43) +(defconstant +renderbuffer-internal-format-ext+ #x8D44) +(defconstant +stencil-index1-ext+ #x8D46) +(defconstant +stencil-index4-ext+ #x8D47) +(defconstant +stencil-index8-ext+ #x8D48) +(defconstant +stencil-index16-ext+ #x8D49) +(defconstant +renderbuffer-red-size-ext+ #x8D50) +(defconstant +renderbuffer-green-size-ext+ #x8D51) +(defconstant +renderbuffer-blue-size-ext+ #x8D52) +(defconstant +renderbuffer-alpha-size-ext+ #x8D53) +(defconstant +renderbuffer-depth-size-ext+ #x8D54) +(defconstant +renderbuffer-stencil-size-ext+ #x8D55) +(defglextfun "GenerateMipmapEXT" generate-mipmap-ext :return "void" :args + ((:name |target| :type |GLenum| :direction :in)) :category + "EXT_framebuffer_object" :version "1.2") +(defglextfun "GetFramebufferAttachmentParameterivEXT" + get-framebuffer-attachment-parameter-iv-ext :return "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "FramebufferRenderbufferEXT" framebuffer-renderbuffer-ext :return + "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |renderbuffertarget| :type |RenderbufferTarget| :direction :in) + (:name |renderbuffer| :type |UInt32| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "FramebufferTexture3DEXT" framebuffer-texture-3d-ext :return + "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |textarget| :type |GLenum| :direction :in) + (:name |texture| :type |UInt32| :direction :in) + (:name |level| :type |Int32| :direction :in) + (:name |zoffset| :type |Int32| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "FramebufferTexture2DEXT" framebuffer-texture-2d-ext :return + "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |textarget| :type |GLenum| :direction :in) + (:name |texture| :type |UInt32| :direction :in) + (:name |level| :type |Int32| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "FramebufferTexture1DEXT" framebuffer-texture-1d-ext :return + "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |textarget| :type |GLenum| :direction :in) + (:name |texture| :type |UInt32| :direction :in) + (:name |level| :type |Int32| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "CheckFramebufferStatusEXT" check-framebuffer-status-ext :return + "GLenum" :args ((:name |target| :type |FramebufferTarget| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "GenFramebuffersEXT" gen-framebuffers-ext :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |framebuffers| :type |UInt32| :direction :out :array t :size n)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "DeleteFramebuffersEXT" delete-framebuffers-ext :return "void" + :args + ((:name |n| :type |SizeI| :direction :in) + (:name |framebuffers| :type |UInt32| :direction :in :array t :size n)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "BindFramebufferEXT" bind-framebuffer-ext :return "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |framebuffer| :type |UInt32| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "IsFramebufferEXT" is-framebuffer-ext :return "Boolean" :args + ((:name |framebuffer| :type |UInt32| :direction :in)) :category + "EXT_framebuffer_object" :version "1.2") +(defglextfun "GetRenderbufferParameterivEXT" get-renderbuffer-parameter-iv-ext + :return "void" :args + ((:name |target| :type |RenderbufferTarget| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "RenderbufferStorageEXT" renderbuffer-storage-ext :return "void" + :args + ((:name |target| :type |RenderbufferTarget| :direction :in) + (:name |internalformat| :type |GLenum| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "GenRenderbuffersEXT" gen-renderbuffers-ext :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |renderbuffers| :type |UInt32| :direction :out :array t :size n)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "DeleteRenderbuffersEXT" delete-renderbuffers-ext :return "void" + :args + ((:name |n| :type |SizeI| :direction :in) + (:name |renderbuffers| :type |UInt32| :direction :in :array t :size n)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "BindRenderbufferEXT" bind-renderbuffer-ext :return "void" :args + ((:name |target| :type |RenderbufferTarget| :direction :in) + (:name |renderbuffer| :type |UInt32| :direction :in)) + :category "EXT_framebuffer_object" :version "1.2") +(defglextfun "IsRenderbufferEXT" is-renderbuffer-ext :return "Boolean" :args + ((:name |renderbuffer| :type |UInt32| :direction :in)) :category + "EXT_framebuffer_object" :version "1.2") diff --git a/lib/opengl-ext_geometry_shader4.lisp b/lib/opengl-ext_geometry_shader4.lisp index e4bbc29..13d7e95 100644 --- a/lib/opengl-ext_geometry_shader4.lisp +++ b/lib/opengl-ext_geometry_shader4.lisp @@ -23,11 +23,9 @@ (defconstant +framebuffer-incomplete-layer-count-ext+ #x8DA9) (defconstant +framebuffer-attachment-layered-ext+ #x8DA7) (defconstant +program-point-size-ext+ #x8642) -(defglextfun - (("ProgramParameteriEXT" program-parameter-i-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |pname| :type |ProgramParameterPName| :direction :in) - (:name |value| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_geometry_shader4") :version ("2.0") - :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") - :glxflags ("ignore"))) +(defglextfun "ProgramParameteriEXT" program-parameter-i-ext :return "void" + :args + ((:name |program| :type |UInt32| :direction :in) + (:name |pname| :type |ProgramParameterPName| :direction :in) + (:name |value| :type |Int32| :direction :in)) + :category "EXT_geometry_shader4" :version "2.0") diff --git a/lib/opengl-ext_gpu_program_parameters.lisp b/lib/opengl-ext_gpu_program_parameters.lisp dissimilarity index 83% index b72e785..3dd09af 100644 --- a/lib/opengl-ext_gpu_program_parameters.lisp +++ b/lib/opengl-ext_gpu_program_parameters.lisp @@ -1,22 +1,20 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_gpu_program_parameters - -(defglextfun - (("ProgramLocalParameters4fvEXT" program-local-parameters-4fv-ext) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size count*4)) - :return ("void") :category ("EXT_gpu_program_parameters") :version ("1.2") - :glxropcode ("4282") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("ProgramEnvParameters4fvEXT" program-env-parameters-4fv-ext) :args - ((:name |target| :type |ProgramTargetARB| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size count*4)) - :return ("void") :category ("EXT_gpu_program_parameters") :version ("1.2") - :glxropcode ("4281") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_gpu_program_parameters + +(defglextfun "ProgramLocalParameters4fvEXT" program-local-parameters-4fv-ext + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size count*4)) + :category "EXT_gpu_program_parameters" :version "1.2") +(defglextfun "ProgramEnvParameters4fvEXT" program-env-parameters-4fv-ext + :return "void" :args + ((:name |target| :type |ProgramTargetARB| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size count*4)) + :category "EXT_gpu_program_parameters" :version "1.2") diff --git a/lib/opengl-ext_gpu_shader4.lisp b/lib/opengl-ext_gpu_shader4.lisp dissimilarity index 75% index 3fb8920..dbe956d 100644 --- a/lib/opengl-ext_gpu_shader4.lisp +++ b/lib/opengl-ext_gpu_shader4.lisp @@ -1,121 +1,90 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_gpu_shader4 - -(defconstant +sampler-1d-array-ext+ #x8DC0) -(defconstant +sampler-2d-array-ext+ #x8DC1) -(defconstant +sampler-buffer-ext+ #x8DC2) -(defconstant +sampler-1d-array-shadow-ext+ #x8DC3) -(defconstant +sampler-2d-array-shadow-ext+ #x8DC4) -(defconstant +sampler-cube-shadow-ext+ #x8DC5) -(defconstant +unsigned-int-vec2-ext+ #x8DC6) -(defconstant +unsigned-int-vec3-ext+ #x8DC7) -(defconstant +unsigned-int-vec4-ext+ #x8DC8) -(defconstant +int-sampler-1d-ext+ #x8DC9) -(defconstant +int-sampler-2d-ext+ #x8DCA) -(defconstant +int-sampler-3d-ext+ #x8DCB) -(defconstant +int-sampler-cube-ext+ #x8DCC) -(defconstant +int-sampler-2d-rect-ext+ #x8DCD) -(defconstant +int-sampler-1d-array-ext+ #x8DCE) -(defconstant +int-sampler-2d-array-ext+ #x8DCF) -(defconstant +int-sampler-buffer-ext+ #x8DD0) -(defconstant +unsigned-int-sampler-1d-ext+ #x8DD1) -(defconstant +unsigned-int-sampler-2d-ext+ #x8DD2) -(defconstant +unsigned-int-sampler-3d-ext+ #x8DD3) -(defconstant +unsigned-int-sampler-cube-ext+ #x8DD4) -(defconstant +unsigned-int-sampler-2d-rect-ext+ #x8DD5) -(defconstant +unsigned-int-sampler-1d-array-ext+ #x8DD6) -(defconstant +unsigned-int-sampler-2d-array-ext+ #x8DD7) -(defconstant +unsigned-int-sampler-buffer-ext+ #x8DD8) -(defglextfun - (("Uniform4uivEXT" uniform-4uiv-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |UInt32| :direction :in :array t :size count*4)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform3uivEXT" uniform-3uiv-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |UInt32| :direction :in :array t :size count*3)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform2uivEXT" uniform-2uiv-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |UInt32| :direction :in :array t :size count*2)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform1uivEXT" uniform-1uiv-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |UInt32| :direction :in :array t :size count)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform4uiEXT" uniform-4ui-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |UInt32| :direction :in) - (:name |v1| :type |UInt32| :direction :in) - (:name |v2| :type |UInt32| :direction :in) - (:name |v3| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform3uiEXT" uniform-3ui-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |UInt32| :direction :in) - (:name |v1| :type |UInt32| :direction :in) - (:name |v2| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform2uiEXT" uniform-2ui-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |UInt32| :direction :in) - (:name |v1| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("Uniform1uiEXT" uniform-1ui-ext) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_gpu_shader4") :version ("2.0") :extension - ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("GetFragDataLocationEXT" get-frag-data-location-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t :size (|name|))) - :return ("Int32") :category ("EXT_gpu_shader4") :dlflags ("notlistable") - :version ("2.0") :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("BindFragDataLocationEXT" bind-frag-data-location-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |color| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t :size (|name|))) - :return ("void") :category ("EXT_gpu_shader4") :dlflags ("notlistable") - :version ("2.0") :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetUniformuivEXT" get-uniform-uiv-ext) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size - (|program| |location|))) - :return ("void") :category ("EXT_gpu_shader4") :dlflags ("notlistable") - :version ("2.0") :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_gpu_shader4 + +(defconstant +sampler-1d-array-ext+ #x8DC0) +(defconstant +sampler-2d-array-ext+ #x8DC1) +(defconstant +sampler-buffer-ext+ #x8DC2) +(defconstant +sampler-1d-array-shadow-ext+ #x8DC3) +(defconstant +sampler-2d-array-shadow-ext+ #x8DC4) +(defconstant +sampler-cube-shadow-ext+ #x8DC5) +(defconstant +unsigned-int-vec2-ext+ #x8DC6) +(defconstant +unsigned-int-vec3-ext+ #x8DC7) +(defconstant +unsigned-int-vec4-ext+ #x8DC8) +(defconstant +int-sampler-1d-ext+ #x8DC9) +(defconstant +int-sampler-2d-ext+ #x8DCA) +(defconstant +int-sampler-3d-ext+ #x8DCB) +(defconstant +int-sampler-cube-ext+ #x8DCC) +(defconstant +int-sampler-2d-rect-ext+ #x8DCD) +(defconstant +int-sampler-1d-array-ext+ #x8DCE) +(defconstant +int-sampler-2d-array-ext+ #x8DCF) +(defconstant +int-sampler-buffer-ext+ #x8DD0) +(defconstant +unsigned-int-sampler-1d-ext+ #x8DD1) +(defconstant +unsigned-int-sampler-2d-ext+ #x8DD2) +(defconstant +unsigned-int-sampler-3d-ext+ #x8DD3) +(defconstant +unsigned-int-sampler-cube-ext+ #x8DD4) +(defconstant +unsigned-int-sampler-2d-rect-ext+ #x8DD5) +(defconstant +unsigned-int-sampler-1d-array-ext+ #x8DD6) +(defconstant +unsigned-int-sampler-2d-array-ext+ #x8DD7) +(defconstant +unsigned-int-sampler-buffer-ext+ #x8DD8) +(defglextfun "Uniform4uivEXT" uniform-4uiv-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |UInt32| :direction :in :array t :size count*4)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform3uivEXT" uniform-3uiv-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |UInt32| :direction :in :array t :size count*3)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform2uivEXT" uniform-2uiv-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |UInt32| :direction :in :array t :size count*2)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform1uivEXT" uniform-1uiv-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |UInt32| :direction :in :array t :size count)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform4uiEXT" uniform-4ui-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |UInt32| :direction :in) + (:name |v1| :type |UInt32| :direction :in) + (:name |v2| :type |UInt32| :direction :in) + (:name |v3| :type |UInt32| :direction :in)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform3uiEXT" uniform-3ui-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |UInt32| :direction :in) + (:name |v1| :type |UInt32| :direction :in) + (:name |v2| :type |UInt32| :direction :in)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform2uiEXT" uniform-2ui-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |UInt32| :direction :in) + (:name |v1| :type |UInt32| :direction :in)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "Uniform1uiEXT" uniform-1ui-ext :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |UInt32| :direction :in)) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "GetFragDataLocationEXT" get-frag-data-location-ext :return + "Int32" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t :size (|name|))) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "BindFragDataLocationEXT" bind-frag-data-location-ext :return + "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |color| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t :size (|name|))) + :category "EXT_gpu_shader4" :version "2.0") +(defglextfun "GetUniformuivEXT" get-uniform-uiv-ext :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size + (|program| |location|))) + :category "EXT_gpu_shader4" :version "2.0") diff --git a/lib/opengl-ext_histogram.lisp b/lib/opengl-ext_histogram.lisp dissimilarity index 96% index 47b7bd5..65a188d 100644 --- a/lib/opengl-ext_histogram.lisp +++ b/lib/opengl-ext_histogram.lisp @@ -1,90 +1,63 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_histogram - -(defglextfun - (("ResetMinmaxEXT" reset-minmax-ext) :args - ((:name |target| :type |MinmaxTargetEXT| :direction :in)) :return ("void") - :category ("EXT_histogram") :version ("1.0") :glxropcode ("4113") :glxflags - ("EXT") :extension nil :alias ("ResetMinmax") :glsalias ("ResetMinmax"))) -(defglextfun - (("ResetHistogramEXT" reset-histogram-ext) :args - ((:name |target| :type |HistogramTargetEXT| :direction :in)) :return ("void") - :category ("EXT_histogram") :version ("1.0") :glxropcode ("4112") :glxflags - ("EXT") :extension nil :alias ("ResetHistogram") :glsalias - ("ResetHistogram"))) -(defglextfun - (("MinmaxEXT" minmax-ext) :args - ((:name |target| :type |MinmaxTargetEXT| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |sink| :type |Boolean| :direction :in)) - :return ("void") :category ("EXT_histogram") :version ("1.0") :glxropcode - ("4111") :glxflags ("EXT") :extension nil :alias ("Minmax") :glsalias - ("Minmax"))) -(defglextfun - (("HistogramEXT" histogram-ext) :args - ((:name |target| :type |HistogramTargetEXT| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |sink| :type |Boolean| :direction :in)) - :return ("void") :category ("EXT_histogram") :version ("1.0") :glxropcode - ("4110") :glxflags ("EXT") :extension nil :alias ("Histogram") :glsalias - ("Histogram"))) -(defglextfun - (("GetMinmaxParameterivEXT" get-minmax-parameter-iv-ext) :args - ((:name |target| :type |MinmaxTargetEXT| :direction :in) - (:name |pname| :type |GetMinmaxParameterPNameEXT| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_histogram") :dlflags ("notlistable") - :version ("1.0") :glxvendorpriv ("10") :glxflags ("EXT") :extension nil - :glsflags ("get") :glsopcode ("0x0137") :offset ("422"))) -(defglextfun - (("GetMinmaxParameterfvEXT" get-minmax-parameter-fv-ext) :args - ((:name |target| :type |MinmaxTargetEXT| :direction :in) - (:name |pname| :type |GetMinmaxParameterPNameEXT| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_histogram") :dlflags ("notlistable") - :version ("1.0") :glxvendorpriv ("9") :glxflags ("EXT") :extension nil - :glsflags ("get") :glsopcode ("0x0136") :offset ("421"))) -(defglextfun - (("GetMinmaxEXT" get-minmax-ext) :args - ((:name |target| :type |MinmaxTargetEXT| :direction :in) - (:name |reset| :type |Boolean| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |values| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("EXT_histogram") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxvendorpriv ("8") :extension nil :glsflags ("get" "pixel-pack") :glsopcode - ("0x0135") :offset ("420"))) -(defglextfun - (("GetHistogramParameterivEXT" get-histogram-parameter-iv-ext) :args - ((:name |target| :type |HistogramTargetEXT| :direction :in) - (:name |pname| :type |GetHistogramParameterPNameEXT| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_histogram") :dlflags ("notlistable") - :version ("1.0") :glxvendorpriv ("7") :glxflags ("EXT") :extension nil - :glsflags ("get") :glsopcode ("0x0134") :offset ("419"))) -(defglextfun - (("GetHistogramParameterfvEXT" get-histogram-parameter-fv-ext) :args - ((:name |target| :type |HistogramTargetEXT| :direction :in) - (:name |pname| :type |GetHistogramParameterPNameEXT| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_histogram") :dlflags ("notlistable") - :version ("1.0") :glxvendorpriv ("6") :glxflags ("EXT") :extension nil - :glsflags ("get") :glsopcode ("0x0133") :offset ("418"))) -(defglextfun - (("GetHistogramEXT" get-histogram-ext) :args - ((:name |target| :type |HistogramTargetEXT| :direction :in) - (:name |reset| :type |Boolean| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |values| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("EXT_histogram") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxvendorpriv ("5") :extension nil :glsflags ("get" "pixel-pack") :glsopcode - ("0x0132") :offset ("417"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_histogram + +(defglextfun "ResetMinmaxEXT" reset-minmax-ext :return "void" :args + ((:name |target| :type |MinmaxTargetEXT| :direction :in)) :category + "EXT_histogram" :version "1.0") +(defglextfun "ResetHistogramEXT" reset-histogram-ext :return "void" :args + ((:name |target| :type |HistogramTargetEXT| :direction :in)) :category + "EXT_histogram" :version "1.0") +(defglextfun "MinmaxEXT" minmax-ext :return "void" :args + ((:name |target| :type |MinmaxTargetEXT| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |sink| :type |Boolean| :direction :in)) + :category "EXT_histogram" :version "1.0") +(defglextfun "HistogramEXT" histogram-ext :return "void" :args + ((:name |target| :type |HistogramTargetEXT| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |sink| :type |Boolean| :direction :in)) + :category "EXT_histogram" :version "1.0") +(defglextfun "GetMinmaxParameterivEXT" get-minmax-parameter-iv-ext :return + "void" :args + ((:name |target| :type |MinmaxTargetEXT| :direction :in) + (:name |pname| :type |GetMinmaxParameterPNameEXT| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_histogram" :version "1.0") +(defglextfun "GetMinmaxParameterfvEXT" get-minmax-parameter-fv-ext :return + "void" :args + ((:name |target| :type |MinmaxTargetEXT| :direction :in) + (:name |pname| :type |GetMinmaxParameterPNameEXT| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "EXT_histogram" :version "1.0") +(defglextfun "GetMinmaxEXT" get-minmax-ext :return "void" :args + ((:name |target| :type |MinmaxTargetEXT| :direction :in) + (:name |reset| :type |Boolean| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |values| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "EXT_histogram" :version "1.0") +(defglextfun "GetHistogramParameterivEXT" get-histogram-parameter-iv-ext + :return "void" :args + ((:name |target| :type |HistogramTargetEXT| :direction :in) + (:name |pname| :type |GetHistogramParameterPNameEXT| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_histogram" :version "1.0") +(defglextfun "GetHistogramParameterfvEXT" get-histogram-parameter-fv-ext + :return "void" :args + ((:name |target| :type |HistogramTargetEXT| :direction :in) + (:name |pname| :type |GetHistogramParameterPNameEXT| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "EXT_histogram" :version "1.0") +(defglextfun "GetHistogramEXT" get-histogram-ext :return "void" :args + ((:name |target| :type |HistogramTargetEXT| :direction :in) + (:name |reset| :type |Boolean| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |values| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "EXT_histogram" :version "1.0") diff --git a/lib/opengl-ext_index_func.lisp b/lib/opengl-ext_index_func.lisp index 32023b9..88f728f 100644 --- a/lib/opengl-ext_index_func.lisp +++ b/lib/opengl-ext_index_func.lisp @@ -7,9 +7,7 @@ (defconstant +index-test-ext+ #x81B5) (defconstant +index-test-func-ext+ #x81B6) (defconstant +index-test-ref-ext+ #x81B7) -(defglextfun - (("IndexFuncEXT" index-func-ext) :args - ((:name |func| :type |IndexFunctionEXT| :direction :in) - (:name |ref| :type |ClampedFloat32| :direction :in)) - :return ("void") :category ("EXT_index_func") :version ("1.1") :extension - ("soft") :glxflags ("ignore") :glsopcode ("0x01D2") :offset ("539"))) +(defglextfun "IndexFuncEXT" index-func-ext :return "void" :args + ((:name |func| :type |IndexFunctionEXT| :direction :in) + (:name |ref| :type |ClampedFloat32| :direction :in)) + :category "EXT_index_func" :version "1.1") diff --git a/lib/opengl-ext_index_material.lisp b/lib/opengl-ext_index_material.lisp index d339286..87d45d0 100644 --- a/lib/opengl-ext_index_material.lisp +++ b/lib/opengl-ext_index_material.lisp @@ -7,9 +7,7 @@ (defconstant +index-material-ext+ #x81B8) (defconstant +index-material-parameter-ext+ #x81B9) (defconstant +index-material-face-ext+ #x81BA) -(defglextfun - (("IndexMaterialEXT" index-material-ext) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |mode| :type |IndexMaterialParameterEXT| :direction :in)) - :return ("void") :category ("EXT_index_material") :version ("1.1") :extension - ("soft") :glxflags ("ignore") :glsopcode ("0x01D1") :offset ("538"))) +(defglextfun "IndexMaterialEXT" index-material-ext :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |mode| :type |IndexMaterialParameterEXT| :direction :in)) + :category "EXT_index_material" :version "1.1") diff --git a/lib/opengl-ext_light_texture.lisp b/lib/opengl-ext_light_texture.lisp index 0d3c88c..40ba568 100644 --- a/lib/opengl-ext_light_texture.lisp +++ b/lib/opengl-ext_light_texture.lisp @@ -14,19 +14,13 @@ (defconstant +texture-material-face-ext+ #x8351) (defconstant +texture-material-parameter-ext+ #x8352) (defconstant +fragment-depth-ext+ #x8452) -(defglextfun - (("TextureMaterialEXT" texture-material-ext) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |mode| :type |MaterialParameter| :direction :in)) - :return ("void") :category ("EXT_light_texture") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TextureLightEXT" texture-light-ext) :args - ((:name |pname| :type |LightTexturePNameEXT| :direction :in)) :return - ("void") :category ("EXT_light_texture") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ApplyTextureEXT" apply-texture-ext) :args - ((:name |mode| :type |LightTextureModeEXT| :direction :in)) :return ("void") - :category ("EXT_light_texture") :version ("1.1") :glxropcode ("?") :glsflags - ("ignore") :offset ("?"))) +(defglextfun "TextureMaterialEXT" texture-material-ext :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |mode| :type |MaterialParameter| :direction :in)) + :category "EXT_light_texture" :version "1.1") +(defglextfun "TextureLightEXT" texture-light-ext :return "void" :args + ((:name |pname| :type |LightTexturePNameEXT| :direction :in)) :category + "EXT_light_texture" :version "1.1") +(defglextfun "ApplyTextureEXT" apply-texture-ext :return "void" :args + ((:name |mode| :type |LightTextureModeEXT| :direction :in)) :category + "EXT_light_texture" :version "1.1") diff --git a/lib/opengl-ext_multi_draw_arrays.lisp b/lib/opengl-ext_multi_draw_arrays.lisp dissimilarity index 84% index 0f7a2b6..54c66dc 100644 --- a/lib/opengl-ext_multi_draw_arrays.lisp +++ b/lib/opengl-ext_multi_draw_arrays.lisp @@ -1,25 +1,21 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_multi_draw_arrays - -(defglextfun - (("MultiDrawElementsEXT" multi-draw-elements-ext) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |VoidPointer| :direction :in :array t :size - (|primcount|)) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_multi_draw_arrays") :version ("1.1") - :glxropcode ("?") :alias ("MultiDrawElements") :glsalias - ("MultiDrawElements"))) -(defglextfun - (("MultiDrawArraysEXT" multi-draw-arrays-ext) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :out :array t :size (|primcount|)) - (:name |count| :type |SizeI| :direction :out :array t :size (|primcount|)) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_multi_draw_arrays") :version ("1.1") - :glxropcode ("?") :alias ("MultiDrawArrays") :glsalias ("MultiDrawArrays"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_multi_draw_arrays + +(defglextfun "MultiDrawElementsEXT" multi-draw-elements-ext :return "void" + :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |VoidPointer| :direction :in :array t :size + (|primcount|)) + (:name |primcount| :type |SizeI| :direction :in)) + :category "EXT_multi_draw_arrays" :version "1.1") +(defglextfun "MultiDrawArraysEXT" multi-draw-arrays-ext :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :out :array t :size (|primcount|)) + (:name |count| :type |SizeI| :direction :out :array t :size (|primcount|)) + (:name |primcount| :type |SizeI| :direction :in)) + :category "EXT_multi_draw_arrays" :version "1.1") diff --git a/lib/opengl-ext_multisample.lisp b/lib/opengl-ext_multisample.lisp index a01e8b5..086c451 100644 --- a/lib/opengl-ext_multisample.lisp +++ b/lib/opengl-ext_multisample.lisp @@ -21,14 +21,10 @@ (defconstant +sample-mask-invert-ext+ #x80AB) (defconstant +sample-pattern-ext+ #x80AC) (defconstant +multisample-bit-ext+ #x20000000) -(defglextfun - (("SamplePatternEXT" sample-pattern-ext) :args - ((:name |pattern| :type |SamplePatternEXT| :direction :in)) :return ("void") - :category ("EXT_multisample") :version ("1.0") :glxropcode ("?") :glxflags - nil :extension nil :glsopcode ("0x0161") :offset ("447"))) -(defglextfun - (("SampleMaskEXT" sample-mask-ext) :args - ((:name |value| :type |ClampedFloat32| :direction :in) - (:name |invert| :type |Boolean| :direction :in)) - :return ("void") :category ("EXT_multisample") :version ("1.0") :glxropcode - ("?") :extension nil :glsopcode ("0x0160") :offset ("446"))) +(defglextfun "SamplePatternEXT" sample-pattern-ext :return "void" :args + ((:name |pattern| :type |SamplePatternEXT| :direction :in)) :category + "EXT_multisample" :version "1.0") +(defglextfun "SampleMaskEXT" sample-mask-ext :return "void" :args + ((:name |value| :type |ClampedFloat32| :direction :in) + (:name |invert| :type |Boolean| :direction :in)) + :category "EXT_multisample" :version "1.0") diff --git a/lib/opengl-ext_paletted_texture.lisp b/lib/opengl-ext_paletted_texture.lisp dissimilarity index 79% index 95982d7..444542d 100644 --- a/lib/opengl-ext_paletted_texture.lisp +++ b/lib/opengl-ext_paletted_texture.lisp @@ -1,47 +1,41 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_paletted_texture - -(defconstant +color-index1-ext+ #x80E2) -(defconstant +color-index2-ext+ #x80E3) -(defconstant +color-index4-ext+ #x80E4) -(defconstant +color-index8-ext+ #x80E5) -(defconstant +color-index12-ext+ #x80E6) -(defconstant +color-index16-ext+ #x80E7) -(defconstant +texture-index-size-ext+ #x80ED) -(defglextfun - (("GetColorTableParameterfvEXT" get-color-table-parameter-fv-ext) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |pname| :type |GetColorTableParameterPName| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_paletted_texture") :version ("1.1") :offset - ("552") :glsalias ("GetColorTableParameterfv"))) -(defglextfun - (("GetColorTableParameterivEXT" get-color-table-parameter-iv-ext) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |pname| :type |GetColorTableParameterPName| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_paletted_texture") :version ("1.1") :offset - ("551") :glsalias ("GetColorTableParameteriv"))) -(defglextfun - (("GetColorTableEXT" get-color-table-ext) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |data| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("EXT_paletted_texture") :version ("1.1") :offset - ("550") :glsalias ("GetColorTable"))) -(defglextfun - (("ColorTableEXT" color-table-ext) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |internalFormat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |table| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("EXT_paletted_texture") :version ("1.1") :alias - ("ColorTable") :glsalias ("ColorTable"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_paletted_texture + +(defconstant +color-index1-ext+ #x80E2) +(defconstant +color-index2-ext+ #x80E3) +(defconstant +color-index4-ext+ #x80E4) +(defconstant +color-index8-ext+ #x80E5) +(defconstant +color-index12-ext+ #x80E6) +(defconstant +color-index16-ext+ #x80E7) +(defconstant +texture-index-size-ext+ #x80ED) +(defglextfun "GetColorTableParameterfvEXT" get-color-table-parameter-fv-ext + :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |pname| :type |GetColorTableParameterPName| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "EXT_paletted_texture" :version "1.1") +(defglextfun "GetColorTableParameterivEXT" get-color-table-parameter-iv-ext + :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |pname| :type |GetColorTableParameterPName| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_paletted_texture" :version "1.1") +(defglextfun "GetColorTableEXT" get-color-table-ext :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |data| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "EXT_paletted_texture" :version "1.1") +(defglextfun "ColorTableEXT" color-table-ext :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |internalFormat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |table| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "EXT_paletted_texture" :version "1.1") diff --git a/lib/opengl-ext_pixel_transform.lisp b/lib/opengl-ext_pixel_transform.lisp dissimilarity index 61% index 20f2d48..aa3c071 100644 --- a/lib/opengl-ext_pixel_transform.lisp +++ b/lib/opengl-ext_pixel_transform.lisp @@ -1,52 +1,48 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_pixel_transform - -(defconstant +pixel-transform-2d-ext+ #x8330) -(defconstant +pixel-mag-filter-ext+ #x8331) -(defconstant +pixel-min-filter-ext+ #x8332) -(defconstant +pixel-cubic-weight-ext+ #x8333) -(defconstant +cubic-ext+ #x8334) -(defconstant +average-ext+ #x8335) -(defconstant +pixel-transform-2d-stack-depth-ext+ #x8336) -(defconstant +max-pixel-transform-2d-stack-depth-ext+ #x8337) -(defconstant +pixel-transform-2d-matrix-ext+ #x8338) -(defconstant +pixel-transform-2d-ext+ #x8330) -(defconstant +pixel-mag-filter-ext+ #x8331) -(defconstant +pixel-min-filter-ext+ #x8332) -(defconstant +pixel-cubic-weight-ext+ #x8333) -(defconstant +cubic-ext+ #x8334) -(defconstant +average-ext+ #x8335) -(defconstant +pixel-transform-2d-stack-depth-ext+ #x8336) -(defconstant +max-pixel-transform-2d-stack-depth-ext+ #x8337) -(defconstant +pixel-transform-2d-matrix-ext+ #x8338) -(defglextfun - (("PixelTransformParameterfvEXT" pixel-transform-parameter-fv-ext) :args - ((:name |target| :type |PixelTransformTargetEXT| :direction :in) - (:name |pname| :type |PixelTransformPNameEXT| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size #x1)) - :return ("void") :category ("EXT_pixel_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("PixelTransformParameterivEXT" pixel-transform-parameter-iv-ext) :args - ((:name |target| :type |PixelTransformTargetEXT| :direction :in) - (:name |pname| :type |PixelTransformPNameEXT| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size #x1)) - :return ("void") :category ("EXT_pixel_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("PixelTransformParameterfEXT" pixel-transform-parameter-f-ext) :args - ((:name |target| :type |PixelTransformTargetEXT| :direction :in) - (:name |pname| :type |PixelTransformPNameEXT| :direction :in) - (:name |param| :type |Float32| :direction :in)) - :return ("void") :category ("EXT_pixel_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("PixelTransformParameteriEXT" pixel-transform-parameter-i-ext) :args - ((:name |target| :type |PixelTransformTargetEXT| :direction :in) - (:name |pname| :type |PixelTransformPNameEXT| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_pixel_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_pixel_transform + +(defconstant +pixel-transform-2d-ext+ #x8330) +(defconstant +pixel-mag-filter-ext+ #x8331) +(defconstant +pixel-min-filter-ext+ #x8332) +(defconstant +pixel-cubic-weight-ext+ #x8333) +(defconstant +cubic-ext+ #x8334) +(defconstant +average-ext+ #x8335) +(defconstant +pixel-transform-2d-stack-depth-ext+ #x8336) +(defconstant +max-pixel-transform-2d-stack-depth-ext+ #x8337) +(defconstant +pixel-transform-2d-matrix-ext+ #x8338) +(defconstant +pixel-transform-2d-ext+ #x8330) +(defconstant +pixel-mag-filter-ext+ #x8331) +(defconstant +pixel-min-filter-ext+ #x8332) +(defconstant +pixel-cubic-weight-ext+ #x8333) +(defconstant +cubic-ext+ #x8334) +(defconstant +average-ext+ #x8335) +(defconstant +pixel-transform-2d-stack-depth-ext+ #x8336) +(defconstant +max-pixel-transform-2d-stack-depth-ext+ #x8337) +(defconstant +pixel-transform-2d-matrix-ext+ #x8338) +(defglextfun "PixelTransformParameterfvEXT" pixel-transform-parameter-fv-ext + :return "void" :args + ((:name |target| :type |PixelTransformTargetEXT| :direction :in) + (:name |pname| :type |PixelTransformPNameEXT| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size #x1)) + :category "EXT_pixel_transform" :version "1.1") +(defglextfun "PixelTransformParameterivEXT" pixel-transform-parameter-iv-ext + :return "void" :args + ((:name |target| :type |PixelTransformTargetEXT| :direction :in) + (:name |pname| :type |PixelTransformPNameEXT| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size #x1)) + :category "EXT_pixel_transform" :version "1.1") +(defglextfun "PixelTransformParameterfEXT" pixel-transform-parameter-f-ext + :return "void" :args + ((:name |target| :type |PixelTransformTargetEXT| :direction :in) + (:name |pname| :type |PixelTransformPNameEXT| :direction :in) + (:name |param| :type |Float32| :direction :in)) + :category "EXT_pixel_transform" :version "1.1") +(defglextfun "PixelTransformParameteriEXT" pixel-transform-parameter-i-ext + :return "void" :args + ((:name |target| :type |PixelTransformTargetEXT| :direction :in) + (:name |pname| :type |PixelTransformPNameEXT| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "EXT_pixel_transform" :version "1.1") diff --git a/lib/opengl-ext_point_parameters.lisp b/lib/opengl-ext_point_parameters.lisp dissimilarity index 67% index 4027744..16e5952 100644 --- a/lib/opengl-ext_point_parameters.lisp +++ b/lib/opengl-ext_point_parameters.lisp @@ -1,25 +1,19 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_point_parameters - -(defconstant +point-size-min-ext+ #x8126) -(defconstant +point-size-max-ext+ #x8127) -(defconstant +point-fade-threshold-size-ext+ #x8128) -(defconstant +distance-attenuation-ext+ #x8129) -(defglextfun - (("PointParameterfvEXT" point-parameter-fv-ext) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("EXT_point_parameters") :version ("1.0") - :glxflags ("SGI") :extension nil :alias ("PointParameterfvARB") :glsalias - ("PointParameterfvARB"))) -(defglextfun - (("PointParameterfEXT" point-parameter-f-ext) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("EXT_point_parameters") :version ("1.0") - :glxflags ("SGI") :extension nil :alias ("PointParameterfARB") :glsalias - ("PointParameterfARB"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_point_parameters + +(defconstant +point-size-min-ext+ #x8126) +(defconstant +point-size-max-ext+ #x8127) +(defconstant +point-fade-threshold-size-ext+ #x8128) +(defconstant +distance-attenuation-ext+ #x8129) +(defglextfun "PointParameterfvEXT" point-parameter-fv-ext :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "EXT_point_parameters" :version "1.0") +(defglextfun "PointParameterfEXT" point-parameter-f-ext :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "EXT_point_parameters" :version "1.0") diff --git a/lib/opengl-ext_polygon_offset.lisp b/lib/opengl-ext_polygon_offset.lisp index d614125..6f8addb 100644 --- a/lib/opengl-ext_polygon_offset.lisp +++ b/lib/opengl-ext_polygon_offset.lisp @@ -8,10 +8,7 @@ (defconstant +polygon-offset-factor-ext+ #x8038) (defconstant +polygon-offset-ext+ #x8037) (defconstant +polygon-offset-factor-ext+ #x8038) -(defglextfun - (("PolygonOffsetEXT" polygon-offset-ext) :args - ((:name |factor| :type |Float32| :direction :in) - (:name |bias| :type |Float32| :direction :in)) - :return ("void") :category ("EXT_polygon_offset") :version ("1.0") - :glxropcode ("4098") :glxflags ("EXT") :extension ("soft") :glsopcode - ("0x0122") :offset ("414"))) +(defglextfun "PolygonOffsetEXT" polygon-offset-ext :return "void" :args + ((:name |factor| :type |Float32| :direction :in) + (:name |bias| :type |Float32| :direction :in)) + :category "EXT_polygon_offset" :version "1.0") diff --git a/lib/opengl-ext_secondary_color.lisp b/lib/opengl-ext_secondary_color.lisp dissimilarity index 91% index 00b31cc..92c2d79 100644 --- a/lib/opengl-ext_secondary_color.lisp +++ b/lib/opengl-ext_secondary_color.lisp @@ -1,129 +1,88 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_secondary_color - -(defconstant +color-sum-ext+ #x8458) -(defconstant +current-secondary-color-ext+ #x8459) -(defconstant +secondary-color-array-size-ext+ #x845A) -(defconstant +secondary-color-array-type-ext+ #x845B) -(defconstant +secondary-color-array-stride-ext+ #x845C) -(defconstant +secondary-color-array-pointer-ext+ #x845D) -(defconstant +secondary-color-array-ext+ #x845E) -(defglextfun - (("SecondaryColorPointerEXT" secondary-color-pointer-ext) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |ColorPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :category ("EXT_secondary_color") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1") - :extension nil :alias ("SecondaryColorPointer") :glsalias - ("SecondaryColorPointer"))) -(defglextfun - (("SecondaryColor3usvEXT" secondary-color-3usv-ext) :args - ((:name |v| :type |ColorUS| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4132") :alias ("SecondaryColor3usv") :glsalias ("SecondaryColor3usv"))) -(defglextfun - (("SecondaryColor3usEXT" secondary-color-3us-ext) :args - ((:name |red| :type |ColorUS| :direction :in) - (:name |green| :type |ColorUS| :direction :in) - (:name |blue| :type |ColorUS| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3usvEXT") :version ("1.1") :alias ("SecondaryColor3us") - :glsalias ("SecondaryColor3us"))) -(defglextfun - (("SecondaryColor3uivEXT" secondary-color-3uiv-ext) :args - ((:name |v| :type |ColorUI| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4133") :alias ("SecondaryColor3uiv") :glsalias ("SecondaryColor3uiv"))) -(defglextfun - (("SecondaryColor3uiEXT" secondary-color-3ui-ext) :args - ((:name |red| :type |ColorUI| :direction :in) - (:name |green| :type |ColorUI| :direction :in) - (:name |blue| :type |ColorUI| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3uivEXT") :version ("1.1") :alias ("SecondaryColor3ui") - :glsalias ("SecondaryColor3ui"))) -(defglextfun - (("SecondaryColor3ubvEXT" secondary-color-3ubv-ext) :args - ((:name |v| :type |ColorUB| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4131") :alias ("SecondaryColor3ubv") :glsalias ("SecondaryColor3ubv"))) -(defglextfun - (("SecondaryColor3ubEXT" secondary-color-3ub-ext) :args - ((:name |red| :type |ColorUB| :direction :in) - (:name |green| :type |ColorUB| :direction :in) - (:name |blue| :type |ColorUB| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3ubvEXT") :version ("1.1") :alias ("SecondaryColor3ub") - :glsalias ("SecondaryColor3ub"))) -(defglextfun - (("SecondaryColor3svEXT" secondary-color-3sv-ext) :args - ((:name |v| :type |ColorS| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4127") :alias ("SecondaryColor3sv") :glsalias ("SecondaryColor3sv"))) -(defglextfun - (("SecondaryColor3sEXT" secondary-color-3s-ext) :args - ((:name |red| :type |ColorS| :direction :in) - (:name |green| :type |ColorS| :direction :in) - (:name |blue| :type |ColorS| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3svEXT") :version ("1.1") :alias ("SecondaryColor3s") - :glsalias ("SecondaryColor3s"))) -(defglextfun - (("SecondaryColor3ivEXT" secondary-color-3iv-ext) :args - ((:name |v| :type |ColorI| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4128") :glsopcode ("0x0200") :offset ("568") :alias ("SecondaryColor3iv") - :glsalias ("SecondaryColor3iv"))) -(defglextfun - (("SecondaryColor3iEXT" secondary-color-3i-ext) :args - ((:name |red| :type |ColorI| :direction :in) - (:name |green| :type |ColorI| :direction :in) - (:name |blue| :type |ColorI| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3ivEXT") :version ("1.1") :alias ("SecondaryColor3i") - :glsalias ("SecondaryColor3i"))) -(defglextfun - (("SecondaryColor3fvEXT" secondary-color-3fv-ext) :args - ((:name |v| :type |ColorF| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4129") :alias ("SecondaryColor3fv") :glsalias ("SecondaryColor3fv"))) -(defglextfun - (("SecondaryColor3fEXT" secondary-color-3f-ext) :args - ((:name |red| :type |ColorF| :direction :in) - (:name |green| :type |ColorF| :direction :in) - (:name |blue| :type |ColorF| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3fvEXT") :version ("1.1") :alias ("SecondaryColor3f") - :glsalias ("SecondaryColor3f"))) -(defglextfun - (("SecondaryColor3dvEXT" secondary-color-3dv-ext) :args - ((:name |v| :type |ColorD| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4130") :alias ("SecondaryColor3dv") :glsalias ("SecondaryColor3dv"))) -(defglextfun - (("SecondaryColor3dEXT" secondary-color-3d-ext) :args - ((:name |red| :type |ColorD| :direction :in) - (:name |green| :type |ColorD| :direction :in) - (:name |blue| :type |ColorD| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3dvEXT") :version ("1.1") :alias ("SecondaryColor3d") - :glsalias ("SecondaryColor3d"))) -(defglextfun - (("SecondaryColor3bvEXT" secondary-color-3bv-ext) :args - ((:name |v| :type |ColorB| :direction :in :array t :size #x3)) :return - ("void") :category ("EXT_secondary_color") :version ("1.1") :glxropcode - ("4126") :alias ("SecondaryColor3bv") :glsalias ("SecondaryColor3bv"))) -(defglextfun - (("SecondaryColor3bEXT" secondary-color-3b-ext) :args - ((:name |red| :type |ColorB| :direction :in) - (:name |green| :type |ColorB| :direction :in) - (:name |blue| :type |ColorB| :direction :in)) - :return ("void") :category ("EXT_secondary_color") :vectorequiv - ("SecondaryColor3bvEXT") :version ("1.1") :alias ("SecondaryColor3b") - :glsalias ("SecondaryColor3b"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_secondary_color + +(defconstant +color-sum-ext+ #x8458) +(defconstant +current-secondary-color-ext+ #x8459) +(defconstant +secondary-color-array-size-ext+ #x845A) +(defconstant +secondary-color-array-type-ext+ #x845B) +(defconstant +secondary-color-array-stride-ext+ #x845C) +(defconstant +secondary-color-array-pointer-ext+ #x845D) +(defconstant +secondary-color-array-ext+ #x845E) +(defglextfun "SecondaryColorPointerEXT" secondary-color-pointer-ext :return + "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |ColorPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3usvEXT" secondary-color-3usv-ext :return "void" + :args ((:name |v| :type |ColorUS| :direction :in :array t :size #x3)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3usEXT" secondary-color-3us-ext :return "void" + :args + ((:name |red| :type |ColorUS| :direction :in) + (:name |green| :type |ColorUS| :direction :in) + (:name |blue| :type |ColorUS| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3uivEXT" secondary-color-3uiv-ext :return "void" + :args ((:name |v| :type |ColorUI| :direction :in :array t :size #x3)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3uiEXT" secondary-color-3ui-ext :return "void" + :args + ((:name |red| :type |ColorUI| :direction :in) + (:name |green| :type |ColorUI| :direction :in) + (:name |blue| :type |ColorUI| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3ubvEXT" secondary-color-3ubv-ext :return "void" + :args ((:name |v| :type |ColorUB| :direction :in :array t :size #x3)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3ubEXT" secondary-color-3ub-ext :return "void" + :args + ((:name |red| :type |ColorUB| :direction :in) + (:name |green| :type |ColorUB| :direction :in) + (:name |blue| :type |ColorUB| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3svEXT" secondary-color-3sv-ext :return "void" + :args ((:name |v| :type |ColorS| :direction :in :array t :size #x3)) :category + "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3sEXT" secondary-color-3s-ext :return "void" :args + ((:name |red| :type |ColorS| :direction :in) + (:name |green| :type |ColorS| :direction :in) + (:name |blue| :type |ColorS| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3ivEXT" secondary-color-3iv-ext :return "void" + :args ((:name |v| :type |ColorI| :direction :in :array t :size #x3)) :category + "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3iEXT" secondary-color-3i-ext :return "void" :args + ((:name |red| :type |ColorI| :direction :in) + (:name |green| :type |ColorI| :direction :in) + (:name |blue| :type |ColorI| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3fvEXT" secondary-color-3fv-ext :return "void" + :args ((:name |v| :type |ColorF| :direction :in :array t :size #x3)) :category + "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3fEXT" secondary-color-3f-ext :return "void" :args + ((:name |red| :type |ColorF| :direction :in) + (:name |green| :type |ColorF| :direction :in) + (:name |blue| :type |ColorF| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3dvEXT" secondary-color-3dv-ext :return "void" + :args ((:name |v| :type |ColorD| :direction :in :array t :size #x3)) :category + "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3dEXT" secondary-color-3d-ext :return "void" :args + ((:name |red| :type |ColorD| :direction :in) + (:name |green| :type |ColorD| :direction :in) + (:name |blue| :type |ColorD| :direction :in)) + :category "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3bvEXT" secondary-color-3bv-ext :return "void" + :args ((:name |v| :type |ColorB| :direction :in :array t :size #x3)) :category + "EXT_secondary_color" :version "1.1") +(defglextfun "SecondaryColor3bEXT" secondary-color-3b-ext :return "void" :args + ((:name |red| :type |ColorB| :direction :in) + (:name |green| :type |ColorB| :direction :in) + (:name |blue| :type |ColorB| :direction :in)) + :category "EXT_secondary_color" :version "1.1") diff --git a/lib/opengl-ext_stencil_clear_tag.lisp b/lib/opengl-ext_stencil_clear_tag.lisp index 60ff167..4664922 100644 --- a/lib/opengl-ext_stencil_clear_tag.lisp +++ b/lib/opengl-ext_stencil_clear_tag.lisp @@ -6,10 +6,7 @@ (defconstant +stencil-tag-bits-ext+ #x88F2) (defconstant +stencil-clear-tag-value-ext+ #x88F3) -(defglextfun - (("StencilClearTagEXT" stencil-clear-tag-ext) :args - ((:name |stencilTagBits| :type |SizeI| :direction :in) - (:name |stencilClearTag| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_stencil_clear_tag") :version ("1.5") - :extension nil :glxropcode ("4223") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) +(defglextfun "StencilClearTagEXT" stencil-clear-tag-ext :return "void" :args + ((:name |stencilTagBits| :type |SizeI| :direction :in) + (:name |stencilClearTag| :type |UInt32| :direction :in)) + :category "EXT_stencil_clear_tag" :version "1.5") diff --git a/lib/opengl-ext_stencil_two_side.lisp b/lib/opengl-ext_stencil_two_side.lisp index 48e3fed..8b92693 100644 --- a/lib/opengl-ext_stencil_two_side.lisp +++ b/lib/opengl-ext_stencil_two_side.lisp @@ -6,8 +6,6 @@ (defconstant +stencil-test-two-side-ext+ #x8910) (defconstant +active-stencil-face-ext+ #x8911) -(defglextfun - (("ActiveStencilFaceEXT" active-stencil-face-ext) :args - ((:name |face| :type |StencilFaceDirection| :direction :in)) :return ("void") - :category ("EXT_stencil_two_side") :version ("1.3") :glxropcode ("4220") - :glsopcode ("?") :offset ("646"))) +(defglextfun "ActiveStencilFaceEXT" active-stencil-face-ext :return "void" + :args ((:name |face| :type |StencilFaceDirection| :direction :in)) :category + "EXT_stencil_two_side" :version "1.3") diff --git a/lib/opengl-ext_subtexture.lisp b/lib/opengl-ext_subtexture.lisp dissimilarity index 90% index c82c9b8..e2b4a94 100644 --- a/lib/opengl-ext_subtexture.lisp +++ b/lib/opengl-ext_subtexture.lisp @@ -1,34 +1,28 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_subtexture - -(defglextfun - (("TexSubImage2DEXT" tex-sub-image-2d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("EXT_subtexture") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.0") :glxropcode - ("4100") :extension nil :alias ("TexSubImage2D") :glsalias ("TexSubImage2D"))) -(defglextfun - (("TexSubImage1DEXT" tex-sub-image-1d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("EXT_subtexture") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.0") :glxropcode - ("4099") :extension nil :alias ("TexSubImage1D") :glsalias ("TexSubImage1D"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_subtexture + +(defglextfun "TexSubImage2DEXT" tex-sub-image-2d-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height|))) + :category "EXT_subtexture" :version "1.0") +(defglextfun "TexSubImage1DEXT" tex-sub-image-1d-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "EXT_subtexture" :version "1.0") diff --git a/lib/opengl-ext_texture3d.lisp b/lib/opengl-ext_texture3d.lisp dissimilarity index 77% index e3a3d65..f77b939 100644 --- a/lib/opengl-ext_texture3d.lisp +++ b/lib/opengl-ext_texture3d.lisp @@ -1,48 +1,42 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_texture3d - -(defconstant +pack-skip-images+ #x806B) -(defconstant +pack-image-height+ #x806C) -(defconstant +unpack-skip-images+ #x806D) -(defconstant +unpack-image-height+ #x806E) -(defconstant +texture-3d+ #x806F) -(defconstant +proxy-texture-3d+ #x8070) -(defconstant +texture-depth+ #x8071) -(defconstant +texture-wrap-r+ #x8072) -(defconstant +max-3d-texture-size+ #x8073) -(defglextfun - (("TexSubImage3DEXT" tex-sub-image-3d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height| |depth|))) - :return ("void") :category ("EXT_texture3D") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.0") :glxropcode - ("4115") :extension nil :alias ("TexSubImage3D") :glsalias ("TexSubImage3D"))) -(defglextfun - (("TexImage3DEXT" tex-image-3d-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height| |depth|))) - :return ("void") :category ("EXT_texture3D") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.0") :glxropcode - ("4114") :extension nil :alias ("TexImage3D") :glsalias ("TexImage3D"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_texture3d + +(defconstant +pack-skip-images+ #x806B) +(defconstant +pack-image-height+ #x806C) +(defconstant +unpack-skip-images+ #x806D) +(defconstant +unpack-image-height+ #x806E) +(defconstant +texture-3d+ #x806F) +(defconstant +proxy-texture-3d+ #x8070) +(defconstant +texture-depth+ #x8071) +(defconstant +texture-wrap-r+ #x8072) +(defconstant +max-3d-texture-size+ #x8073) +(defglextfun "TexSubImage3DEXT" tex-sub-image-3d-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height| |depth|))) + :category "EXT_texture3D" :version "1.0") +(defglextfun "TexImage3DEXT" tex-image-3d-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height| |depth|))) + :category "EXT_texture3D" :version "1.0") diff --git a/lib/opengl-ext_texture_buffer_object.lisp b/lib/opengl-ext_texture_buffer_object.lisp index afab7ff..564d74b 100644 --- a/lib/opengl-ext_texture_buffer_object.lisp +++ b/lib/opengl-ext_texture_buffer_object.lisp @@ -9,11 +9,8 @@ (defconstant +texture-binding-buffer-ext+ #x8C2C) (defconstant +texture-buffer-data-store-binding-ext+ #x8C2D) (defconstant +texture-buffer-format-ext+ #x8C2E) -(defglextfun - (("TexBufferEXT" tex-buffer-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |internalformat| :type |GLenum| :direction :in) - (:name |buffer| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_texture_buffer_object") :version ("2.0") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) +(defglextfun "TexBufferEXT" tex-buffer-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |internalformat| :type |GLenum| :direction :in) + (:name |buffer| :type |UInt32| :direction :in)) + :category "EXT_texture_buffer_object" :version "2.0") diff --git a/lib/opengl-ext_texture_integer.lisp b/lib/opengl-ext_texture_integer.lisp index 4be5eb8..3df94d6 100644 --- a/lib/opengl-ext_texture_integer.lisp +++ b/lib/opengl-ext_texture_integer.lisp @@ -51,53 +51,37 @@ (defconstant +luminance-integer-ext+ #x8D9C) (defconstant +luminance-alpha-integer-ext+ #x8D9D) (defconstant +rgba-integer-mode-ext+ #x8D9E) -(defglextfun - (("ClearColorIuiEXT" clear-color-i-ui-ext) :args - ((:name |red| :type |UInt32| :direction :in) - (:name |green| :type |UInt32| :direction :in) - (:name |blue| :type |UInt32| :direction :in) - (:name |alpha| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_texture_integer") :version ("2.0") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ClearColorIiEXT" clear-color-i-i-ext) :args - ((:name |red| :type |Int32| :direction :in) - (:name |green| :type |Int32| :direction :in) - (:name |blue| :type |Int32| :direction :in) - (:name |alpha| :type |Int32| :direction :in)) - :return ("void") :category ("EXT_texture_integer") :version ("2.0") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetTexParameterIuivEXT" get-tex-parameter-i-uiv-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |GetTextureParameter| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_texture_integer") :dlflags ("notlistable") - :version ("1.0") :version ("2.0") :extension ("soft" "WINSOFT" "NV50") - :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetTexParameterIivEXT" get-tex-parameter-i-iv-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |GetTextureParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("EXT_texture_integer") :dlflags ("notlistable") - :version ("1.0") :version ("2.0") :extension ("soft" "WINSOFT" "NV50") - :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("TexParameterIuivEXT" tex-parameter-i-uiv-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |TextureParameterName| :direction :in) - (:name |params| :type |UInt32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("EXT_texture_integer") :version ("2.0") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("TexParameterIivEXT" tex-parameter-i-iv-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |TextureParameterName| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("EXT_texture_integer") :version ("2.0") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) +(defglextfun "ClearColorIuiEXT" clear-color-i-ui-ext :return "void" :args + ((:name |red| :type |UInt32| :direction :in) + (:name |green| :type |UInt32| :direction :in) + (:name |blue| :type |UInt32| :direction :in) + (:name |alpha| :type |UInt32| :direction :in)) + :category "EXT_texture_integer" :version "2.0") +(defglextfun "ClearColorIiEXT" clear-color-i-i-ext :return "void" :args + ((:name |red| :type |Int32| :direction :in) + (:name |green| :type |Int32| :direction :in) + (:name |blue| :type |Int32| :direction :in) + (:name |alpha| :type |Int32| :direction :in)) + :category "EXT_texture_integer" :version "2.0") +(defglextfun "GetTexParameterIuivEXT" get-tex-parameter-i-uiv-ext :return + "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |GetTextureParameter| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size (|pname|))) + :category "EXT_texture_integer" :version "1.0") +(defglextfun "GetTexParameterIivEXT" get-tex-parameter-i-iv-ext :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |GetTextureParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "EXT_texture_integer" :version "1.0") +(defglextfun "TexParameterIuivEXT" tex-parameter-i-uiv-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |TextureParameterName| :direction :in) + (:name |params| :type |UInt32| :direction :in :array t :size (|pname|))) + :category "EXT_texture_integer" :version "2.0") +(defglextfun "TexParameterIivEXT" tex-parameter-i-iv-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |TextureParameterName| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) + :category "EXT_texture_integer" :version "2.0") diff --git a/lib/opengl-ext_texture_object.lisp b/lib/opengl-ext_texture_object.lisp dissimilarity index 80% index 71b47fa..e250677 100644 --- a/lib/opengl-ext_texture_object.lisp +++ b/lib/opengl-ext_texture_object.lisp @@ -1,57 +1,41 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_texture_object - -(defconstant +texture-priority-ext+ #x8066) -(defconstant +texture-resident-ext+ #x8067) -(defconstant +texture-1d-binding-ext+ #x8068) -(defconstant +texture-2d-binding-ext+ #x8069) -(defconstant +texture-priority-ext+ #x8066) -(defconstant +texture-resident-ext+ #x8067) -(defconstant +texture-1d-binding-ext+ #x8068) -(defconstant +texture-2d-binding-ext+ #x8069) -(defglextfun - (("PrioritizeTexturesEXT" prioritize-textures-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :in :array t :size n) - (:name |priorities| :type |ClampedFloat32| :direction :in :array t :size n)) - :return ("void") :category ("EXT_texture_object") :glxflags ("EXT") :version - ("1.0") :glxropcode ("4118") :extension nil :alias ("PrioritizeTextures") - :glsalias ("PrioritizeTextures"))) -(defglextfun - (("IsTextureEXT" is-texture-ext) :args - ((:name |texture| :type |Texture| :direction :in)) :return ("Boolean") - :category ("EXT_texture_object") :dlflags ("notlistable") :version ("1.0") - :glxflags ("EXT") :glxvendorpriv ("14") :extension nil :glsflags ("get") - :glsopcode ("0x014B") :offset ("441"))) -(defglextfun - (("GenTexturesEXT" gen-textures-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :out :array t :size n)) - :return ("void") :category ("EXT_texture_object") :dlflags ("notlistable") - :version ("1.0") :glxflags ("EXT") :glxvendorpriv ("13") :extension nil - :glsopcode ("0x014A") :offset ("440"))) -(defglextfun - (("DeleteTexturesEXT" delete-textures-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :in :array t :size n)) - :return ("void") :category ("EXT_texture_object") :dlflags ("notlistable") - :version ("1.0") :glxflags ("EXT") :glxvendorpriv ("12") :extension nil - :glsopcode ("0x0149") :offset ("561"))) -(defglextfun - (("BindTextureEXT" bind-texture-ext) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |texture| :type |Texture| :direction :in)) - :return ("void") :category ("EXT_texture_object") :version ("1.0") :glxflags - ("EXT") :glxropcode ("4117") :extension nil :alias ("BindTexture") :glsalias - ("BindTexture"))) -(defglextfun - (("AreTexturesResidentEXT" are-textures-resident-ext) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :in :array t :size n) - (:name |residences| :type |Boolean| :direction :out :array t :size n)) - :return ("Boolean") :category ("EXT_texture_object") :glxflags ("EXT") - :glxvendorpriv ("11") :dlflags ("notlistable") :version ("1.0") :extension - nil :glsflags ("get") :glsopcode ("0x0147") :offset ("439"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_texture_object + +(defconstant +texture-priority-ext+ #x8066) +(defconstant +texture-resident-ext+ #x8067) +(defconstant +texture-1d-binding-ext+ #x8068) +(defconstant +texture-2d-binding-ext+ #x8069) +(defconstant +texture-priority-ext+ #x8066) +(defconstant +texture-resident-ext+ #x8067) +(defconstant +texture-1d-binding-ext+ #x8068) +(defconstant +texture-2d-binding-ext+ #x8069) +(defglextfun "PrioritizeTexturesEXT" prioritize-textures-ext :return "void" + :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :in :array t :size n) + (:name |priorities| :type |ClampedFloat32| :direction :in :array t :size n)) + :category "EXT_texture_object" :version "1.0") +(defglextfun "IsTextureEXT" is-texture-ext :return "Boolean" :args + ((:name |texture| :type |Texture| :direction :in)) :category + "EXT_texture_object" :version "1.0") +(defglextfun "GenTexturesEXT" gen-textures-ext :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :out :array t :size n)) + :category "EXT_texture_object" :version "1.0") +(defglextfun "DeleteTexturesEXT" delete-textures-ext :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :in :array t :size n)) + :category "EXT_texture_object" :version "1.0") +(defglextfun "BindTextureEXT" bind-texture-ext :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |texture| :type |Texture| :direction :in)) + :category "EXT_texture_object" :version "1.0") +(defglextfun "AreTexturesResidentEXT" are-textures-resident-ext :return + "Boolean" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :in :array t :size n) + (:name |residences| :type |Boolean| :direction :out :array t :size n)) + :category "EXT_texture_object" :version "1.0") diff --git a/lib/opengl-ext_texture_perturb_normal.lisp b/lib/opengl-ext_texture_perturb_normal.lisp index b62ee33..9f61d40 100644 --- a/lib/opengl-ext_texture_perturb_normal.lisp +++ b/lib/opengl-ext_texture_perturb_normal.lisp @@ -6,8 +6,6 @@ (defconstant +perturb-ext+ #x85AE) (defconstant +texture-normal-ext+ #x85AF) -(defglextfun - (("TextureNormalEXT" texture-normal-ext) :args - ((:name |mode| :type |TextureNormalModeEXT| :direction :in)) :return ("void") - :category ("EXT_texture_perturb_normal") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) +(defglextfun "TextureNormalEXT" texture-normal-ext :return "void" :args + ((:name |mode| :type |TextureNormalModeEXT| :direction :in)) :category + "EXT_texture_perturb_normal" :version "1.1") diff --git a/lib/opengl-ext_timer_query.lisp b/lib/opengl-ext_timer_query.lisp dissimilarity index 79% index d829cf2..6494abd 100644 --- a/lib/opengl-ext_timer_query.lisp +++ b/lib/opengl-ext_timer_query.lisp @@ -1,23 +1,19 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_timer_query - -(defconstant +time-elapsed-ext+ #x88BF) -(defglextfun - (("GetQueryObjectui64vEXT" get-query-objectui-64v-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |UInt64EXT| :direction :out :array t :size pname)) - :return ("void") :category ("EXT_timer_query") :dlflags ("notlistable") - :version ("1.5") :glxvendorpriv ("1329") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("GetQueryObjecti64vEXT" get-query-objecti-64v-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int64EXT| :direction :out :array t :size pname)) - :return ("void") :category ("EXT_timer_query") :dlflags ("notlistable") - :version ("1.5") :glxvendorpriv ("1328") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_timer_query + +(defconstant +time-elapsed-ext+ #x88BF) +(defglextfun "GetQueryObjectui64vEXT" get-query-objectui-64v-ext :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |UInt64EXT| :direction :out :array t :size pname)) + :category "EXT_timer_query" :version "1.5") +(defglextfun "GetQueryObjecti64vEXT" get-query-objecti-64v-ext :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int64EXT| :direction :out :array t :size pname)) + :category "EXT_timer_query" :version "1.5") diff --git a/lib/opengl-ext_vertex_array.lisp b/lib/opengl-ext_vertex_array.lisp dissimilarity index 63% index 83c0b09..d829185 100644 --- a/lib/opengl-ext_vertex_array.lisp +++ b/lib/opengl-ext_vertex_array.lisp @@ -1,142 +1,114 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_vertex_array - -(defconstant +vertex-array-ext+ #x8074) -(defconstant +normal-array-ext+ #x8075) -(defconstant +color-array-ext+ #x8076) -(defconstant +index-array-ext+ #x8077) -(defconstant +texture-coord-array-ext+ #x8078) -(defconstant +edge-flag-array-ext+ #x8079) -(defconstant +vertex-array-size-ext+ #x807A) -(defconstant +vertex-array-type-ext+ #x807B) -(defconstant +vertex-array-stride-ext+ #x807C) -(defconstant +normal-array-type-ext+ #x807E) -(defconstant +normal-array-stride-ext+ #x807F) -(defconstant +color-array-size-ext+ #x8081) -(defconstant +color-array-type-ext+ #x8082) -(defconstant +color-array-stride-ext+ #x8083) -(defconstant +index-array-type-ext+ #x8085) -(defconstant +index-array-stride-ext+ #x8086) -(defconstant +texture-coord-array-size-ext+ #x8088) -(defconstant +texture-coord-array-type-ext+ #x8089) -(defconstant +texture-coord-array-stride-ext+ #x808A) -(defconstant +edge-flag-array-stride-ext+ #x808C) -(defconstant +vertex-array-pointer-ext+ #x808E) -(defconstant +normal-array-pointer-ext+ #x808F) -(defconstant +color-array-pointer-ext+ #x8090) -(defconstant +index-array-pointer-ext+ #x8091) -(defconstant +texture-coord-array-pointer-ext+ #x8092) -(defconstant +edge-flag-array-pointer-ext+ #x8093) -(defconstant +vertex-array-ext+ #x8074) -(defconstant +normal-array-ext+ #x8075) -(defconstant +color-array-ext+ #x8076) -(defconstant +index-array-ext+ #x8077) -(defconstant +texture-coord-array-ext+ #x8078) -(defconstant +edge-flag-array-ext+ #x8079) -(defconstant +vertex-array-size-ext+ #x807A) -(defconstant +vertex-array-type-ext+ #x807B) -(defconstant +vertex-array-stride-ext+ #x807C) -(defconstant +normal-array-type-ext+ #x807E) -(defconstant +normal-array-stride-ext+ #x807F) -(defconstant +color-array-size-ext+ #x8081) -(defconstant +color-array-type-ext+ #x8082) -(defconstant +color-array-stride-ext+ #x8083) -(defconstant +index-array-type-ext+ #x8085) -(defconstant +index-array-stride-ext+ #x8086) -(defconstant +texture-coord-array-size-ext+ #x8088) -(defconstant +texture-coord-array-type-ext+ #x8089) -(defconstant +texture-coord-array-stride-ext+ #x808A) -(defconstant +edge-flag-array-stride-ext+ #x808C) -(defconstant +vertex-array-pointer-ext+ #x808E) -(defconstant +normal-array-pointer-ext+ #x808F) -(defconstant +color-array-pointer-ext+ #x8090) -(defconstant +index-array-pointer-ext+ #x8091) -(defconstant +texture-coord-array-pointer-ext+ #x8092) -(defconstant +edge-flag-array-pointer-ext+ #x8093) -(defglextfun - (("VertexPointerEXT" vertex-pointer-ext) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride| |count|) :retained t)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :glsflags ("client") :glsopcode ("0x0146") :offset ("453"))) -(defglextfun - (("TexCoordPointerEXT" tex-coord-pointer-ext) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |TexCoordPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride| |count|) :retained t)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :glsflags ("client") :glsopcode ("0x0145") :offset ("452"))) -(defglextfun - (("NormalPointerEXT" normal-pointer-ext) :args - ((:name |type| :type |NormalPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride| |count|) :retained t)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :glsflags ("client") :glsopcode ("0x0144") :offset ("451"))) -(defglextfun - (("IndexPointerEXT" index-pointer-ext) :args - ((:name |type| :type |IndexPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride| |count|) :retained t)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :glsflags ("client") :glsopcode ("0x0143") :offset ("450"))) -(defglextfun - (("GetPointervEXT" get-pointerv-ext) :args - ((:name |pname| :type |GetPointervPName| :direction :in) - (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :alias ("GetPointerv") :glsalias ("GetPointerv"))) -(defglextfun - (("EdgeFlagPointerEXT" edge-flag-pointer-ext) :args - ((:name |stride| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |pointer| :type |Boolean| :direction :in :array t :size - (|stride| |count|) :retained t)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :glsflags ("client") :glsopcode ("0x0141") :offset ("449"))) -(defglextfun - (("DrawArraysEXT" draw-arrays-ext) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :glxropcode ("4116") :extension nil :alias ("DrawArrays") :glsopcode - ("0x0140"))) -(defglextfun - (("ColorPointerEXT" color-pointer-ext) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |ColorPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride| |count|) :retained t)) - :return ("void") :category ("EXT_vertex_array") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.0") - :extension nil :glsflags ("client") :glsopcode ("0x013F") :offset ("448"))) -(defglextfun - (("ArrayElementEXT" array-element-ext) :args - ((:name |i| :type |Int32| :direction :in)) :return ("void") :category - ("EXT_vertex_array") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.0") :extension nil - :alias ("ArrayElement") :glsalias ("ArrayElement"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_vertex_array + +(defconstant +vertex-array-ext+ #x8074) +(defconstant +normal-array-ext+ #x8075) +(defconstant +color-array-ext+ #x8076) +(defconstant +index-array-ext+ #x8077) +(defconstant +texture-coord-array-ext+ #x8078) +(defconstant +edge-flag-array-ext+ #x8079) +(defconstant +vertex-array-size-ext+ #x807A) +(defconstant +vertex-array-type-ext+ #x807B) +(defconstant +vertex-array-stride-ext+ #x807C) +(defconstant +normal-array-type-ext+ #x807E) +(defconstant +normal-array-stride-ext+ #x807F) +(defconstant +color-array-size-ext+ #x8081) +(defconstant +color-array-type-ext+ #x8082) +(defconstant +color-array-stride-ext+ #x8083) +(defconstant +index-array-type-ext+ #x8085) +(defconstant +index-array-stride-ext+ #x8086) +(defconstant +texture-coord-array-size-ext+ #x8088) +(defconstant +texture-coord-array-type-ext+ #x8089) +(defconstant +texture-coord-array-stride-ext+ #x808A) +(defconstant +edge-flag-array-stride-ext+ #x808C) +(defconstant +vertex-array-pointer-ext+ #x808E) +(defconstant +normal-array-pointer-ext+ #x808F) +(defconstant +color-array-pointer-ext+ #x8090) +(defconstant +index-array-pointer-ext+ #x8091) +(defconstant +texture-coord-array-pointer-ext+ #x8092) +(defconstant +edge-flag-array-pointer-ext+ #x8093) +(defconstant +vertex-array-ext+ #x8074) +(defconstant +normal-array-ext+ #x8075) +(defconstant +color-array-ext+ #x8076) +(defconstant +index-array-ext+ #x8077) +(defconstant +texture-coord-array-ext+ #x8078) +(defconstant +edge-flag-array-ext+ #x8079) +(defconstant +vertex-array-size-ext+ #x807A) +(defconstant +vertex-array-type-ext+ #x807B) +(defconstant +vertex-array-stride-ext+ #x807C) +(defconstant +normal-array-type-ext+ #x807E) +(defconstant +normal-array-stride-ext+ #x807F) +(defconstant +color-array-size-ext+ #x8081) +(defconstant +color-array-type-ext+ #x8082) +(defconstant +color-array-stride-ext+ #x8083) +(defconstant +index-array-type-ext+ #x8085) +(defconstant +index-array-stride-ext+ #x8086) +(defconstant +texture-coord-array-size-ext+ #x8088) +(defconstant +texture-coord-array-type-ext+ #x8089) +(defconstant +texture-coord-array-stride-ext+ #x808A) +(defconstant +edge-flag-array-stride-ext+ #x808C) +(defconstant +vertex-array-pointer-ext+ #x808E) +(defconstant +normal-array-pointer-ext+ #x808F) +(defconstant +color-array-pointer-ext+ #x8090) +(defconstant +index-array-pointer-ext+ #x8091) +(defconstant +texture-coord-array-pointer-ext+ #x8092) +(defconstant +edge-flag-array-pointer-ext+ #x8093) +(defglextfun "VertexPointerEXT" vertex-pointer-ext :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride| |count|) :retained t)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "TexCoordPointerEXT" tex-coord-pointer-ext :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |TexCoordPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride| |count|) :retained t)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "NormalPointerEXT" normal-pointer-ext :return "void" :args + ((:name |type| :type |NormalPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|type| |stride| |count|) :retained t)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "IndexPointerEXT" index-pointer-ext :return "void" :args + ((:name |type| :type |IndexPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|type| |stride| |count|) :retained t)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "GetPointervEXT" get-pointerv-ext :return "void" :args + ((:name |pname| :type |GetPointervPName| :direction :in) + (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "EdgeFlagPointerEXT" edge-flag-pointer-ext :return "void" :args + ((:name |stride| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |pointer| :type |Boolean| :direction :in :array t :size + (|stride| |count|) :retained t)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "DrawArraysEXT" draw-arrays-ext :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "ColorPointerEXT" color-pointer-ext :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |ColorPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride| |count|) :retained t)) + :category "EXT_vertex_array" :version "1.0") +(defglextfun "ArrayElementEXT" array-element-ext :return "void" :args + ((:name |i| :type |Int32| :direction :in)) :category "EXT_vertex_array" + :version "1.0") diff --git a/lib/opengl-ext_vertex_shader.lisp b/lib/opengl-ext_vertex_shader.lisp dissimilarity index 75% index 9589c8b..85b2276 100644 --- a/lib/opengl-ext_vertex_shader.lisp +++ b/lib/opengl-ext_vertex_shader.lisp @@ -1,426 +1,322 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ext_vertex_shader - -(defconstant +vertex-shader-ext+ #x8780) -(defconstant +vertex-shader-binding-ext+ #x8781) -(defconstant +op-index-ext+ #x8782) -(defconstant +op-negate-ext+ #x8783) -(defconstant +op-dot3-ext+ #x8784) -(defconstant +op-dot4-ext+ #x8785) -(defconstant +op-mul-ext+ #x8786) -(defconstant +op-add-ext+ #x8787) -(defconstant +op-madd-ext+ #x8788) -(defconstant +op-frac-ext+ #x8789) -(defconstant +op-max-ext+ #x878A) -(defconstant +op-min-ext+ #x878B) -(defconstant +op-set-ge-ext+ #x878C) -(defconstant +op-set-lt-ext+ #x878D) -(defconstant +op-clamp-ext+ #x878E) -(defconstant +op-floor-ext+ #x878F) -(defconstant +op-round-ext+ #x8790) -(defconstant +op-exp-base-2-ext+ #x8791) -(defconstant +op-log-base-2-ext+ #x8792) -(defconstant +op-power-ext+ #x8793) -(defconstant +op-recip-ext+ #x8794) -(defconstant +op-recip-sqrt-ext+ #x8795) -(defconstant +op-sub-ext+ #x8796) -(defconstant +op-cross-product-ext+ #x8797) -(defconstant +op-multiply-matrix-ext+ #x8798) -(defconstant +op-mov-ext+ #x8799) -(defconstant +output-vertex-ext+ #x879A) -(defconstant +output-color0-ext+ #x879B) -(defconstant +output-color1-ext+ #x879C) -(defconstant +output-texture-coord0-ext+ #x879D) -(defconstant +output-texture-coord1-ext+ #x879E) -(defconstant +output-texture-coord2-ext+ #x879F) -(defconstant +output-texture-coord3-ext+ #x87A0) -(defconstant +output-texture-coord4-ext+ #x87A1) -(defconstant +output-texture-coord5-ext+ #x87A2) -(defconstant +output-texture-coord6-ext+ #x87A3) -(defconstant +output-texture-coord7-ext+ #x87A4) -(defconstant +output-texture-coord8-ext+ #x87A5) -(defconstant +output-texture-coord9-ext+ #x87A6) -(defconstant +output-texture-coord10-ext+ #x87A7) -(defconstant +output-texture-coord11-ext+ #x87A8) -(defconstant +output-texture-coord12-ext+ #x87A9) -(defconstant +output-texture-coord13-ext+ #x87AA) -(defconstant +output-texture-coord14-ext+ #x87AB) -(defconstant +output-texture-coord15-ext+ #x87AC) -(defconstant +output-texture-coord16-ext+ #x87AD) -(defconstant +output-texture-coord17-ext+ #x87AE) -(defconstant +output-texture-coord18-ext+ #x87AF) -(defconstant +output-texture-coord19-ext+ #x87B0) -(defconstant +output-texture-coord20-ext+ #x87B1) -(defconstant +output-texture-coord21-ext+ #x87B2) -(defconstant +output-texture-coord22-ext+ #x87B3) -(defconstant +output-texture-coord23-ext+ #x87B4) -(defconstant +output-texture-coord24-ext+ #x87B5) -(defconstant +output-texture-coord25-ext+ #x87B6) -(defconstant +output-texture-coord26-ext+ #x87B7) -(defconstant +output-texture-coord27-ext+ #x87B8) -(defconstant +output-texture-coord28-ext+ #x87B9) -(defconstant +output-texture-coord29-ext+ #x87BA) -(defconstant +output-texture-coord30-ext+ #x87BB) -(defconstant +output-texture-coord31-ext+ #x87BC) -(defconstant +output-fog-ext+ #x87BD) -(defconstant +scalar-ext+ #x87BE) -(defconstant +vector-ext+ #x87BF) -(defconstant +matrix-ext+ #x87C0) -(defconstant +variant-ext+ #x87C1) -(defconstant +invariant-ext+ #x87C2) -(defconstant +local-constant-ext+ #x87C3) -(defconstant +local-ext+ #x87C4) -(defconstant +max-vertex-shader-instructions-ext+ #x87C5) -(defconstant +max-vertex-shader-variants-ext+ #x87C6) -(defconstant +max-vertex-shader-invariants-ext+ #x87C7) -(defconstant +max-vertex-shader-local-constants-ext+ #x87C8) -(defconstant +max-vertex-shader-locals-ext+ #x87C9) -(defconstant +max-optimized-vertex-shader-instructions-ext+ #x87CA) -(defconstant +max-optimized-vertex-shader-variants-ext+ #x87CB) -(defconstant +max-optimized-vertex-shader-local-constants-ext+ #x87CC) -(defconstant +max-optimized-vertex-shader-invariants-ext+ #x87CD) -(defconstant +max-optimized-vertex-shader-locals-ext+ #x87CE) -(defconstant +vertex-shader-instructions-ext+ #x87CF) -(defconstant +vertex-shader-variants-ext+ #x87D0) -(defconstant +vertex-shader-invariants-ext+ #x87D1) -(defconstant +vertex-shader-local-constants-ext+ #x87D2) -(defconstant +vertex-shader-locals-ext+ #x87D3) -(defconstant +vertex-shader-optimized-ext+ #x87D4) -(defconstant +x-ext+ #x87D5) -(defconstant +y-ext+ #x87D6) -(defconstant +z-ext+ #x87D7) -(defconstant +w-ext+ #x87D8) -(defconstant +negative-x-ext+ #x87D9) -(defconstant +negative-y-ext+ #x87DA) -(defconstant +negative-z-ext+ #x87DB) -(defconstant +negative-w-ext+ #x87DC) -(defconstant +zero-ext+ #x87DD) -(defconstant +one-ext+ #x87DE) -(defconstant +negative-one-ext+ #x87DF) -(defconstant +normalized-range-ext+ #x87E0) -(defconstant +full-range-ext+ #x87E1) -(defconstant +current-vertex-ext+ #x87E2) -(defconstant +mvp-matrix-ext+ #x87E3) -(defconstant +variant-value-ext+ #x87E4) -(defconstant +variant-datatype-ext+ #x87E5) -(defconstant +variant-array-stride-ext+ #x87E6) -(defconstant +variant-array-type-ext+ #x87E7) -(defconstant +variant-array-ext+ #x87E8) -(defconstant +variant-array-pointer-ext+ #x87E9) -(defconstant +invariant-value-ext+ #x87EA) -(defconstant +invariant-datatype-ext+ #x87EB) -(defconstant +local-constant-value-ext+ #x87EC) -(defconstant +local-constant-datatype-ext+ #x87ED) -(defglextfun - (("GetLocalConstantFloatvEXT" get-local-constant-floatv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Float32| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetLocalConstantIntegervEXT" get-local-constant-integerv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Int32| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetLocalConstantBooleanvEXT" get-local-constant-booleanv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Boolean| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetInvariantFloatvEXT" get-invariant-floatv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Float32| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetInvariantIntegervEXT" get-invariant-integerv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Int32| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetInvariantBooleanvEXT" get-invariant-booleanv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Boolean| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetVariantPointervEXT" get-variant-pointerv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |VoidPointer| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetVariantFloatvEXT" get-variant-floatv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Float32| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetVariantIntegervEXT" get-variant-integerv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Int32| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("GetVariantBooleanvEXT" get-variant-booleanv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |value| :type |GetVariantValueEXT| :direction :in) - (:name |data| :type |Boolean| :direction :out :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("ignore" "get") :offset ("?"))) -(defglextfun - (("IsVariantEnabledEXT" is-variant-enabled-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |cap| :type |VariantCapEXT| :direction :in)) - :return ("Boolean") :category ("EXT_vertex_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("BindParameterEXT" bind-parameter-ext) :args - ((:name |value| :type |VertexShaderParameterEXT| :direction :in)) :return - ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("BindTextureUnitParameterEXT" bind-texture-unit-parameter-ext) :args - ((:name |unit| :type |TextureUnit| :direction :in) - (:name |value| :type |VertexShaderTextureUnitParameter| :direction :in)) - :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("BindTexGenParameterEXT" bind-tex-gen-parameter-ext) :args - ((:name |unit| :type |TextureUnit| :direction :in) - (:name |coord| :type |TextureCoordName| :direction :in) - (:name |value| :type |TextureGenParameter| :direction :in)) - :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("BindMaterialParameterEXT" bind-material-parameter-ext) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |value| :type |MaterialParameter| :direction :in)) - :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("BindLightParameterEXT" bind-light-parameter-ext) :args - ((:name |light| :type |LightName| :direction :in) - (:name |value| :type |LightParameter| :direction :in)) - :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("DisableVariantClientStateEXT" disable-variant-client-state-ext) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("EnableVariantClientStateEXT" enable-variant-client-state-ext) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("VariantPointerEXT" variant-pointer-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |type| :type |ScalarType| :direction :in) - (:name |stride| :type |UInt32| :direction :in) - (:name |addr| :type |Void| :direction :in :array t :size - (|id| |type| |stride|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantuivEXT" variant-uiv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |UInt32| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantusvEXT" variant-usv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |UInt16| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantubvEXT" variant-ubv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |UInt8| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantdvEXT" variant-dv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |Float64| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantfvEXT" variant-fv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |Float32| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantivEXT" variant-iv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |Int32| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantsvEXT" variant-sv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |Int16| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("VariantbvEXT" variant-bv-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |addr| :type |Int8| :direction :in :array t :size (|id|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("SetLocalConstantEXT" set-local-constant-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |type| :type |ScalarType| :direction :in) - (:name |addr| :type |Void| :direction :in :array t :size (|id| |type|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("SetInvariantEXT" set-invariant-ext) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |type| :type |ScalarType| :direction :in) - (:name |addr| :type |Void| :direction :in :array t :size (|id| |type|))) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("GenSymbolsEXT" gen-symbols-ext) :args - ((:name |datatype| :type |DataTypeEXT| :direction :in) - (:name |storagetype| :type |VertexShaderStorageTypeEXT| :direction :in) - (:name |range| :type |ParameterRangeEXT| :direction :in) - (:name |components| :type |UInt32| :direction :in)) - :return ("UInt32") :category ("EXT_vertex_shader") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("ExtractComponentEXT" extract-component-ext) :args - ((:name |res| :type |UInt32| :direction :in) - (:name |src| :type |UInt32| :direction :in) - (:name |num| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("InsertComponentEXT" insert-component-ext) :args - ((:name |res| :type |UInt32| :direction :in) - (:name |src| :type |UInt32| :direction :in) - (:name |num| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("WriteMaskEXT" write-mask-ext) :args - ((:name |res| :type |UInt32| :direction :in) - (:name |in| :type |UInt32| :direction :in) - (:name |outX| :type |VertexShaderWriteMaskEXT| :direction :in) - (:name |outY| :type |VertexShaderWriteMaskEXT| :direction :in) - (:name |outZ| :type |VertexShaderWriteMaskEXT| :direction :in) - (:name |outW| :type |VertexShaderWriteMaskEXT| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("SwizzleEXT" swizzle-ext) :args - ((:name |res| :type |UInt32| :direction :in) - (:name |in| :type |UInt32| :direction :in) - (:name |outX| :type |VertexShaderCoordOutEXT| :direction :in) - (:name |outY| :type |VertexShaderCoordOutEXT| :direction :in) - (:name |outZ| :type |VertexShaderCoordOutEXT| :direction :in) - (:name |outW| :type |VertexShaderCoordOutEXT| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("ShaderOp3EXT" shader-op-3-ext) :args - ((:name |op| :type |VertexShaderOpEXT| :direction :in) - (:name |res| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg2| :type |UInt32| :direction :in) - (:name |arg3| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("ShaderOp2EXT" shader-op-2-ext) :args - ((:name |op| :type |VertexShaderOpEXT| :direction :in) - (:name |res| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in) - (:name |arg2| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("ShaderOp1EXT" shader-op-1-ext) :args - ((:name |op| :type |VertexShaderOpEXT| :direction :in) - (:name |res| :type |UInt32| :direction :in) - (:name |arg1| :type |UInt32| :direction :in)) - :return ("void") :category ("EXT_vertex_shader") :version ("1.2") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("ignore") :offset - ("?"))) -(defglextfun - (("DeleteVertexShaderEXT" delete-vertex-shader-ext) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("GenVertexShadersEXT" gen-vertex-shaders-ext) :args - ((:name |range| :type |UInt32| :direction :in)) :return ("UInt32") :category - ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("BindVertexShaderEXT" bind-vertex-shader-ext) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("EndVertexShaderEXT" end-vertex-shader-ext) :args nil :return ("void") - :category ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("BeginVertexShaderEXT" begin-vertex-shader-ext) :args nil :return ("void") - :category ("EXT_vertex_shader") :version ("1.2") :extension nil :glxropcode - ("?") :glxflags ("ignore") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ext_vertex_shader + +(defconstant +vertex-shader-ext+ #x8780) +(defconstant +vertex-shader-binding-ext+ #x8781) +(defconstant +op-index-ext+ #x8782) +(defconstant +op-negate-ext+ #x8783) +(defconstant +op-dot3-ext+ #x8784) +(defconstant +op-dot4-ext+ #x8785) +(defconstant +op-mul-ext+ #x8786) +(defconstant +op-add-ext+ #x8787) +(defconstant +op-madd-ext+ #x8788) +(defconstant +op-frac-ext+ #x8789) +(defconstant +op-max-ext+ #x878A) +(defconstant +op-min-ext+ #x878B) +(defconstant +op-set-ge-ext+ #x878C) +(defconstant +op-set-lt-ext+ #x878D) +(defconstant +op-clamp-ext+ #x878E) +(defconstant +op-floor-ext+ #x878F) +(defconstant +op-round-ext+ #x8790) +(defconstant +op-exp-base-2-ext+ #x8791) +(defconstant +op-log-base-2-ext+ #x8792) +(defconstant +op-power-ext+ #x8793) +(defconstant +op-recip-ext+ #x8794) +(defconstant +op-recip-sqrt-ext+ #x8795) +(defconstant +op-sub-ext+ #x8796) +(defconstant +op-cross-product-ext+ #x8797) +(defconstant +op-multiply-matrix-ext+ #x8798) +(defconstant +op-mov-ext+ #x8799) +(defconstant +output-vertex-ext+ #x879A) +(defconstant +output-color0-ext+ #x879B) +(defconstant +output-color1-ext+ #x879C) +(defconstant +output-texture-coord0-ext+ #x879D) +(defconstant +output-texture-coord1-ext+ #x879E) +(defconstant +output-texture-coord2-ext+ #x879F) +(defconstant +output-texture-coord3-ext+ #x87A0) +(defconstant +output-texture-coord4-ext+ #x87A1) +(defconstant +output-texture-coord5-ext+ #x87A2) +(defconstant +output-texture-coord6-ext+ #x87A3) +(defconstant +output-texture-coord7-ext+ #x87A4) +(defconstant +output-texture-coord8-ext+ #x87A5) +(defconstant +output-texture-coord9-ext+ #x87A6) +(defconstant +output-texture-coord10-ext+ #x87A7) +(defconstant +output-texture-coord11-ext+ #x87A8) +(defconstant +output-texture-coord12-ext+ #x87A9) +(defconstant +output-texture-coord13-ext+ #x87AA) +(defconstant +output-texture-coord14-ext+ #x87AB) +(defconstant +output-texture-coord15-ext+ #x87AC) +(defconstant +output-texture-coord16-ext+ #x87AD) +(defconstant +output-texture-coord17-ext+ #x87AE) +(defconstant +output-texture-coord18-ext+ #x87AF) +(defconstant +output-texture-coord19-ext+ #x87B0) +(defconstant +output-texture-coord20-ext+ #x87B1) +(defconstant +output-texture-coord21-ext+ #x87B2) +(defconstant +output-texture-coord22-ext+ #x87B3) +(defconstant +output-texture-coord23-ext+ #x87B4) +(defconstant +output-texture-coord24-ext+ #x87B5) +(defconstant +output-texture-coord25-ext+ #x87B6) +(defconstant +output-texture-coord26-ext+ #x87B7) +(defconstant +output-texture-coord27-ext+ #x87B8) +(defconstant +output-texture-coord28-ext+ #x87B9) +(defconstant +output-texture-coord29-ext+ #x87BA) +(defconstant +output-texture-coord30-ext+ #x87BB) +(defconstant +output-texture-coord31-ext+ #x87BC) +(defconstant +output-fog-ext+ #x87BD) +(defconstant +scalar-ext+ #x87BE) +(defconstant +vector-ext+ #x87BF) +(defconstant +matrix-ext+ #x87C0) +(defconstant +variant-ext+ #x87C1) +(defconstant +invariant-ext+ #x87C2) +(defconstant +local-constant-ext+ #x87C3) +(defconstant +local-ext+ #x87C4) +(defconstant +max-vertex-shader-instructions-ext+ #x87C5) +(defconstant +max-vertex-shader-variants-ext+ #x87C6) +(defconstant +max-vertex-shader-invariants-ext+ #x87C7) +(defconstant +max-vertex-shader-local-constants-ext+ #x87C8) +(defconstant +max-vertex-shader-locals-ext+ #x87C9) +(defconstant +max-optimized-vertex-shader-instructions-ext+ #x87CA) +(defconstant +max-optimized-vertex-shader-variants-ext+ #x87CB) +(defconstant +max-optimized-vertex-shader-local-constants-ext+ #x87CC) +(defconstant +max-optimized-vertex-shader-invariants-ext+ #x87CD) +(defconstant +max-optimized-vertex-shader-locals-ext+ #x87CE) +(defconstant +vertex-shader-instructions-ext+ #x87CF) +(defconstant +vertex-shader-variants-ext+ #x87D0) +(defconstant +vertex-shader-invariants-ext+ #x87D1) +(defconstant +vertex-shader-local-constants-ext+ #x87D2) +(defconstant +vertex-shader-locals-ext+ #x87D3) +(defconstant +vertex-shader-optimized-ext+ #x87D4) +(defconstant +x-ext+ #x87D5) +(defconstant +y-ext+ #x87D6) +(defconstant +z-ext+ #x87D7) +(defconstant +w-ext+ #x87D8) +(defconstant +negative-x-ext+ #x87D9) +(defconstant +negative-y-ext+ #x87DA) +(defconstant +negative-z-ext+ #x87DB) +(defconstant +negative-w-ext+ #x87DC) +(defconstant +zero-ext+ #x87DD) +(defconstant +one-ext+ #x87DE) +(defconstant +negative-one-ext+ #x87DF) +(defconstant +normalized-range-ext+ #x87E0) +(defconstant +full-range-ext+ #x87E1) +(defconstant +current-vertex-ext+ #x87E2) +(defconstant +mvp-matrix-ext+ #x87E3) +(defconstant +variant-value-ext+ #x87E4) +(defconstant +variant-datatype-ext+ #x87E5) +(defconstant +variant-array-stride-ext+ #x87E6) +(defconstant +variant-array-type-ext+ #x87E7) +(defconstant +variant-array-ext+ #x87E8) +(defconstant +variant-array-pointer-ext+ #x87E9) +(defconstant +invariant-value-ext+ #x87EA) +(defconstant +invariant-datatype-ext+ #x87EB) +(defconstant +local-constant-value-ext+ #x87EC) +(defconstant +local-constant-datatype-ext+ #x87ED) +(defglextfun "GetLocalConstantFloatvEXT" get-local-constant-floatv-ext :return + "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Float32| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetLocalConstantIntegervEXT" get-local-constant-integerv-ext + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Int32| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetLocalConstantBooleanvEXT" get-local-constant-booleanv-ext + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Boolean| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetInvariantFloatvEXT" get-invariant-floatv-ext :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Float32| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetInvariantIntegervEXT" get-invariant-integerv-ext :return + "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Int32| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetInvariantBooleanvEXT" get-invariant-booleanv-ext :return + "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Boolean| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetVariantPointervEXT" get-variant-pointerv-ext :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |VoidPointer| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetVariantFloatvEXT" get-variant-floatv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Float32| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetVariantIntegervEXT" get-variant-integerv-ext :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Int32| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GetVariantBooleanvEXT" get-variant-booleanv-ext :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |value| :type |GetVariantValueEXT| :direction :in) + (:name |data| :type |Boolean| :direction :out :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "IsVariantEnabledEXT" is-variant-enabled-ext :return "Boolean" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |cap| :type |VariantCapEXT| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "BindParameterEXT" bind-parameter-ext :return "UInt32" :args + ((:name |value| :type |VertexShaderParameterEXT| :direction :in)) :category + "EXT_vertex_shader" :version "1.2") +(defglextfun "BindTextureUnitParameterEXT" bind-texture-unit-parameter-ext + :return "UInt32" :args + ((:name |unit| :type |TextureUnit| :direction :in) + (:name |value| :type |VertexShaderTextureUnitParameter| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "BindTexGenParameterEXT" bind-tex-gen-parameter-ext :return + "UInt32" :args + ((:name |unit| :type |TextureUnit| :direction :in) + (:name |coord| :type |TextureCoordName| :direction :in) + (:name |value| :type |TextureGenParameter| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "BindMaterialParameterEXT" bind-material-parameter-ext :return + "UInt32" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |value| :type |MaterialParameter| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "BindLightParameterEXT" bind-light-parameter-ext :return "UInt32" + :args + ((:name |light| :type |LightName| :direction :in) + (:name |value| :type |LightParameter| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "DisableVariantClientStateEXT" disable-variant-client-state-ext + :return "void" :args ((:name |id| :type |UInt32| :direction :in)) :category + "EXT_vertex_shader" :version "1.2") +(defglextfun "EnableVariantClientStateEXT" enable-variant-client-state-ext + :return "void" :args ((:name |id| :type |UInt32| :direction :in)) :category + "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantPointerEXT" variant-pointer-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |type| :type |ScalarType| :direction :in) + (:name |stride| :type |UInt32| :direction :in) + (:name |addr| :type |Void| :direction :in :array t :size + (|id| |type| |stride|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantuivEXT" variant-uiv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |UInt32| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantusvEXT" variant-usv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |UInt16| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantubvEXT" variant-ubv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |UInt8| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantdvEXT" variant-dv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |Float64| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantfvEXT" variant-fv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |Float32| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantivEXT" variant-iv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |Int32| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantsvEXT" variant-sv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |Int16| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "VariantbvEXT" variant-bv-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |addr| :type |Int8| :direction :in :array t :size (|id|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "SetLocalConstantEXT" set-local-constant-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |type| :type |ScalarType| :direction :in) + (:name |addr| :type |Void| :direction :in :array t :size (|id| |type|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "SetInvariantEXT" set-invariant-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |type| :type |ScalarType| :direction :in) + (:name |addr| :type |Void| :direction :in :array t :size (|id| |type|))) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "GenSymbolsEXT" gen-symbols-ext :return "UInt32" :args + ((:name |datatype| :type |DataTypeEXT| :direction :in) + (:name |storagetype| :type |VertexShaderStorageTypeEXT| :direction :in) + (:name |range| :type |ParameterRangeEXT| :direction :in) + (:name |components| :type |UInt32| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "ExtractComponentEXT" extract-component-ext :return "void" :args + ((:name |res| :type |UInt32| :direction :in) + (:name |src| :type |UInt32| :direction :in) + (:name |num| :type |UInt32| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "InsertComponentEXT" insert-component-ext :return "void" :args + ((:name |res| :type |UInt32| :direction :in) + (:name |src| :type |UInt32| :direction :in) + (:name |num| :type |UInt32| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "WriteMaskEXT" write-mask-ext :return "void" :args + ((:name |res| :type |UInt32| :direction :in) + (:name |in| :type |UInt32| :direction :in) + (:name |outX| :type |VertexShaderWriteMaskEXT| :direction :in) + (:name |outY| :type |VertexShaderWriteMaskEXT| :direction :in) + (:name |outZ| :type |VertexShaderWriteMaskEXT| :direction :in) + (:name |outW| :type |VertexShaderWriteMaskEXT| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "SwizzleEXT" swizzle-ext :return "void" :args + ((:name |res| :type |UInt32| :direction :in) + (:name |in| :type |UInt32| :direction :in) + (:name |outX| :type |VertexShaderCoordOutEXT| :direction :in) + (:name |outY| :type |VertexShaderCoordOutEXT| :direction :in) + (:name |outZ| :type |VertexShaderCoordOutEXT| :direction :in) + (:name |outW| :type |VertexShaderCoordOutEXT| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "ShaderOp3EXT" shader-op-3-ext :return "void" :args + ((:name |op| :type |VertexShaderOpEXT| :direction :in) + (:name |res| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg2| :type |UInt32| :direction :in) + (:name |arg3| :type |UInt32| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "ShaderOp2EXT" shader-op-2-ext :return "void" :args + ((:name |op| :type |VertexShaderOpEXT| :direction :in) + (:name |res| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in) + (:name |arg2| :type |UInt32| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "ShaderOp1EXT" shader-op-1-ext :return "void" :args + ((:name |op| :type |VertexShaderOpEXT| :direction :in) + (:name |res| :type |UInt32| :direction :in) + (:name |arg1| :type |UInt32| :direction :in)) + :category "EXT_vertex_shader" :version "1.2") +(defglextfun "DeleteVertexShaderEXT" delete-vertex-shader-ext :return "void" + :args ((:name |id| :type |UInt32| :direction :in)) :category + "EXT_vertex_shader" :version "1.2") +(defglextfun "GenVertexShadersEXT" gen-vertex-shaders-ext :return "UInt32" + :args ((:name |range| :type |UInt32| :direction :in)) :category + "EXT_vertex_shader" :version "1.2") +(defglextfun "BindVertexShaderEXT" bind-vertex-shader-ext :return "void" :args + ((:name |id| :type |UInt32| :direction :in)) :category "EXT_vertex_shader" + :version "1.2") +(defglextfun "EndVertexShaderEXT" end-vertex-shader-ext :return "void" :args + nil :category "EXT_vertex_shader" :version "1.2") +(defglextfun "BeginVertexShaderEXT" begin-vertex-shader-ext :return "void" + :args nil :category "EXT_vertex_shader" :version "1.2") diff --git a/lib/opengl-ext_vertex_weighting.lisp b/lib/opengl-ext_vertex_weighting.lisp index ac3ef17..113f629 100644 --- a/lib/opengl-ext_vertex_weighting.lisp +++ b/lib/opengl-ext_vertex_weighting.lisp @@ -17,24 +17,17 @@ (defconstant +vertex-weight-array-type-ext+ #x850E) (defconstant +vertex-weight-array-stride-ext+ #x850F) (defconstant +vertex-weight-array-pointer-ext+ #x8510) -(defglextfun - (("VertexWeightPointerEXT" vertex-weight-pointer-ext) :args - ((:name |size| :type |SizeI| :direction :in) - (:name |type| :type |VertexWeightPointerTypeEXT| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("EXT_vertex_weighting") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :dlflags ("notlistable") :glxflags - ("ignore") :glsflags ("client") :glsopcode ("0x01DF") :offset ("496"))) -(defglextfun - (("VertexWeightfvEXT" vertex-weight-fv-ext) :args - ((:name |weight| :type |Float32| :direction :in :array t :size #x1)) :return - ("void") :category ("EXT_vertex_weighting") :version ("1.1") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4135") :glxflags ("ignore") - :glsopcode ("0x01DE") :offset ("495"))) -(defglextfun - (("VertexWeightfEXT" vertex-weight-f-ext) :args - ((:name |weight| :type |Float32| :direction :in)) :return ("void") :category - ("EXT_vertex_weighting") :vectorequiv ("VertexWeightfvEXT") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :offset ("494"))) +(defglextfun "VertexWeightPointerEXT" vertex-weight-pointer-ext :return "void" + :args + ((:name |size| :type |SizeI| :direction :in) + (:name |type| :type |VertexWeightPointerTypeEXT| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "EXT_vertex_weighting" :version "1.1") +(defglextfun "VertexWeightfvEXT" vertex-weight-fv-ext :return "void" :args + ((:name |weight| :type |Float32| :direction :in :array t :size #x1)) :category + "EXT_vertex_weighting" :version "1.1") +(defglextfun "VertexWeightfEXT" vertex-weight-f-ext :return "void" :args + ((:name |weight| :type |Float32| :direction :in)) :category + "EXT_vertex_weighting" :version "1.1") diff --git a/lib/opengl-gremedy_frame_terminator.lisp b/lib/opengl-gremedy_frame_terminator.lisp index 40984c3..1c5bf3c 100644 --- a/lib/opengl-gremedy_frame_terminator.lisp +++ b/lib/opengl-gremedy_frame_terminator.lisp @@ -4,7 +4,5 @@ ;;;; gremedy_frame_terminator -(defglextfun - (("FrameTerminatorGREMEDY" frame-terminator-gremedy) :args nil :return - ("void") :category ("GREMEDY_frame_terminator") :version ("1.0") :extension - nil :glsflags ("ignore") :glxflags ("ignore") :offset ("?"))) +(defglextfun "FrameTerminatorGREMEDY" frame-terminator-gremedy :return "void" + :args nil :category "GREMEDY_frame_terminator" :version "1.0") diff --git a/lib/opengl-gremedy_string_marker.lisp b/lib/opengl-gremedy_string_marker.lisp dissimilarity index 64% index 098796a..5141f51 100644 --- a/lib/opengl-gremedy_string_marker.lisp +++ b/lib/opengl-gremedy_string_marker.lisp @@ -1,12 +1,10 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; gremedy_string_marker - -(defglextfun - (("StringMarkerGREMEDY" string-marker-gremedy) :args - ((:name |len| :type |SizeI| :direction :in) - (:name |string| :type |Void| :direction :in :array t :size len)) - :return ("void") :category ("GREMEDY_string_marker") :version ("1.0") - :extension nil :glsflags ("ignore") :glxflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; gremedy_string_marker + +(defglextfun "StringMarkerGREMEDY" string-marker-gremedy :return "void" :args + ((:name |len| :type |SizeI| :direction :in) + (:name |string| :type |Void| :direction :in :array t :size len)) + :category "GREMEDY_string_marker" :version "1.0") diff --git a/lib/opengl-hp_image_transform.lisp b/lib/opengl-hp_image_transform.lisp dissimilarity index 73% index e61526c..53a1d4a 100644 --- a/lib/opengl-hp_image_transform.lisp +++ b/lib/opengl-hp_image_transform.lisp @@ -1,63 +1,57 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; hp_image_transform - -(defconstant +image-scale-x-hp+ #x8155) -(defconstant +image-scale-y-hp+ #x8156) -(defconstant +image-translate-x-hp+ #x8157) -(defconstant +image-translate-y-hp+ #x8158) -(defconstant +image-rotate-angle-hp+ #x8159) -(defconstant +image-rotate-origin-x-hp+ #x815A) -(defconstant +image-rotate-origin-y-hp+ #x815B) -(defconstant +image-mag-filter-hp+ #x815C) -(defconstant +image-min-filter-hp+ #x815D) -(defconstant +image-cubic-weight-hp+ #x815E) -(defconstant +cubic-hp+ #x815F) -(defconstant +average-hp+ #x8160) -(defconstant +image-transform-2d-hp+ #x8161) -(defconstant +post-image-transform-color-table-hp+ #x8162) -(defconstant +proxy-post-image-transform-color-table-hp+ #x8163) -(defglextfun - (("GetImageTransformParameterfvHP" get-image-transform-parameter-fv-hp) :args - ((:name |target| :type |ImageTransformTargetHP| :direction :in) - (:name |pname| :type |ImageTransformPNameHP| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("HP_image_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("GetImageTransformParameterivHP" get-image-transform-parameter-iv-hp) :args - ((:name |target| :type |ImageTransformTargetHP| :direction :in) - (:name |pname| :type |ImageTransformPNameHP| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("HP_image_transform") - :version ("1.1") :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ImageTransformParameterfvHP" image-transform-parameter-fv-hp) :args - ((:name |target| :type |ImageTransformTargetHP| :direction :in) - (:name |pname| :type |ImageTransformPNameHP| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("HP_image_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ImageTransformParameterivHP" image-transform-parameter-iv-hp) :args - ((:name |target| :type |ImageTransformTargetHP| :direction :in) - (:name |pname| :type |ImageTransformPNameHP| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("HP_image_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ImageTransformParameterfHP" image-transform-parameter-f-hp) :args - ((:name |target| :type |ImageTransformTargetHP| :direction :in) - (:name |pname| :type |ImageTransformPNameHP| :direction :in) - (:name |param| :type |Float32| :direction :in)) - :return ("void") :category ("HP_image_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ImageTransformParameteriHP" image-transform-parameter-i-hp) :args - ((:name |target| :type |ImageTransformTargetHP| :direction :in) - (:name |pname| :type |ImageTransformPNameHP| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("HP_image_transform") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; hp_image_transform + +(defconstant +image-scale-x-hp+ #x8155) +(defconstant +image-scale-y-hp+ #x8156) +(defconstant +image-translate-x-hp+ #x8157) +(defconstant +image-translate-y-hp+ #x8158) +(defconstant +image-rotate-angle-hp+ #x8159) +(defconstant +image-rotate-origin-x-hp+ #x815A) +(defconstant +image-rotate-origin-y-hp+ #x815B) +(defconstant +image-mag-filter-hp+ #x815C) +(defconstant +image-min-filter-hp+ #x815D) +(defconstant +image-cubic-weight-hp+ #x815E) +(defconstant +cubic-hp+ #x815F) +(defconstant +average-hp+ #x8160) +(defconstant +image-transform-2d-hp+ #x8161) +(defconstant +post-image-transform-color-table-hp+ #x8162) +(defconstant +proxy-post-image-transform-color-table-hp+ #x8163) +(defglextfun "GetImageTransformParameterfvHP" + get-image-transform-parameter-fv-hp :return "void" :args + ((:name |target| :type |ImageTransformTargetHP| :direction :in) + (:name |pname| :type |ImageTransformPNameHP| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "HP_image_transform" :version "1.1") +(defglextfun "GetImageTransformParameterivHP" + get-image-transform-parameter-iv-hp :return "void" :args + ((:name |target| :type |ImageTransformTargetHP| :direction :in) + (:name |pname| :type |ImageTransformPNameHP| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "HP_image_transform" :version "1.1") +(defglextfun "ImageTransformParameterfvHP" image-transform-parameter-fv-hp + :return "void" :args + ((:name |target| :type |ImageTransformTargetHP| :direction :in) + (:name |pname| :type |ImageTransformPNameHP| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size (|pname|))) + :category "HP_image_transform" :version "1.1") +(defglextfun "ImageTransformParameterivHP" image-transform-parameter-iv-hp + :return "void" :args + ((:name |target| :type |ImageTransformTargetHP| :direction :in) + (:name |pname| :type |ImageTransformPNameHP| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) + :category "HP_image_transform" :version "1.1") +(defglextfun "ImageTransformParameterfHP" image-transform-parameter-f-hp + :return "void" :args + ((:name |target| :type |ImageTransformTargetHP| :direction :in) + (:name |pname| :type |ImageTransformPNameHP| :direction :in) + (:name |param| :type |Float32| :direction :in)) + :category "HP_image_transform" :version "1.1") +(defglextfun "ImageTransformParameteriHP" image-transform-parameter-i-hp + :return "void" :args + ((:name |target| :type |ImageTransformTargetHP| :direction :in) + (:name |pname| :type |ImageTransformPNameHP| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "HP_image_transform" :version "1.1") diff --git a/lib/opengl-ibm_multimode_draw_arrays.lisp b/lib/opengl-ibm_multimode_draw_arrays.lisp dissimilarity index 86% index 706215b..9ac9fb5 100644 --- a/lib/opengl-ibm_multimode_draw_arrays.lisp +++ b/lib/opengl-ibm_multimode_draw_arrays.lisp @@ -1,26 +1,24 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ibm_multimode_draw_arrays - -(defglextfun - (("MultiModeDrawElementsIBM" multi-mode-draw-elements-ibm) :args - ((:name |mode| :type |BeginMode| :direction :in :array t :size (|primcount|)) - (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |ConstVoidPointer| :direction :in :array t :size - (|primcount|)) - (:name |primcount| :type |SizeI| :direction :in) - (:name |modestride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_multimode_draw_arrays") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("709"))) -(defglextfun - (("MultiModeDrawArraysIBM" multi-mode-draw-arrays-ibm) :args - ((:name |mode| :type |BeginMode| :direction :in :array t :size (|primcount|)) - (:name |first| :type |Int32| :direction :in :array t :size (|primcount|)) - (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) - (:name |primcount| :type |SizeI| :direction :in) - (:name |modestride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_multimode_draw_arrays") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("708"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ibm_multimode_draw_arrays + +(defglextfun "MultiModeDrawElementsIBM" multi-mode-draw-elements-ibm :return + "void" :args + ((:name |mode| :type |BeginMode| :direction :in :array t :size (|primcount|)) + (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |ConstVoidPointer| :direction :in :array t :size + (|primcount|)) + (:name |primcount| :type |SizeI| :direction :in) + (:name |modestride| :type |Int32| :direction :in)) + :category "IBM_multimode_draw_arrays" :version "1.1") +(defglextfun "MultiModeDrawArraysIBM" multi-mode-draw-arrays-ibm :return "void" + :args + ((:name |mode| :type |BeginMode| :direction :in :array t :size (|primcount|)) + (:name |first| :type |Int32| :direction :in :array t :size (|primcount|)) + (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) + (:name |primcount| :type |SizeI| :direction :in) + (:name |modestride| :type |Int32| :direction :in)) + :category "IBM_multimode_draw_arrays" :version "1.1") diff --git a/lib/opengl-ibm_vertex_array_lists.lisp b/lib/opengl-ibm_vertex_array_lists.lisp dissimilarity index 79% index 44b5ce6..7d9b935 100644 --- a/lib/opengl-ibm_vertex_array_lists.lisp +++ b/lib/opengl-ibm_vertex_array_lists.lisp @@ -1,97 +1,87 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ibm_vertex_array_lists - -(defconstant +vertex-array-list-ibm+ #x1929E) -(defconstant +normal-array-list-ibm+ #x1929F) -(defconstant +color-array-list-ibm+ #x192A0) -(defconstant +index-array-list-ibm+ #x192A1) -(defconstant +texture-coord-array-list-ibm+ #x192A2) -(defconstant +edge-flag-array-list-ibm+ #x192A3) -(defconstant +fog-coordinate-array-list-ibm+ #x192A4) -(defconstant +secondary-color-array-list-ibm+ #x192A5) -(defconstant +vertex-array-list-stride-ibm+ #x192A8) -(defconstant +normal-array-list-stride-ibm+ #x192A9) -(defconstant +color-array-list-stride-ibm+ #x192AA) -(defconstant +index-array-list-stride-ibm+ #x192AB) -(defconstant +texture-coord-array-list-stride-ibm+ #x192AC) -(defconstant +edge-flag-array-list-stride-ibm+ #x192AD) -(defconstant +fog-coordinate-array-list-stride-ibm+ #x192AE) -(defconstant +secondary-color-array-list-stride-ibm+ #x192AF) -(defglextfun - (("VertexPointerListIBM" vertex-pointer-list-ibm) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexPointerType| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|size| |type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoordPointerListIBM" tex-coord-pointer-list-ibm) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |TexCoordPointerType| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|size| |type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("NormalPointerListIBM" normal-pointer-list-ibm) :args - ((:name |type| :type |NormalPointerType| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("IndexPointerListIBM" index-pointer-list-ibm) :args - ((:name |type| :type |IndexPointerType| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("FogCoordPointerListIBM" fog-coord-pointer-list-ibm) :args - ((:name |type| :type |FogPointerTypeIBM| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("EdgeFlagPointerListIBM" edge-flag-pointer-list-ibm) :args - ((:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |BooleanPointer| :direction :in :array t :size - (|stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("SecondaryColorPointerListIBM" secondary-color-pointer-list-ibm) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |SecondaryColorPointerTypeIBM| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|size| |type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ColorPointerListIBM" color-pointer-list-ibm) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |ColorPointerType| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|size| |type| |stride|) :retained t) - (:name |ptrstride| :type |Int32| :direction :in)) - :return ("void") :category ("IBM_vertex_array_lists") :version ("1.1") - :glxropcode ("?") :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ibm_vertex_array_lists + +(defconstant +vertex-array-list-ibm+ #x1929E) +(defconstant +normal-array-list-ibm+ #x1929F) +(defconstant +color-array-list-ibm+ #x192A0) +(defconstant +index-array-list-ibm+ #x192A1) +(defconstant +texture-coord-array-list-ibm+ #x192A2) +(defconstant +edge-flag-array-list-ibm+ #x192A3) +(defconstant +fog-coordinate-array-list-ibm+ #x192A4) +(defconstant +secondary-color-array-list-ibm+ #x192A5) +(defconstant +vertex-array-list-stride-ibm+ #x192A8) +(defconstant +normal-array-list-stride-ibm+ #x192A9) +(defconstant +color-array-list-stride-ibm+ #x192AA) +(defconstant +index-array-list-stride-ibm+ #x192AB) +(defconstant +texture-coord-array-list-stride-ibm+ #x192AC) +(defconstant +edge-flag-array-list-stride-ibm+ #x192AD) +(defconstant +fog-coordinate-array-list-stride-ibm+ #x192AE) +(defconstant +secondary-color-array-list-stride-ibm+ #x192AF) +(defglextfun "VertexPointerListIBM" vertex-pointer-list-ibm :return "void" + :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexPointerType| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|size| |type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "TexCoordPointerListIBM" tex-coord-pointer-list-ibm :return "void" + :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |TexCoordPointerType| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|size| |type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "NormalPointerListIBM" normal-pointer-list-ibm :return "void" + :args + ((:name |type| :type |NormalPointerType| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "IndexPointerListIBM" index-pointer-list-ibm :return "void" :args + ((:name |type| :type |IndexPointerType| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "FogCoordPointerListIBM" fog-coord-pointer-list-ibm :return "void" + :args + ((:name |type| :type |FogPointerTypeIBM| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "EdgeFlagPointerListIBM" edge-flag-pointer-list-ibm :return "void" + :args + ((:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |BooleanPointer| :direction :in :array t :size + (|stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "SecondaryColorPointerListIBM" secondary-color-pointer-list-ibm + :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |SecondaryColorPointerTypeIBM| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|size| |type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") +(defglextfun "ColorPointerListIBM" color-pointer-list-ibm :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |ColorPointerType| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|size| |type| |stride|) :retained t) + (:name |ptrstride| :type |Int32| :direction :in)) + :category "IBM_vertex_array_lists" :version "1.1") diff --git a/lib/opengl-ingr_blend_func_separate.lisp b/lib/opengl-ingr_blend_func_separate.lisp dissimilarity index 75% index 2b9fb55..54e6a56 100644 --- a/lib/opengl-ingr_blend_func_separate.lisp +++ b/lib/opengl-ingr_blend_func_separate.lisp @@ -1,15 +1,13 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; ingr_blend_func_separate - -(defglextfun - (("BlendFuncSeparateINGR" blend-func-separate-ingr) :args - ((:name |sfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |dfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |sfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |dfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in)) - :return ("void") :category ("INGR_blend_func_separate") :glxropcode ("4134") - :version ("1.0") :extension nil :alias ("BlendFuncSeparateEXT") :glsalias - ("BlendFuncSeparateEXT"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; ingr_blend_func_separate + +(defglextfun "BlendFuncSeparateINGR" blend-func-separate-ingr :return "void" + :args + ((:name |sfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |dfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |sfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |dfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in)) + :category "INGR_blend_func_separate" :version "1.0") diff --git a/lib/opengl-intel_parallel_arrays.lisp b/lib/opengl-intel_parallel_arrays.lisp dissimilarity index 70% index bd22066..601e847 100644 --- a/lib/opengl-intel_parallel_arrays.lisp +++ b/lib/opengl-intel_parallel_arrays.lisp @@ -1,51 +1,40 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; intel_parallel_arrays - -(defconstant +parallel-arrays-intel+ #x83F4) -(defconstant +vertex-array-parallel-pointers-intel+ #x83F5) -(defconstant +normal-array-parallel-pointers-intel+ #x83F6) -(defconstant +color-array-parallel-pointers-intel+ #x83F7) -(defconstant +texture-coord-array-parallel-pointers-intel+ #x83F8) -(defconstant +parallel-arrays-intel+ #x83F4) -(defconstant +vertex-array-parallel-pointers-intel+ #x83F5) -(defconstant +normal-array-parallel-pointers-intel+ #x83F6) -(defconstant +color-array-parallel-pointers-intel+ #x83F7) -(defconstant +texture-coord-array-parallel-pointers-intel+ #x83F8) -(defglextfun - (("TexCoordPointervINTEL" tex-coord-pointerv-intel) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexPointerType| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 - :retained t)) - :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1") - :glsflags ("ignore" "client") :offset ("?"))) -(defglextfun - (("ColorPointervINTEL" color-pointerv-intel) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexPointerType| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 - :retained t)) - :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1") - :glsflags ("ignore" "client") :offset ("?"))) -(defglextfun - (("NormalPointervINTEL" normal-pointerv-intel) :args - ((:name |type| :type |NormalPointerType| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 - :retained t)) - :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1") - :glsflags ("ignore" "client") :offset ("?"))) -(defglextfun - (("VertexPointervINTEL" vertex-pointerv-intel) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexPointerType| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 - :retained t)) - :return ("void") :category ("INTEL_parallel_arrays") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "EXT") :version ("1.1") - :glsflags ("ignore" "client") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; intel_parallel_arrays + +(defconstant +parallel-arrays-intel+ #x83F4) +(defconstant +vertex-array-parallel-pointers-intel+ #x83F5) +(defconstant +normal-array-parallel-pointers-intel+ #x83F6) +(defconstant +color-array-parallel-pointers-intel+ #x83F7) +(defconstant +texture-coord-array-parallel-pointers-intel+ #x83F8) +(defconstant +parallel-arrays-intel+ #x83F4) +(defconstant +vertex-array-parallel-pointers-intel+ #x83F5) +(defconstant +normal-array-parallel-pointers-intel+ #x83F6) +(defconstant +color-array-parallel-pointers-intel+ #x83F7) +(defconstant +texture-coord-array-parallel-pointers-intel+ #x83F8) +(defglextfun "TexCoordPointervINTEL" tex-coord-pointerv-intel :return "void" + :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexPointerType| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 + :retained t)) + :category "INTEL_parallel_arrays" :version "1.1") +(defglextfun "ColorPointervINTEL" color-pointerv-intel :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexPointerType| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 + :retained t)) + :category "INTEL_parallel_arrays" :version "1.1") +(defglextfun "NormalPointervINTEL" normal-pointerv-intel :return "void" :args + ((:name |type| :type |NormalPointerType| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 + :retained t)) + :category "INTEL_parallel_arrays" :version "1.1") +(defglextfun "VertexPointervINTEL" vertex-pointerv-intel :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexPointerType| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size #x4 + :retained t)) + :category "INTEL_parallel_arrays" :version "1.1") diff --git a/lib/opengl-mesa_resize_buffers.lisp b/lib/opengl-mesa_resize_buffers.lisp index 8af285d..f0b5dfe 100644 --- a/lib/opengl-mesa_resize_buffers.lisp +++ b/lib/opengl-mesa_resize_buffers.lisp @@ -4,7 +4,5 @@ ;;;; mesa_resize_buffers -(defglextfun - (("ResizeBuffersMESA" resize-buffers-mesa) :args nil :return ("void") - :category ("MESA_resize_buffers") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01EF") :offset ("512"))) +(defglextfun "ResizeBuffersMESA" resize-buffers-mesa :return "void" :args nil + :category "MESA_resize_buffers" :version "1.0") diff --git a/lib/opengl-mesa_window_pos.lisp b/lib/opengl-mesa_window_pos.lisp dissimilarity index 97% index 9ffd7eb..392933a 100644 --- a/lib/opengl-mesa_window_pos.lisp +++ b/lib/opengl-mesa_window_pos.lisp @@ -1,150 +1,102 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; mesa_window_pos - -(defglextfun - (("WindowPos4svMESA" window-pos-4sv-mesa) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01FB") :offset ("536"))) -(defglextfun - (("WindowPos4sMESA" window-pos-4s-mesa) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in) - (:name |w| :type |CoordS| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos4svMESA") :version ("1.0") :offset ("535"))) -(defglextfun - (("WindowPos4ivMESA" window-pos-4iv-mesa) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01FA") :offset ("534"))) -(defglextfun - (("WindowPos4iMESA" window-pos-4i-mesa) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in) - (:name |w| :type |CoordI| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos4ivMESA") :version ("1.0") :offset ("533"))) -(defglextfun - (("WindowPos4fvMESA" window-pos-4fv-mesa) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F9") :offset ("532"))) -(defglextfun - (("WindowPos4fMESA" window-pos-4f-mesa) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in) - (:name |w| :type |CoordF| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos4fvMESA") :version ("1.0") :offset ("531"))) -(defglextfun - (("WindowPos4dvMESA" window-pos-4dv-mesa) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F8") :offset ("530"))) -(defglextfun - (("WindowPos4dMESA" window-pos-4d-mesa) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in) - (:name |w| :type |CoordD| :direction :in)) - :return ("void") :vectorequiv ("WindowPos4dvMESA") :category - ("MESA_window_pos") :version ("1.0") :offset ("529"))) -(defglextfun - (("WindowPos3svMESA" window-pos-3sv-mesa) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F7") :alias ("WindowPos3svARB"))) -(defglextfun - (("WindowPos3sMESA" window-pos-3s-mesa) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos3svMESA") :version ("1.0") :alias ("WindowPos3sARB"))) -(defglextfun - (("WindowPos3ivMESA" window-pos-3iv-mesa) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F6") :alias ("WindowPos3ivARB"))) -(defglextfun - (("WindowPos3iMESA" window-pos-3i-mesa) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos3ivMESA") :version ("1.0") :alias ("WindowPos3iARB"))) -(defglextfun - (("WindowPos3fvMESA" window-pos-3fv-mesa) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F5") :alias ("WindowPos3fvARB"))) -(defglextfun - (("WindowPos3fMESA" window-pos-3f-mesa) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos3fvMESA") :version ("1.0") :alias ("WindowPos3fARB"))) -(defglextfun - (("WindowPos3dvMESA" window-pos-3dv-mesa) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F4") :alias ("WindowPos3dvARB"))) -(defglextfun - (("WindowPos3dMESA" window-pos-3d-mesa) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in)) - :return ("void") :vectorequiv ("WindowPos3dvMESA") :category - ("MESA_window_pos") :version ("1.0") :alias ("WindowPos3dARB"))) -(defglextfun - (("WindowPos2svMESA" window-pos-2sv-mesa) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F3") :alias ("WindowPos2svARB"))) -(defglextfun - (("WindowPos2sMESA" window-pos-2s-mesa) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos2svMESA") :version ("1.0") :alias ("WindowPos2sARB"))) -(defglextfun - (("WindowPos2ivMESA" window-pos-2iv-mesa) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F2") :alias ("WindowPos2ivARB"))) -(defglextfun - (("WindowPos2iMESA" window-pos-2i-mesa) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos2ivMESA") :version ("1.0") :alias ("WindowPos2iARB"))) -(defglextfun - (("WindowPos2fvMESA" window-pos-2fv-mesa) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F1") :alias ("WindowPos2fvARB"))) -(defglextfun - (("WindowPos2fMESA" window-pos-2f-mesa) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos2fvMESA") :version ("1.0") :alias ("WindowPos2fARB"))) -(defglextfun - (("WindowPos2dvMESA" window-pos-2dv-mesa) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("MESA_window_pos") :version ("1.0") :glxropcode ("?") - :glsopcode ("0x01F0") :alias ("WindowPos2dvARB"))) -(defglextfun - (("WindowPos2dMESA" window-pos-2d-mesa) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in)) - :return ("void") :category ("MESA_window_pos") :vectorequiv - ("WindowPos2dvMESA") :version ("1.0") :alias ("WindowPos2dARB"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; mesa_window_pos + +(defglextfun "WindowPos4svMESA" window-pos-4sv-mesa :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4sMESA" window-pos-4s-mesa :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in) + (:name |w| :type |CoordS| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4ivMESA" window-pos-4iv-mesa :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4iMESA" window-pos-4i-mesa :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in) + (:name |w| :type |CoordI| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4fvMESA" window-pos-4fv-mesa :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4fMESA" window-pos-4f-mesa :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in) + (:name |w| :type |CoordF| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4dvMESA" window-pos-4dv-mesa :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos4dMESA" window-pos-4d-mesa :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in) + (:name |w| :type |CoordD| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3svMESA" window-pos-3sv-mesa :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3sMESA" window-pos-3s-mesa :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3ivMESA" window-pos-3iv-mesa :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3iMESA" window-pos-3i-mesa :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3fvMESA" window-pos-3fv-mesa :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3fMESA" window-pos-3f-mesa :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3dvMESA" window-pos-3dv-mesa :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos3dMESA" window-pos-3d-mesa :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2svMESA" window-pos-2sv-mesa :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2sMESA" window-pos-2s-mesa :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2ivMESA" window-pos-2iv-mesa :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2iMESA" window-pos-2i-mesa :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2fvMESA" window-pos-2fv-mesa :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2fMESA" window-pos-2f-mesa :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in)) + :category "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2dvMESA" window-pos-2dv-mesa :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :category + "MESA_window_pos" :version "1.0") +(defglextfun "WindowPos2dMESA" window-pos-2d-mesa :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in)) + :category "MESA_window_pos" :version "1.0") diff --git a/lib/opengl-nv_depth_buffer_float.lisp b/lib/opengl-nv_depth_buffer_float.lisp dissimilarity index 71% index 0b41537..b84c42f 100644 --- a/lib/opengl-nv_depth_buffer_float.lisp +++ b/lib/opengl-nv_depth_buffer_float.lisp @@ -1,29 +1,21 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_depth_buffer_float - -(defconstant +depth-component32f-nv+ #x8DAB) -(defconstant +depth32f-stencil8-nv+ #x8DAC) -(defconstant +float-32-unsigned-int-24-8-rev-nv+ #x8DAD) -(defconstant +depth-buffer-float-mode-nv+ #x8DAF) -(defglextfun - (("DepthBoundsdNV" depth-bounds-d-nv) :args - ((:name |zmin| :type |Float64| :direction :in) - (:name |zmax| :type |Float64| :direction :in)) - :return ("void") :category ("NV_depth_buffer_float") :extension - ("soft" "WINSOFT" "NV50") :version ("2.0") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ClearDepthdNV" clear-depth-d-nv) :args - ((:name |depth| :type |Float64| :direction :in)) :return ("void") :category - ("NV_depth_buffer_float") :extension ("soft" "WINSOFT" "NV50") :version - ("2.0") :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("DepthRangedNV" depth-ranged-nv) :args - ((:name |zNear| :type |Float64| :direction :in) - (:name |zFar| :type |Float64| :direction :in)) - :return ("void") :category ("NV_depth_buffer_float") :extension - ("soft" "WINSOFT" "NV50") :version ("2.0") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_depth_buffer_float + +(defconstant +depth-component32f-nv+ #x8DAB) +(defconstant +depth32f-stencil8-nv+ #x8DAC) +(defconstant +float-32-unsigned-int-24-8-rev-nv+ #x8DAD) +(defconstant +depth-buffer-float-mode-nv+ #x8DAF) +(defglextfun "DepthBoundsdNV" depth-bounds-d-nv :return "void" :args + ((:name |zmin| :type |Float64| :direction :in) + (:name |zmax| :type |Float64| :direction :in)) + :category "NV_depth_buffer_float" :version "2.0") +(defglextfun "ClearDepthdNV" clear-depth-d-nv :return "void" :args + ((:name |depth| :type |Float64| :direction :in)) :category + "NV_depth_buffer_float" :version "2.0") +(defglextfun "DepthRangedNV" depth-ranged-nv :return "void" :args + ((:name |zNear| :type |Float64| :direction :in) + (:name |zFar| :type |Float64| :direction :in)) + :category "NV_depth_buffer_float" :version "2.0") diff --git a/lib/opengl-nv_evaluators.lisp b/lib/opengl-nv_evaluators.lisp dissimilarity index 78% index adb48cc..c058935 100644 --- a/lib/opengl-nv_evaluators.lisp +++ b/lib/opengl-nv_evaluators.lisp @@ -1,118 +1,94 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_evaluators - -(defconstant +eval-2d-nv+ #x86C0) -(defconstant +eval-triangular-2d-nv+ #x86C1) -(defconstant +map-tessellation-nv+ #x86C2) -(defconstant +map-attrib-u-order-nv+ #x86C3) -(defconstant +map-attrib-v-order-nv+ #x86C4) -(defconstant +eval-fractional-tessellation-nv+ #x86C5) -(defconstant +eval-vertex-attrib0-nv+ #x86C6) -(defconstant +eval-vertex-attrib1-nv+ #x86C7) -(defconstant +eval-vertex-attrib2-nv+ #x86C8) -(defconstant +eval-vertex-attrib3-nv+ #x86C9) -(defconstant +eval-vertex-attrib4-nv+ #x86CA) -(defconstant +eval-vertex-attrib5-nv+ #x86CB) -(defconstant +eval-vertex-attrib6-nv+ #x86CC) -(defconstant +eval-vertex-attrib7-nv+ #x86CD) -(defconstant +eval-vertex-attrib8-nv+ #x86CE) -(defconstant +eval-vertex-attrib9-nv+ #x86CF) -(defconstant +eval-vertex-attrib10-nv+ #x86D0) -(defconstant +eval-vertex-attrib11-nv+ #x86D1) -(defconstant +eval-vertex-attrib12-nv+ #x86D2) -(defconstant +eval-vertex-attrib13-nv+ #x86D3) -(defconstant +eval-vertex-attrib14-nv+ #x86D4) -(defconstant +eval-vertex-attrib15-nv+ #x86D5) -(defconstant +max-map-tessellation-nv+ #x86D6) -(defconstant +max-rational-eval-order-nv+ #x86D7) -(defglextfun - (("EvalMapsNV" eval-maps-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |mode| :type |EvalMapsModeNV| :direction :in)) - :return ("void") :category ("NV_evaluators") :version ("1.1") :extension - ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glsopcode ("0x0224") :offset - ("?"))) -(defglextfun - (("GetMapAttribParameterfvNV" get-map-attrib-parameter-fv-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |MapAttribParameterNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("NV_evaluators") :dlflags ("notlistable") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0223") :offset ("?"))) -(defglextfun - (("GetMapAttribParameterivNV" get-map-attrib-parameter-iv-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |MapAttribParameterNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("NV_evaluators") :dlflags ("notlistable") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0222") :offset ("?"))) -(defglextfun - (("GetMapParameterfvNV" get-map-parameter-fv-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |pname| :type |MapParameterNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size - (|target| |pname|))) - :return ("void") :category ("NV_evaluators") :dlflags ("notlistable") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0221") :offset ("?"))) -(defglextfun - (("GetMapParameterivNV" get-map-parameter-iv-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |pname| :type |MapParameterNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size - (|target| |pname|))) - :return ("void") :category ("NV_evaluators") :dlflags ("notlistable") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0220") :offset ("?"))) -(defglextfun - (("GetMapControlPointsNV" get-map-control-points-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |type| :type |MapTypeNV| :direction :in) - (:name |ustride| :type |SizeI| :direction :in) - (:name |vstride| :type |SizeI| :direction :in) - (:name |packed| :type |Boolean| :direction :in) - (:name |points| :type |Void| :direction :out :array t :size (|target|))) - :return ("void") :category ("NV_evaluators") :dlflags ("notlistable") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x021F") :offset ("?"))) -(defglextfun - (("MapParameterfvNV" map-parameter-fv-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |pname| :type |MapParameterNV| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|target| |pname|))) - :return ("void") :category ("NV_evaluators") :version ("1.1") :extension - ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glsflags ("ignore") - :glsopcode ("0x021E") :offset ("?"))) -(defglextfun - (("MapParameterivNV" map-parameter-iv-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |pname| :type |MapParameterNV| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|target| |pname|))) - :return ("void") :category ("NV_evaluators") :version ("1.1") :extension - ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glsflags ("ignore") - :glsopcode ("0x021D") :offset ("?"))) -(defglextfun - (("MapControlPointsNV" map-control-points-nv) :args - ((:name |target| :type |EvalTargetNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |type| :type |MapTypeNV| :direction :in) - (:name |ustride| :type |SizeI| :direction :in) - (:name |vstride| :type |SizeI| :direction :in) - (:name |uorder| :type |CheckedInt32| :direction :in) - (:name |vorder| :type |CheckedInt32| :direction :in) - (:name |packed| :type |Boolean| :direction :in) - (:name |points| :type |Void| :direction :in :array t :size - (|target| |uorder| |vorder|))) - :return ("void") :category ("NV_evaluators") :dlflags ("handcode") :version - ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glsflags - ("ignore") :glsopcode ("0x021C") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_evaluators + +(defconstant +eval-2d-nv+ #x86C0) +(defconstant +eval-triangular-2d-nv+ #x86C1) +(defconstant +map-tessellation-nv+ #x86C2) +(defconstant +map-attrib-u-order-nv+ #x86C3) +(defconstant +map-attrib-v-order-nv+ #x86C4) +(defconstant +eval-fractional-tessellation-nv+ #x86C5) +(defconstant +eval-vertex-attrib0-nv+ #x86C6) +(defconstant +eval-vertex-attrib1-nv+ #x86C7) +(defconstant +eval-vertex-attrib2-nv+ #x86C8) +(defconstant +eval-vertex-attrib3-nv+ #x86C9) +(defconstant +eval-vertex-attrib4-nv+ #x86CA) +(defconstant +eval-vertex-attrib5-nv+ #x86CB) +(defconstant +eval-vertex-attrib6-nv+ #x86CC) +(defconstant +eval-vertex-attrib7-nv+ #x86CD) +(defconstant +eval-vertex-attrib8-nv+ #x86CE) +(defconstant +eval-vertex-attrib9-nv+ #x86CF) +(defconstant +eval-vertex-attrib10-nv+ #x86D0) +(defconstant +eval-vertex-attrib11-nv+ #x86D1) +(defconstant +eval-vertex-attrib12-nv+ #x86D2) +(defconstant +eval-vertex-attrib13-nv+ #x86D3) +(defconstant +eval-vertex-attrib14-nv+ #x86D4) +(defconstant +eval-vertex-attrib15-nv+ #x86D5) +(defconstant +max-map-tessellation-nv+ #x86D6) +(defconstant +max-rational-eval-order-nv+ #x86D7) +(defglextfun "EvalMapsNV" eval-maps-nv :return "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |mode| :type |EvalMapsModeNV| :direction :in)) + :category "NV_evaluators" :version "1.1") +(defglextfun "GetMapAttribParameterfvNV" get-map-attrib-parameter-fv-nv :return + "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |MapAttribParameterNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "GetMapAttribParameterivNV" get-map-attrib-parameter-iv-nv :return + "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |MapAttribParameterNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "GetMapParameterfvNV" get-map-parameter-fv-nv :return "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |pname| :type |MapParameterNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size + (|target| |pname|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "GetMapParameterivNV" get-map-parameter-iv-nv :return "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |pname| :type |MapParameterNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size + (|target| |pname|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "GetMapControlPointsNV" get-map-control-points-nv :return "void" + :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |type| :type |MapTypeNV| :direction :in) + (:name |ustride| :type |SizeI| :direction :in) + (:name |vstride| :type |SizeI| :direction :in) + (:name |packed| :type |Boolean| :direction :in) + (:name |points| :type |Void| :direction :out :array t :size (|target|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "MapParameterfvNV" map-parameter-fv-nv :return "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |pname| :type |MapParameterNV| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|target| |pname|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "MapParameterivNV" map-parameter-iv-nv :return "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |pname| :type |MapParameterNV| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|target| |pname|))) + :category "NV_evaluators" :version "1.1") +(defglextfun "MapControlPointsNV" map-control-points-nv :return "void" :args + ((:name |target| :type |EvalTargetNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |type| :type |MapTypeNV| :direction :in) + (:name |ustride| :type |SizeI| :direction :in) + (:name |vstride| :type |SizeI| :direction :in) + (:name |uorder| :type |CheckedInt32| :direction :in) + (:name |vorder| :type |CheckedInt32| :direction :in) + (:name |packed| :type |Boolean| :direction :in) + (:name |points| :type |Void| :direction :in :array t :size + (|target| |uorder| |vorder|))) + :category "NV_evaluators" :version "1.1") diff --git a/lib/opengl-nv_fence.lisp b/lib/opengl-nv_fence.lisp dissimilarity index 89% index a0487ee..e4b2dd5 100644 --- a/lib/opengl-nv_fence.lisp +++ b/lib/opengl-nv_fence.lisp @@ -1,56 +1,35 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_fence - -(defconstant +all-completed-nv+ #x84F2) -(defconstant +fence-status-nv+ #x84F3) -(defconstant +fence-condition-nv+ #x84F4) -(defglextfun - (("SetFenceNV" set-fence-nv) :args - ((:name |fence| :type |FenceNV| :direction :in) - (:name |condition| :type |FenceConditionNV| :direction :in)) - :return ("void") :category ("NV_fence") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glsopcode ("0x0217") :offset - ("653"))) -(defglextfun - (("FinishFenceNV" finish-fence-nv) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("void") :category - ("NV_fence") :dlflags ("notlistable") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1312") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0219") :offset ("652"))) -(defglextfun - (("GetFenceivNV" get-fence-iv-nv) :args - ((:name |fence| :type |FenceNV| :direction :in) - (:name |pname| :type |FenceParameterNameNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("NV_fence") :dlflags ("notlistable") :version - ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1280") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x021B") :offset ("651"))) -(defglextfun - (("TestFenceNV" test-fence-nv) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("Boolean") - :category ("NV_fence") :dlflags ("notlistable") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1279") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0218") :offset ("650"))) -(defglextfun - (("IsFenceNV" is-fence-nv) :args - ((:name |fence| :type |FenceNV| :direction :in)) :return ("Boolean") - :category ("NV_fence") :dlflags ("notlistable") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1278") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x021A") :offset ("649"))) -(defglextfun - (("GenFencesNV" gen-fences-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |fences| :type |FenceNV| :direction :out :array t :size n)) - :return ("void") :category ("NV_fence") :dlflags ("notlistable") :version - ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1277") - :glxflags ("ignore") :glsopcode ("0x0215") :offset ("648"))) -(defglextfun - (("DeleteFencesNV" delete-fences-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |fences| :type |FenceNV| :direction :in :array t :size n)) - :return ("void") :category ("NV_fence") :dlflags ("notlistable") :version - ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1276") - :glxflags ("ignore") :glsopcode ("0x0216") :offset ("647"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_fence + +(defconstant +all-completed-nv+ #x84F2) +(defconstant +fence-status-nv+ #x84F3) +(defconstant +fence-condition-nv+ #x84F4) +(defglextfun "SetFenceNV" set-fence-nv :return "void" :args + ((:name |fence| :type |FenceNV| :direction :in) + (:name |condition| :type |FenceConditionNV| :direction :in)) + :category "NV_fence" :version "1.2") +(defglextfun "FinishFenceNV" finish-fence-nv :return "void" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "NV_fence" :version + "1.2") +(defglextfun "GetFenceivNV" get-fence-iv-nv :return "void" :args + ((:name |fence| :type |FenceNV| :direction :in) + (:name |pname| :type |FenceParameterNameNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "NV_fence" :version "1.2") +(defglextfun "TestFenceNV" test-fence-nv :return "Boolean" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "NV_fence" :version + "1.2") +(defglextfun "IsFenceNV" is-fence-nv :return "Boolean" :args + ((:name |fence| :type |FenceNV| :direction :in)) :category "NV_fence" :version + "1.2") +(defglextfun "GenFencesNV" gen-fences-nv :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |fences| :type |FenceNV| :direction :out :array t :size n)) + :category "NV_fence" :version "1.2") +(defglextfun "DeleteFencesNV" delete-fences-nv :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |fences| :type |FenceNV| :direction :in :array t :size n)) + :category "NV_fence" :version "1.2") diff --git a/lib/opengl-nv_fragment_program.lisp b/lib/opengl-nv_fragment_program.lisp dissimilarity index 86% index 9db1280..0defc0a 100644 --- a/lib/opengl-nv_fragment_program.lisp +++ b/lib/opengl-nv_fragment_program.lisp @@ -1,72 +1,60 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_fragment_program - -(defconstant +max-fragment-program-local-parameters-nv+ #x8868) -(defconstant +fragment-program-nv+ #x8870) -(defconstant +max-texture-coords-nv+ #x8871) -(defconstant +max-texture-image-units-nv+ #x8872) -(defconstant +fragment-program-binding-nv+ #x8873) -(defconstant +program-error-string-nv+ #x8874) -(defglextfun - (("GetProgramNamedParameterdvNV" get-program-named-parameter-dv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |name| :type |UInt8| :direction :in :array t :size #x1) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :category ("NV_fragment_program") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("?") :offset ("687"))) -(defglextfun - (("GetProgramNamedParameterfvNV" get-program-named-parameter-fv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |name| :type |UInt8| :direction :in :array t :size #x1) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :category ("NV_fragment_program") :dlflags ("notlistable") - :version ("1.2") :extension nil :glxsingle ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("?") :offset ("686"))) -(defglextfun - (("ProgramNamedParameter4dvNV" program-named-parameter-4dv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |name| :type |UInt8| :direction :in :array t :size #x1) - (:name |v| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_fragment_program") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("685"))) -(defglextfun - (("ProgramNamedParameter4fvNV" program-named-parameter-4fv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |name| :type |UInt8| :direction :in :array t :size #x1) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_fragment_program") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("684"))) -(defglextfun - (("ProgramNamedParameter4dNV" program-named-parameter-4d-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |name| :type |UInt8| :direction :in :array t :size #x1) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("NV_fragment_program") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("683"))) -(defglextfun - (("ProgramNamedParameter4fNV" program-named-parameter-4f-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |name| :type |UInt8| :direction :in :array t :size #x1) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("NV_fragment_program") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("682"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_fragment_program + +(defconstant +max-fragment-program-local-parameters-nv+ #x8868) +(defconstant +fragment-program-nv+ #x8870) +(defconstant +max-texture-coords-nv+ #x8871) +(defconstant +max-texture-image-units-nv+ #x8872) +(defconstant +fragment-program-binding-nv+ #x8873) +(defconstant +program-error-string-nv+ #x8874) +(defglextfun "GetProgramNamedParameterdvNV" get-program-named-parameter-dv-nv + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |name| :type |UInt8| :direction :in :array t :size #x1) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "NV_fragment_program" :version "1.2") +(defglextfun "GetProgramNamedParameterfvNV" get-program-named-parameter-fv-nv + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |name| :type |UInt8| :direction :in :array t :size #x1) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "NV_fragment_program" :version "1.2") +(defglextfun "ProgramNamedParameter4dvNV" program-named-parameter-4dv-nv + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |name| :type |UInt8| :direction :in :array t :size #x1) + (:name |v| :type |Float64| :direction :in :array t :size #x4)) + :category "NV_fragment_program" :version "1.2") +(defglextfun "ProgramNamedParameter4fvNV" program-named-parameter-4fv-nv + :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |name| :type |UInt8| :direction :in :array t :size #x1) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "NV_fragment_program" :version "1.2") +(defglextfun "ProgramNamedParameter4dNV" program-named-parameter-4d-nv :return + "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |name| :type |UInt8| :direction :in :array t :size #x1) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "NV_fragment_program" :version "1.2") +(defglextfun "ProgramNamedParameter4fNV" program-named-parameter-4f-nv :return + "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |name| :type |UInt8| :direction :in :array t :size #x1) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "NV_fragment_program" :version "1.2") diff --git a/lib/opengl-nv_framebuffer_multisample_coverage.lisp b/lib/opengl-nv_framebuffer_multisample_coverage.lisp dissimilarity index 61% index 18472a1..c8bea7d 100644 --- a/lib/opengl-nv_framebuffer_multisample_coverage.lisp +++ b/lib/opengl-nv_framebuffer_multisample_coverage.lisp @@ -1,23 +1,19 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_framebuffer_multisample_coverage - -(defconstant +renderbuffer-coverage-samples-nv+ #x8CAB) -(defconstant +renderbuffer-color-samples-nv+ #x8E10) -(defconstant +max-multisample-coverage-modes-nv+ #x8E11) -(defconstant +multisample-coverage-modes-nv+ #x8E12) -(defglextfun - (("RenderbufferStorageMultisampleCoverageNV" - renderbuffer-storage-multisample-coverage-nv) - :args - ((:name |target| :type |RenderbufferTarget| :direction :in) - (:name |coverageSamples| :type |SizeI| :direction :in) - (:name |colorSamples| :type |SizeI| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("NV_framebuffer_multisample_coverage") :version - ("1.5") :extension ("soft" "WINSOFT") :dlflags ("notlistable") :glfflags - ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_framebuffer_multisample_coverage + +(defconstant +renderbuffer-coverage-samples-nv+ #x8CAB) +(defconstant +renderbuffer-color-samples-nv+ #x8E10) +(defconstant +max-multisample-coverage-modes-nv+ #x8E11) +(defconstant +multisample-coverage-modes-nv+ #x8E12) +(defglextfun "RenderbufferStorageMultisampleCoverageNV" + renderbuffer-storage-multisample-coverage-nv :return "void" :args + ((:name |target| :type |RenderbufferTarget| :direction :in) + (:name |coverageSamples| :type |SizeI| :direction :in) + (:name |colorSamples| :type |SizeI| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "NV_framebuffer_multisample_coverage" :version "1.5") diff --git a/lib/opengl-nv_geometry_program4.lisp b/lib/opengl-nv_geometry_program4.lisp dissimilarity index 67% index 868326e..103b89b 100644 --- a/lib/opengl-nv_geometry_program4.lisp +++ b/lib/opengl-nv_geometry_program4.lisp @@ -1,57 +1,49 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_geometry_program4 - -(defconstant +lines-adjacency-ext+ #xA) -(defconstant +line-strip-adjacency-ext+ #xB) -(defconstant +triangles-adjacency-ext+ #xC) -(defconstant +triangle-strip-adjacency-ext+ #xD) -(defconstant +geometry-program-nv+ #x8C26) -(defconstant +max-program-output-vertices-nv+ #x8C27) -(defconstant +max-program-total-output-components-nv+ #x8C28) -(defconstant +geometry-vertices-out-ext+ #x8DDA) -(defconstant +geometry-input-type-ext+ #x8DDB) -(defconstant +geometry-output-type-ext+ #x8DDC) -(defconstant +max-geometry-texture-image-units-ext+ #x8C29) -(defconstant +framebuffer-attachment-layered-ext+ #x8DA7) -(defconstant +framebuffer-incomplete-layer-targets-ext+ #x8DA8) -(defconstant +framebuffer-incomplete-layer-count-ext+ #x8DA9) -(defconstant +program-point-size-ext+ #x8642) -(defglextfun - (("FramebufferTextureFaceEXT" framebuffer-texture-face-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |texture| :type |Texture| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |face| :type |TextureTarget| :direction :in)) - :return ("void") :category ("NV_geometry_program4") :version ("2.0") - :extension ("soft" "WINSOFT") :dlflags ("notlistable") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("FramebufferTextureLayerEXT" framebuffer-texture-layer-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |texture| :type |Texture| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |layer| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("NV_geometry_program4") :version ("2.0") - :extension ("soft" "WINSOFT") :dlflags ("notlistable") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("FramebufferTextureEXT" framebuffer-texture-ext) :args - ((:name |target| :type |FramebufferTarget| :direction :in) - (:name |attachment| :type |FramebufferAttachment| :direction :in) - (:name |texture| :type |Texture| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("NV_geometry_program4") :version ("2.0") - :extension ("soft" "WINSOFT") :dlflags ("notlistable") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramVertexLimitNV" program-vertex-limit-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |limit| :type |Int32| :direction :in)) - :return ("void") :category ("NV_geometry_program4") :version ("2.0") - :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags ("ignore") - :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_geometry_program4 + +(defconstant +lines-adjacency-ext+ #xA) +(defconstant +line-strip-adjacency-ext+ #xB) +(defconstant +triangles-adjacency-ext+ #xC) +(defconstant +triangle-strip-adjacency-ext+ #xD) +(defconstant +geometry-program-nv+ #x8C26) +(defconstant +max-program-output-vertices-nv+ #x8C27) +(defconstant +max-program-total-output-components-nv+ #x8C28) +(defconstant +geometry-vertices-out-ext+ #x8DDA) +(defconstant +geometry-input-type-ext+ #x8DDB) +(defconstant +geometry-output-type-ext+ #x8DDC) +(defconstant +max-geometry-texture-image-units-ext+ #x8C29) +(defconstant +framebuffer-attachment-layered-ext+ #x8DA7) +(defconstant +framebuffer-incomplete-layer-targets-ext+ #x8DA8) +(defconstant +framebuffer-incomplete-layer-count-ext+ #x8DA9) +(defconstant +program-point-size-ext+ #x8642) +(defglextfun "FramebufferTextureFaceEXT" framebuffer-texture-face-ext :return + "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |texture| :type |Texture| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |face| :type |TextureTarget| :direction :in)) + :category "NV_geometry_program4" :version "2.0") +(defglextfun "FramebufferTextureLayerEXT" framebuffer-texture-layer-ext :return + "void" :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |texture| :type |Texture| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |layer| :type |CheckedInt32| :direction :in)) + :category "NV_geometry_program4" :version "2.0") +(defglextfun "FramebufferTextureEXT" framebuffer-texture-ext :return "void" + :args + ((:name |target| :type |FramebufferTarget| :direction :in) + (:name |attachment| :type |FramebufferAttachment| :direction :in) + (:name |texture| :type |Texture| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in)) + :category "NV_geometry_program4" :version "2.0") +(defglextfun "ProgramVertexLimitNV" program-vertex-limit-nv :return "void" + :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |limit| :type |Int32| :direction :in)) + :category "NV_geometry_program4" :version "2.0") diff --git a/lib/opengl-nv_gpu_program4.lisp b/lib/opengl-nv_gpu_program4.lisp dissimilarity index 92% index f3b21ef..9d80029 100644 --- a/lib/opengl-nv_gpu_program4.lisp +++ b/lib/opengl-nv_gpu_program4.lisp @@ -1,162 +1,126 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_gpu_program4 - -(defconstant +min-program-texel-offset-nv+ #x8904) -(defconstant +max-program-texel-offset-nv+ #x8905) -(defconstant +program-attrib-components-nv+ #x8906) -(defconstant +program-result-components-nv+ #x8907) -(defconstant +max-program-attrib-components-nv+ #x8908) -(defconstant +max-program-result-components-nv+ #x8909) -(defconstant +max-program-generic-attribs-nv+ #x8DA5) -(defconstant +max-program-generic-results-nv+ #x8DA6) -(defglextfun - (("GetProgramEnvParameterIuivNV" get-program-env-parameter-i-uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("NV_gpu_program4") - :version ("1.3") :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetProgramEnvParameterIivNV" get-program-env-parameter-i-iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("NV_gpu_program4") - :version ("1.3") :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetProgramLocalParameterIuivNV" get-program-local-parameter-i-uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("NV_gpu_program4") - :version ("1.3") :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetProgramLocalParameterIivNV" get-program-local-parameter-i-iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("NV_gpu_program4") - :version ("1.3") :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramEnvParametersI4uivNV" program-env-parameters-i-4uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |UInt32| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramEnvParameterI4uivNV" program-env-parameter-i-4uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramEnvParameterI4uiNV" program-env-parameter-i-4ui-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt32| :direction :in) - (:name |y| :type |UInt32| :direction :in) - (:name |z| :type |UInt32| :direction :in) - (:name |w| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :vectorequiv - ("ProgramEnvParameterI4uivNV") :glxvectorequiv ("ProgramEnvParameterI4uivNV") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramEnvParametersI4ivNV" program-env-parameters-i-4iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramEnvParameterI4ivNV" program-env-parameter-i-4iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramEnvParameterI4iNV" program-env-parameter-i-4i-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in) - (:name |z| :type |Int32| :direction :in) - (:name |w| :type |Int32| :direction :in)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :vectorequiv - ("ProgramEnvParameterI4ivNV") :glxvectorequiv ("ProgramEnvParameterI4ivNV") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramLocalParametersI4uivNV" program-local-parameters-i-4uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |UInt32| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramLocalParameterI4uivNV" program-local-parameter-i-4uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramLocalParameterI4uiNV" program-local-parameter-i-4ui-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt32| :direction :in) - (:name |y| :type |UInt32| :direction :in) - (:name |z| :type |UInt32| :direction :in) - (:name |w| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :vectorequiv - ("ProgramLocalParameterI4uivNV") :glxvectorequiv - ("ProgramLocalParameterI4uivNV") :extension ("soft" "WINSOFT" "NV50") - :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramLocalParametersI4ivNV" program-local-parameters-i-4iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramLocalParameterI4ivNV" program-local-parameter-i-4iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :extension - ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags ("ignore") :glxflags - ("ignore"))) -(defglextfun - (("ProgramLocalParameterI4iNV" program-local-parameter-i-4i-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in) - (:name |z| :type |Int32| :direction :in) - (:name |w| :type |Int32| :direction :in)) - :return ("void") :category ("NV_gpu_program4") :version ("1.3") :vectorequiv - ("ProgramLocalParameterI4ivNV") :glxvectorequiv - ("ProgramLocalParameterI4ivNV") :extension ("soft" "WINSOFT" "NV50") - :glfflags ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_gpu_program4 + +(defconstant +min-program-texel-offset-nv+ #x8904) +(defconstant +max-program-texel-offset-nv+ #x8905) +(defconstant +program-attrib-components-nv+ #x8906) +(defconstant +program-result-components-nv+ #x8907) +(defconstant +max-program-attrib-components-nv+ #x8908) +(defconstant +max-program-result-components-nv+ #x8909) +(defconstant +max-program-generic-attribs-nv+ #x8DA5) +(defconstant +max-program-generic-results-nv+ #x8DA6) +(defglextfun "GetProgramEnvParameterIuivNV" get-program-env-parameter-i-uiv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "GetProgramEnvParameterIivNV" get-program-env-parameter-i-iv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "GetProgramLocalParameterIuivNV" + get-program-local-parameter-i-uiv-nv :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "GetProgramLocalParameterIivNV" + get-program-local-parameter-i-iv-nv :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramEnvParametersI4uivNV" program-env-parameters-i-4uiv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |UInt32| :direction :in :array t :size count*4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramEnvParameterI4uivNV" program-env-parameter-i-4uiv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |UInt32| :direction :in :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramEnvParameterI4uiNV" program-env-parameter-i-4ui-nv :return + "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt32| :direction :in) + (:name |y| :type |UInt32| :direction :in) + (:name |z| :type |UInt32| :direction :in) + (:name |w| :type |UInt32| :direction :in)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramEnvParametersI4ivNV" program-env-parameters-i-4iv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size count*4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramEnvParameterI4ivNV" program-env-parameter-i-4iv-nv :return + "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramEnvParameterI4iNV" program-env-parameter-i-4i-nv :return + "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in) + (:name |z| :type |Int32| :direction :in) + (:name |w| :type |Int32| :direction :in)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramLocalParametersI4uivNV" program-local-parameters-i-4uiv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |UInt32| :direction :in :array t :size count*4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramLocalParameterI4uivNV" program-local-parameter-i-4uiv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |UInt32| :direction :in :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramLocalParameterI4uiNV" program-local-parameter-i-4ui-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt32| :direction :in) + (:name |y| :type |UInt32| :direction :in) + (:name |z| :type |UInt32| :direction :in) + (:name |w| :type |UInt32| :direction :in)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramLocalParametersI4ivNV" program-local-parameters-i-4iv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size count*4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramLocalParameterI4ivNV" program-local-parameter-i-4iv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size #x4)) + :category "NV_gpu_program4" :version "1.3") +(defglextfun "ProgramLocalParameterI4iNV" program-local-parameter-i-4i-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in) + (:name |z| :type |Int32| :direction :in) + (:name |w| :type |Int32| :direction :in)) + :category "NV_gpu_program4" :version "1.3") diff --git a/lib/opengl-nv_half_float.lisp b/lib/opengl-nv_half_float.lisp dissimilarity index 98% index d87255d..ab440ea 100644 --- a/lib/opengl-nv_half_float.lisp +++ b/lib/opengl-nv_half_float.lisp @@ -1,294 +1,202 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_half_float - -(defconstant +half-float-nv+ #x140B) -(defglextfun - (("VertexAttribs4hvNV" vertex-attribs-4hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size n)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttribs3hvNV" vertex-attribs-3hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size n)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttribs2hvNV" vertex-attribs-2hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size n)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttribs1hvNV" vertex-attribs-1hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size n)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib4hvNV" vertex-attrib-4hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib4hNV" vertex-attrib-4h-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Half16NV| :direction :in) - (:name |y| :type |Half16NV| :direction :in) - (:name |z| :type |Half16NV| :direction :in) - (:name |w| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib3hvNV" vertex-attrib-3hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib3hNV" vertex-attrib-3h-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Half16NV| :direction :in) - (:name |y| :type |Half16NV| :direction :in) - (:name |z| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib2hvNV" vertex-attrib-2hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib2hNV" vertex-attrib-2h-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Half16NV| :direction :in) - (:name |y| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib1hvNV" vertex-attrib-1hv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexAttrib1hNV" vertex-attrib-1h-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexWeighthvNV" vertex-weight-hv-nv) :args - ((:name |weight| :type |Half16NV| :direction :in :array t :size #x1)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("VertexWeighthNV" vertex-weight-h-nv) :args - ((:name |weight| :type |Half16NV| :direction :in)) :return ("void") :category - ("NV_half_float") :version ("1.2") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("SecondaryColor3hvNV" secondary-color-3hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("SecondaryColor3hNV" secondary-color-3h-nv) :args - ((:name |red| :type |Half16NV| :direction :in) - (:name |green| :type |Half16NV| :direction :in) - (:name |blue| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("FogCoordhvNV" fog-coord-hv-nv) :args - ((:name |fog| :type |Half16NV| :direction :in :array t :size #x1)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("FogCoordhNV" fog-coord-h-nv) :args - ((:name |fog| :type |Half16NV| :direction :in)) :return ("void") :category - ("NV_half_float") :version ("1.2") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord4hvNV" multi-tex-coord-4hv-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord4hNV" multi-tex-coord-4h-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |Half16NV| :direction :in) - (:name |t| :type |Half16NV| :direction :in) - (:name |r| :type |Half16NV| :direction :in) - (:name |q| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord3hvNV" multi-tex-coord-3hv-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord3hNV" multi-tex-coord-3h-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |Half16NV| :direction :in) - (:name |t| :type |Half16NV| :direction :in) - (:name |r| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord2hvNV" multi-tex-coord-2hv-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord2hNV" multi-tex-coord-2h-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |Half16NV| :direction :in) - (:name |t| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord1hvNV" multi-tex-coord-1hv-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |Half16NV| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("MultiTexCoord1hNV" multi-tex-coord-1h-nv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord4hvNV" tex-coord-4hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x4)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord4hNV" tex-coord-4h-nv) :args - ((:name |s| :type |Half16NV| :direction :in) - (:name |t| :type |Half16NV| :direction :in) - (:name |r| :type |Half16NV| :direction :in) - (:name |q| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord3hvNV" tex-coord-3hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord3hNV" tex-coord-3h-nv) :args - ((:name |s| :type |Half16NV| :direction :in) - (:name |t| :type |Half16NV| :direction :in) - (:name |r| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord2hvNV" tex-coord-2hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x2)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord2hNV" tex-coord-2h-nv) :args - ((:name |s| :type |Half16NV| :direction :in) - (:name |t| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord1hvNV" tex-coord-1hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x1)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("TexCoord1hNV" tex-coord-1h-nv) :args - ((:name |s| :type |Half16NV| :direction :in)) :return ("void") :category - ("NV_half_float") :version ("1.2") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Color4hvNV" color-4hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x4)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Color4hNV" color-4h-nv) :args - ((:name |red| :type |Half16NV| :direction :in) - (:name |green| :type |Half16NV| :direction :in) - (:name |blue| :type |Half16NV| :direction :in) - (:name |alpha| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Color3hvNV" color-3hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Color3hNV" color-3h-nv) :args - ((:name |red| :type |Half16NV| :direction :in) - (:name |green| :type |Half16NV| :direction :in) - (:name |blue| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Normal3hvNV" normal-3hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Normal3hNV" normal-3h-nv) :args - ((:name |nx| :type |Half16NV| :direction :in) - (:name |ny| :type |Half16NV| :direction :in) - (:name |nz| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Vertex4hvNV" vertex-4hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x4)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Vertex4hNV" vertex-4h-nv) :args - ((:name |x| :type |Half16NV| :direction :in) - (:name |y| :type |Half16NV| :direction :in) - (:name |z| :type |Half16NV| :direction :in) - (:name |w| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Vertex3hvNV" vertex-3hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Vertex3hNV" vertex-3h-nv) :args - ((:name |x| :type |Half16NV| :direction :in) - (:name |y| :type |Half16NV| :direction :in) - (:name |z| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Vertex2hvNV" vertex-2hv-nv) :args - ((:name |v| :type |Half16NV| :direction :in :array t :size #x2)) :return - ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("Vertex2hNV" vertex-2h-nv) :args - ((:name |x| :type |Half16NV| :direction :in) - (:name |y| :type |Half16NV| :direction :in)) - :return ("void") :category ("NV_half_float") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_half_float + +(defconstant +half-float-nv+ #x140B) +(defglextfun "VertexAttribs4hvNV" vertex-attribs-4hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size n)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttribs3hvNV" vertex-attribs-3hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size n)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttribs2hvNV" vertex-attribs-2hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size n)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttribs1hvNV" vertex-attribs-1hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size n)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib4hvNV" vertex-attrib-4hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x4)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib4hNV" vertex-attrib-4h-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Half16NV| :direction :in) + (:name |y| :type |Half16NV| :direction :in) + (:name |z| :type |Half16NV| :direction :in) + (:name |w| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib3hvNV" vertex-attrib-3hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x3)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib3hNV" vertex-attrib-3h-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Half16NV| :direction :in) + (:name |y| :type |Half16NV| :direction :in) + (:name |z| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib2hvNV" vertex-attrib-2hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x2)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib2hNV" vertex-attrib-2h-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Half16NV| :direction :in) + (:name |y| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib1hvNV" vertex-attrib-1hv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x1)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexAttrib1hNV" vertex-attrib-1h-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexWeighthvNV" vertex-weight-hv-nv :return "void" :args + ((:name |weight| :type |Half16NV| :direction :in :array t :size #x1)) + :category "NV_half_float" :version "1.2") +(defglextfun "VertexWeighthNV" vertex-weight-h-nv :return "void" :args + ((:name |weight| :type |Half16NV| :direction :in)) :category "NV_half_float" + :version "1.2") +(defglextfun "SecondaryColor3hvNV" secondary-color-3hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :category + "NV_half_float" :version "1.2") +(defglextfun "SecondaryColor3hNV" secondary-color-3h-nv :return "void" :args + ((:name |red| :type |Half16NV| :direction :in) + (:name |green| :type |Half16NV| :direction :in) + (:name |blue| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "FogCoordhvNV" fog-coord-hv-nv :return "void" :args + ((:name |fog| :type |Half16NV| :direction :in :array t :size #x1)) :category + "NV_half_float" :version "1.2") +(defglextfun "FogCoordhNV" fog-coord-h-nv :return "void" :args + ((:name |fog| :type |Half16NV| :direction :in)) :category "NV_half_float" + :version "1.2") +(defglextfun "MultiTexCoord4hvNV" multi-tex-coord-4hv-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x4)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord4hNV" multi-tex-coord-4h-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |Half16NV| :direction :in) + (:name |t| :type |Half16NV| :direction :in) + (:name |r| :type |Half16NV| :direction :in) + (:name |q| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord3hvNV" multi-tex-coord-3hv-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x3)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord3hNV" multi-tex-coord-3h-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |Half16NV| :direction :in) + (:name |t| :type |Half16NV| :direction :in) + (:name |r| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord2hvNV" multi-tex-coord-2hv-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x2)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord2hNV" multi-tex-coord-2h-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |Half16NV| :direction :in) + (:name |t| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord1hvNV" multi-tex-coord-1hv-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |Half16NV| :direction :in :array t :size #x1)) + :category "NV_half_float" :version "1.2") +(defglextfun "MultiTexCoord1hNV" multi-tex-coord-1h-nv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "TexCoord4hvNV" tex-coord-4hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x4)) :category + "NV_half_float" :version "1.2") +(defglextfun "TexCoord4hNV" tex-coord-4h-nv :return "void" :args + ((:name |s| :type |Half16NV| :direction :in) + (:name |t| :type |Half16NV| :direction :in) + (:name |r| :type |Half16NV| :direction :in) + (:name |q| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "TexCoord3hvNV" tex-coord-3hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :category + "NV_half_float" :version "1.2") +(defglextfun "TexCoord3hNV" tex-coord-3h-nv :return "void" :args + ((:name |s| :type |Half16NV| :direction :in) + (:name |t| :type |Half16NV| :direction :in) + (:name |r| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "TexCoord2hvNV" tex-coord-2hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x2)) :category + "NV_half_float" :version "1.2") +(defglextfun "TexCoord2hNV" tex-coord-2h-nv :return "void" :args + ((:name |s| :type |Half16NV| :direction :in) + (:name |t| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "TexCoord1hvNV" tex-coord-1hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x1)) :category + "NV_half_float" :version "1.2") +(defglextfun "TexCoord1hNV" tex-coord-1h-nv :return "void" :args + ((:name |s| :type |Half16NV| :direction :in)) :category "NV_half_float" + :version "1.2") +(defglextfun "Color4hvNV" color-4hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x4)) :category + "NV_half_float" :version "1.2") +(defglextfun "Color4hNV" color-4h-nv :return "void" :args + ((:name |red| :type |Half16NV| :direction :in) + (:name |green| :type |Half16NV| :direction :in) + (:name |blue| :type |Half16NV| :direction :in) + (:name |alpha| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "Color3hvNV" color-3hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :category + "NV_half_float" :version "1.2") +(defglextfun "Color3hNV" color-3h-nv :return "void" :args + ((:name |red| :type |Half16NV| :direction :in) + (:name |green| :type |Half16NV| :direction :in) + (:name |blue| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "Normal3hvNV" normal-3hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :category + "NV_half_float" :version "1.2") +(defglextfun "Normal3hNV" normal-3h-nv :return "void" :args + ((:name |nx| :type |Half16NV| :direction :in) + (:name |ny| :type |Half16NV| :direction :in) + (:name |nz| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "Vertex4hvNV" vertex-4hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x4)) :category + "NV_half_float" :version "1.2") +(defglextfun "Vertex4hNV" vertex-4h-nv :return "void" :args + ((:name |x| :type |Half16NV| :direction :in) + (:name |y| :type |Half16NV| :direction :in) + (:name |z| :type |Half16NV| :direction :in) + (:name |w| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "Vertex3hvNV" vertex-3hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x3)) :category + "NV_half_float" :version "1.2") +(defglextfun "Vertex3hNV" vertex-3h-nv :return "void" :args + ((:name |x| :type |Half16NV| :direction :in) + (:name |y| :type |Half16NV| :direction :in) + (:name |z| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") +(defglextfun "Vertex2hvNV" vertex-2hv-nv :return "void" :args + ((:name |v| :type |Half16NV| :direction :in :array t :size #x2)) :category + "NV_half_float" :version "1.2") +(defglextfun "Vertex2hNV" vertex-2h-nv :return "void" :args + ((:name |x| :type |Half16NV| :direction :in) + (:name |y| :type |Half16NV| :direction :in)) + :category "NV_half_float" :version "1.2") diff --git a/lib/opengl-nv_occlusion_query.lisp b/lib/opengl-nv_occlusion_query.lisp dissimilarity index 86% index 6b7214c..3bf887f 100644 --- a/lib/opengl-nv_occlusion_query.lisp +++ b/lib/opengl-nv_occlusion_query.lisp @@ -1,54 +1,40 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_occlusion_query - -(defconstant +pixel-counter-bits-nv+ #x8864) -(defconstant +current-occlusion-query-id-nv+ #x8865) -(defconstant +pixel-count-nv+ #x8866) -(defconstant +pixel-count-available-nv+ #x8867) -(defglextfun - (("GetOcclusionQueryuivNV" get-occlusion-query-uiv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |OcclusionQueryParameterNameNV| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_occlusion_query") - :version ("1.2") :extension ("soft" "WINSOFT" "NV20") :glsflags ("ignore") - :glxflags ("ignore"))) -(defglextfun - (("GetOcclusionQueryivNV" get-occlusion-query-iv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |OcclusionQueryParameterNameNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_occlusion_query") - :version ("1.2") :extension ("soft" "WINSOFT" "NV20") :glsflags ("ignore") - :glxflags ("ignore"))) -(defglextfun - (("EndOcclusionQueryNV" end-occlusion-query-nv) :args nil :return ("void") - :category ("NV_occlusion_query") :version ("1.2") :extension - ("soft" "WINSOFT" "NV20") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("BeginOcclusionQueryNV" begin-occlusion-query-nv) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("void") :category - ("NV_occlusion_query") :version ("1.2") :extension ("soft" "WINSOFT" "NV20") - :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("IsOcclusionQueryNV" is-occlusion-query-nv) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("Boolean") :dlflags - ("notlistable") :category ("NV_occlusion_query") :version ("1.2") :extension - ("soft" "WINSOFT" "NV20") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("DeleteOcclusionQueriesNV" delete-occlusion-queries-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |ids| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :dlflags ("notlistable") :category ("NV_occlusion_query") - :version ("1.2") :extension ("soft" "WINSOFT" "NV20") :glsflags ("ignore") - :glxflags ("ignore"))) -(defglextfun - (("GenOcclusionQueriesNV" gen-occlusion-queries-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |ids| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :dlflags ("notlistable") :category ("NV_occlusion_query") - :version ("1.2") :extension ("soft" "WINSOFT" "NV20") :glsflags ("ignore") - :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_occlusion_query + +(defconstant +pixel-counter-bits-nv+ #x8864) +(defconstant +current-occlusion-query-id-nv+ #x8865) +(defconstant +pixel-count-nv+ #x8866) +(defconstant +pixel-count-available-nv+ #x8867) +(defglextfun "GetOcclusionQueryuivNV" get-occlusion-query-uiv-nv :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |OcclusionQueryParameterNameNV| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size (|pname|))) + :category "NV_occlusion_query" :version "1.2") +(defglextfun "GetOcclusionQueryivNV" get-occlusion-query-iv-nv :return "void" + :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |OcclusionQueryParameterNameNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "NV_occlusion_query" :version "1.2") +(defglextfun "EndOcclusionQueryNV" end-occlusion-query-nv :return "void" :args + nil :category "NV_occlusion_query" :version "1.2") +(defglextfun "BeginOcclusionQueryNV" begin-occlusion-query-nv :return "void" + :args ((:name |id| :type |UInt32| :direction :in)) :category + "NV_occlusion_query" :version "1.2") +(defglextfun "IsOcclusionQueryNV" is-occlusion-query-nv :return "Boolean" :args + ((:name |id| :type |UInt32| :direction :in)) :category "NV_occlusion_query" + :version "1.2") +(defglextfun "DeleteOcclusionQueriesNV" delete-occlusion-queries-nv :return + "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |ids| :type |UInt32| :direction :in :array t :size n)) + :category "NV_occlusion_query" :version "1.2") +(defglextfun "GenOcclusionQueriesNV" gen-occlusion-queries-nv :return "void" + :args + ((:name |n| :type |SizeI| :direction :in) + (:name |ids| :type |UInt32| :direction :out :array t :size n)) + :category "NV_occlusion_query" :version "1.2") diff --git a/lib/opengl-nv_parameter_buffer_object.lisp b/lib/opengl-nv_parameter_buffer_object.lisp dissimilarity index 76% index 59c7b49..cdef93a 100644 --- a/lib/opengl-nv_parameter_buffer_object.lisp +++ b/lib/opengl-nv_parameter_buffer_object.lisp @@ -1,41 +1,35 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_parameter_buffer_object - -(defconstant +max-program-parameter-buffer-bindings-nv+ #x8DA0) -(defconstant +max-program-parameter-buffer-size-nv+ #x8DA1) -(defconstant +vertex-program-parameter-buffer-nv+ #x8DA2) -(defconstant +geometry-program-parameter-buffer-nv+ #x8DA3) -(defconstant +fragment-program-parameter-buffer-nv+ #x8DA4) -(defglextfun - (("ProgramBufferParametersIuivNV" program-buffer-parameters-i-uiv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |UInt32| :direction :in :array t :size count)) - :return ("void") :category ("NV_parameter_buffer_object") :version ("1.2") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramBufferParametersIivNV" program-buffer-parameters-i-iv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("NV_parameter_buffer_object") :version ("1.2") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("ProgramBufferParametersfvNV" program-buffer-parameters-fv-nv) :args - ((:name |target| :type |ProgramTarget| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("NV_parameter_buffer_object") :version ("1.2") - :extension ("soft" "WINSOFT" "NV50") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_parameter_buffer_object + +(defconstant +max-program-parameter-buffer-bindings-nv+ #x8DA0) +(defconstant +max-program-parameter-buffer-size-nv+ #x8DA1) +(defconstant +vertex-program-parameter-buffer-nv+ #x8DA2) +(defconstant +geometry-program-parameter-buffer-nv+ #x8DA3) +(defconstant +fragment-program-parameter-buffer-nv+ #x8DA4) +(defglextfun "ProgramBufferParametersIuivNV" program-buffer-parameters-i-uiv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |UInt32| :direction :in :array t :size count)) + :category "NV_parameter_buffer_object" :version "1.2") +(defglextfun "ProgramBufferParametersIivNV" program-buffer-parameters-i-iv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size count)) + :category "NV_parameter_buffer_object" :version "1.2") +(defglextfun "ProgramBufferParametersfvNV" program-buffer-parameters-fv-nv + :return "void" :args + ((:name |target| :type |ProgramTarget| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size count)) + :category "NV_parameter_buffer_object" :version "1.2") diff --git a/lib/opengl-nv_pixel_data_range.lisp b/lib/opengl-nv_pixel_data_range.lisp index 3e78fad..8a36f33 100644 --- a/lib/opengl-nv_pixel_data_range.lisp +++ b/lib/opengl-nv_pixel_data_range.lisp @@ -10,16 +10,11 @@ (defconstant +read-pixel-data-range-length-nv+ #x887B) (defconstant +write-pixel-data-range-pointer-nv+ #x887C) (defconstant +read-pixel-data-range-pointer-nv+ #x887D) -(defglextfun - (("FlushPixelDataRangeNV" flush-pixel-data-range-nv) :args - ((:name |target| :type |PixelDataRangeTargetNV| :direction :in)) :return - ("void") :category ("NV_pixel_data_range") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("PixelDataRangeNV" pixel-data-range-nv) :args - ((:name |target| :type |PixelDataRangeTargetNV| :direction :in) - (:name |length| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :out :array t :size length)) - :return ("void") :category ("NV_pixel_data_range") :version ("1.2") - :extension nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") - :offset ("?"))) +(defglextfun "FlushPixelDataRangeNV" flush-pixel-data-range-nv :return "void" + :args ((:name |target| :type |PixelDataRangeTargetNV| :direction :in)) + :category "NV_pixel_data_range" :version "1.2") +(defglextfun "PixelDataRangeNV" pixel-data-range-nv :return "void" :args + ((:name |target| :type |PixelDataRangeTargetNV| :direction :in) + (:name |length| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :out :array t :size length)) + :category "NV_pixel_data_range" :version "1.2") diff --git a/lib/opengl-nv_point_sprite.lisp b/lib/opengl-nv_point_sprite.lisp dissimilarity index 71% index 6bb9e24..6490fc3 100644 --- a/lib/opengl-nv_point_sprite.lisp +++ b/lib/opengl-nv_point_sprite.lisp @@ -1,23 +1,17 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_point_sprite - -(defconstant +point-sprite-nv+ #x8861) -(defconstant +coord-replace-nv+ #x8862) -(defconstant +point-sprite-r-mode-nv+ #x8863) -(defglextfun - (("PointParameterivNV" point-parameter-iv-nv) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("NV_point_sprite") :version ("1.2") :extension - ("soft" "WINSOFT" "NV20") :glxropcode ("4222") :alias ("PointParameteriv") - :glsalias ("PointParameteriv"))) -(defglextfun - (("PointParameteriNV" point-parameter-i-nv) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("NV_point_sprite") :version ("1.2") :extension - ("soft" "WINSOFT" "NV20") :glxropcode ("4221") :alias ("PointParameteri") - :glsalias ("PointParameteri"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_point_sprite + +(defconstant +point-sprite-nv+ #x8861) +(defconstant +coord-replace-nv+ #x8862) +(defconstant +point-sprite-r-mode-nv+ #x8863) +(defglextfun "PointParameterivNV" point-parameter-iv-nv :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) + :category "NV_point_sprite" :version "1.2") +(defglextfun "PointParameteriNV" point-parameter-i-nv :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "NV_point_sprite" :version "1.2") diff --git a/lib/opengl-nv_primitive_restart.lisp b/lib/opengl-nv_primitive_restart.lisp dissimilarity index 65% index 8622317..d0ad95c 100644 --- a/lib/opengl-nv_primitive_restart.lisp +++ b/lib/opengl-nv_primitive_restart.lisp @@ -1,17 +1,13 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_primitive_restart - -(defconstant +primitive-restart-nv+ #x8558) -(defconstant +primitive-restart-index-nv+ #x8559) -(defglextfun - (("PrimitiveRestartIndexNV" primitive-restart-index-nv) :args - ((:name |index| :type |UInt32| :direction :in)) :return ("void") :category - ("NV_primitive_restart") :version ("1.2") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglextfun - (("PrimitiveRestartNV" primitive-restart-nv) :args nil :return ("void") - :category ("NV_primitive_restart") :version ("1.2") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_primitive_restart + +(defconstant +primitive-restart-nv+ #x8558) +(defconstant +primitive-restart-index-nv+ #x8559) +(defglextfun "PrimitiveRestartIndexNV" primitive-restart-index-nv :return + "void" :args ((:name |index| :type |UInt32| :direction :in)) :category + "NV_primitive_restart" :version "1.2") +(defglextfun "PrimitiveRestartNV" primitive-restart-nv :return "void" :args nil + :category "NV_primitive_restart" :version "1.2") diff --git a/lib/opengl-nv_register_combiners.lisp b/lib/opengl-nv_register_combiners.lisp dissimilarity index 75% index f1d0cc1..60e2879 100644 --- a/lib/opengl-nv_register_combiners.lisp +++ b/lib/opengl-nv_register_combiners.lisp @@ -1,182 +1,150 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_register_combiners - -(defconstant +register-combiners-nv+ #x8522) -(defconstant +variable-a-nv+ #x8523) -(defconstant +variable-b-nv+ #x8524) -(defconstant +variable-c-nv+ #x8525) -(defconstant +variable-d-nv+ #x8526) -(defconstant +variable-e-nv+ #x8527) -(defconstant +variable-f-nv+ #x8528) -(defconstant +variable-g-nv+ #x8529) -(defconstant +constant-color0-nv+ #x852A) -(defconstant +constant-color1-nv+ #x852B) -(defconstant +primary-color-nv+ #x852C) -(defconstant +secondary-color-nv+ #x852D) -(defconstant +spare0-nv+ #x852E) -(defconstant +spare1-nv+ #x852F) -(defconstant +discard-nv+ #x8530) -(defconstant +e-times-f-nv+ #x8531) -(defconstant +spare0-plus-secondary-color-nv+ #x8532) -(defconstant +unsigned-identity-nv+ #x8536) -(defconstant +unsigned-invert-nv+ #x8537) -(defconstant +expand-normal-nv+ #x8538) -(defconstant +expand-negate-nv+ #x8539) -(defconstant +half-bias-normal-nv+ #x853A) -(defconstant +half-bias-negate-nv+ #x853B) -(defconstant +signed-identity-nv+ #x853C) -(defconstant +signed-negate-nv+ #x853D) -(defconstant +scale-by-two-nv+ #x853E) -(defconstant +scale-by-four-nv+ #x853F) -(defconstant +scale-by-one-half-nv+ #x8540) -(defconstant +bias-by-negative-one-half-nv+ #x8541) -(defconstant +combiner-input-nv+ #x8542) -(defconstant +combiner-mapping-nv+ #x8543) -(defconstant +combiner-component-usage-nv+ #x8544) -(defconstant +combiner-ab-dot-product-nv+ #x8545) -(defconstant +combiner-cd-dot-product-nv+ #x8546) -(defconstant +combiner-mux-sum-nv+ #x8547) -(defconstant +combiner-scale-nv+ #x8548) -(defconstant +combiner-bias-nv+ #x8549) -(defconstant +combiner-ab-output-nv+ #x854A) -(defconstant +combiner-cd-output-nv+ #x854B) -(defconstant +combiner-sum-output-nv+ #x854C) -(defconstant +max-general-combiners-nv+ #x854D) -(defconstant +num-general-combiners-nv+ #x854E) -(defconstant +color-sum-clamp-nv+ #x854F) -(defconstant +combiner0-nv+ #x8550) -(defconstant +combiner1-nv+ #x8551) -(defconstant +combiner2-nv+ #x8552) -(defconstant +combiner3-nv+ #x8553) -(defconstant +combiner4-nv+ #x8554) -(defconstant +combiner5-nv+ #x8555) -(defconstant +combiner6-nv+ #x8556) -(defconstant +combiner7-nv+ #x8557) -(defconstant +texture0-arb+ #x84C0) -(defconstant +texture1-arb+ #x84C1) -(defglextfun - (("GetFinalCombinerInputParameterivNV" - get-final-combiner-input-parameter-iv-nv) - :args - ((:name |variable| :type |CombinerVariableNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_register_combiners") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1275") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x01EE") :offset ("511"))) -(defglextfun - (("GetFinalCombinerInputParameterfvNV" - get-final-combiner-input-parameter-fv-nv) - :args - ((:name |variable| :type |CombinerVariableNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_register_combiners") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1274") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x01ED") :offset ("510"))) -(defglextfun - (("GetCombinerOutputParameterivNV" get-combiner-output-parameter-iv-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |portion| :type |CombinerPortionNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_register_combiners") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1273") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x01EC") :offset ("509"))) -(defglextfun - (("GetCombinerOutputParameterfvNV" get-combiner-output-parameter-fv-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |portion| :type |CombinerPortionNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_register_combiners") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1272") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x01EB") :offset ("508"))) -(defglextfun - (("GetCombinerInputParameterivNV" get-combiner-input-parameter-iv-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |portion| :type |CombinerPortionNV| :direction :in) - (:name |variable| :type |CombinerVariableNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_register_combiners") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1271") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x01EA") :offset ("507"))) -(defglextfun - (("GetCombinerInputParameterfvNV" get-combiner-input-parameter-fv-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |portion| :type |CombinerPortionNV| :direction :in) - (:name |variable| :type |CombinerVariableNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("NV_register_combiners") - :version ("1.1") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1270") - :glxflags ("ignore") :glsflags ("get") :glsopcode ("0x01E9") :offset ("506"))) -(defglextfun - (("FinalCombinerInputNV" final-combiner-input-nv) :args - ((:name |variable| :type |CombinerVariableNV| :direction :in) - (:name |input| :type |CombinerRegisterNV| :direction :in) - (:name |mapping| :type |CombinerMappingNV| :direction :in) - (:name |componentUsage| :type |CombinerComponentUsageNV| :direction :in)) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4142") :glxflags - ("ignore") :glsopcode ("0x01E8") :offset ("505"))) -(defglextfun - (("CombinerOutputNV" combiner-output-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |portion| :type |CombinerPortionNV| :direction :in) - (:name |abOutput| :type |CombinerRegisterNV| :direction :in) - (:name |cdOutput| :type |CombinerRegisterNV| :direction :in) - (:name |sumOutput| :type |CombinerRegisterNV| :direction :in) - (:name |scale| :type |CombinerScaleNV| :direction :in) - (:name |bias| :type |CombinerBiasNV| :direction :in) - (:name |abDotProduct| :type |Boolean| :direction :in) - (:name |cdDotProduct| :type |Boolean| :direction :in) - (:name |muxSum| :type |Boolean| :direction :in)) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4141") :glxflags - ("ignore") :glsopcode ("0x01E7") :offset ("504"))) -(defglextfun - (("CombinerInputNV" combiner-input-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |portion| :type |CombinerPortionNV| :direction :in) - (:name |variable| :type |CombinerVariableNV| :direction :in) - (:name |input| :type |CombinerRegisterNV| :direction :in) - (:name |mapping| :type |CombinerMappingNV| :direction :in) - (:name |componentUsage| :type |CombinerComponentUsageNV| :direction :in)) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4140") :glxflags - ("ignore") :glsopcode ("0x01E6") :offset ("503"))) -(defglextfun - (("CombinerParameteriNV" combiner-parameter-i-nv) :args - ((:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4138") :glxflags - ("ignore") :glsflags ("gl-enum") :glsopcode ("0x01E5") :offset ("502"))) -(defglextfun - (("CombinerParameterivNV" combiner-parameter-iv-nv) :args - ((:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4139") :glxflags - ("ignore") :glsflags ("gl-enum") :glsopcode ("0x01E4") :offset ("501"))) -(defglextfun - (("CombinerParameterfNV" combiner-parameter-f-nv) :args - ((:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |param| :type |Float32| :direction :in)) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4136") :glxflags - ("ignore") :glsflags ("gl-enum") :glsopcode ("0x01E3") :offset ("500"))) -(defglextfun - (("CombinerParameterfvNV" combiner-parameter-fv-nv) :args - ((:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("NV_register_combiners") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4137") :glxflags - ("ignore") :glsflags ("gl-enum") :glsopcode ("0x01E2") :offset ("499"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_register_combiners + +(defconstant +register-combiners-nv+ #x8522) +(defconstant +variable-a-nv+ #x8523) +(defconstant +variable-b-nv+ #x8524) +(defconstant +variable-c-nv+ #x8525) +(defconstant +variable-d-nv+ #x8526) +(defconstant +variable-e-nv+ #x8527) +(defconstant +variable-f-nv+ #x8528) +(defconstant +variable-g-nv+ #x8529) +(defconstant +constant-color0-nv+ #x852A) +(defconstant +constant-color1-nv+ #x852B) +(defconstant +primary-color-nv+ #x852C) +(defconstant +secondary-color-nv+ #x852D) +(defconstant +spare0-nv+ #x852E) +(defconstant +spare1-nv+ #x852F) +(defconstant +discard-nv+ #x8530) +(defconstant +e-times-f-nv+ #x8531) +(defconstant +spare0-plus-secondary-color-nv+ #x8532) +(defconstant +unsigned-identity-nv+ #x8536) +(defconstant +unsigned-invert-nv+ #x8537) +(defconstant +expand-normal-nv+ #x8538) +(defconstant +expand-negate-nv+ #x8539) +(defconstant +half-bias-normal-nv+ #x853A) +(defconstant +half-bias-negate-nv+ #x853B) +(defconstant +signed-identity-nv+ #x853C) +(defconstant +signed-negate-nv+ #x853D) +(defconstant +scale-by-two-nv+ #x853E) +(defconstant +scale-by-four-nv+ #x853F) +(defconstant +scale-by-one-half-nv+ #x8540) +(defconstant +bias-by-negative-one-half-nv+ #x8541) +(defconstant +combiner-input-nv+ #x8542) +(defconstant +combiner-mapping-nv+ #x8543) +(defconstant +combiner-component-usage-nv+ #x8544) +(defconstant +combiner-ab-dot-product-nv+ #x8545) +(defconstant +combiner-cd-dot-product-nv+ #x8546) +(defconstant +combiner-mux-sum-nv+ #x8547) +(defconstant +combiner-scale-nv+ #x8548) +(defconstant +combiner-bias-nv+ #x8549) +(defconstant +combiner-ab-output-nv+ #x854A) +(defconstant +combiner-cd-output-nv+ #x854B) +(defconstant +combiner-sum-output-nv+ #x854C) +(defconstant +max-general-combiners-nv+ #x854D) +(defconstant +num-general-combiners-nv+ #x854E) +(defconstant +color-sum-clamp-nv+ #x854F) +(defconstant +combiner0-nv+ #x8550) +(defconstant +combiner1-nv+ #x8551) +(defconstant +combiner2-nv+ #x8552) +(defconstant +combiner3-nv+ #x8553) +(defconstant +combiner4-nv+ #x8554) +(defconstant +combiner5-nv+ #x8555) +(defconstant +combiner6-nv+ #x8556) +(defconstant +combiner7-nv+ #x8557) +(defconstant +texture0-arb+ #x84C0) +(defconstant +texture1-arb+ #x84C1) +(defglextfun "GetFinalCombinerInputParameterivNV" + get-final-combiner-input-parameter-iv-nv :return "void" :args + ((:name |variable| :type |CombinerVariableNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "GetFinalCombinerInputParameterfvNV" + get-final-combiner-input-parameter-fv-nv :return "void" :args + ((:name |variable| :type |CombinerVariableNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "GetCombinerOutputParameterivNV" + get-combiner-output-parameter-iv-nv :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |portion| :type |CombinerPortionNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "GetCombinerOutputParameterfvNV" + get-combiner-output-parameter-fv-nv :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |portion| :type |CombinerPortionNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "GetCombinerInputParameterivNV" get-combiner-input-parameter-iv-nv + :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |portion| :type |CombinerPortionNV| :direction :in) + (:name |variable| :type |CombinerVariableNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "GetCombinerInputParameterfvNV" get-combiner-input-parameter-fv-nv + :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |portion| :type |CombinerPortionNV| :direction :in) + (:name |variable| :type |CombinerVariableNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "FinalCombinerInputNV" final-combiner-input-nv :return "void" + :args + ((:name |variable| :type |CombinerVariableNV| :direction :in) + (:name |input| :type |CombinerRegisterNV| :direction :in) + (:name |mapping| :type |CombinerMappingNV| :direction :in) + (:name |componentUsage| :type |CombinerComponentUsageNV| :direction :in)) + :category "NV_register_combiners" :version "1.1") +(defglextfun "CombinerOutputNV" combiner-output-nv :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |portion| :type |CombinerPortionNV| :direction :in) + (:name |abOutput| :type |CombinerRegisterNV| :direction :in) + (:name |cdOutput| :type |CombinerRegisterNV| :direction :in) + (:name |sumOutput| :type |CombinerRegisterNV| :direction :in) + (:name |scale| :type |CombinerScaleNV| :direction :in) + (:name |bias| :type |CombinerBiasNV| :direction :in) + (:name |abDotProduct| :type |Boolean| :direction :in) + (:name |cdDotProduct| :type |Boolean| :direction :in) + (:name |muxSum| :type |Boolean| :direction :in)) + :category "NV_register_combiners" :version "1.1") +(defglextfun "CombinerInputNV" combiner-input-nv :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |portion| :type |CombinerPortionNV| :direction :in) + (:name |variable| :type |CombinerVariableNV| :direction :in) + (:name |input| :type |CombinerRegisterNV| :direction :in) + (:name |mapping| :type |CombinerMappingNV| :direction :in) + (:name |componentUsage| :type |CombinerComponentUsageNV| :direction :in)) + :category "NV_register_combiners" :version "1.1") +(defglextfun "CombinerParameteriNV" combiner-parameter-i-nv :return "void" + :args + ((:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "NV_register_combiners" :version "1.1") +(defglextfun "CombinerParameterivNV" combiner-parameter-iv-nv :return "void" + :args + ((:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "NV_register_combiners" :version "1.1") +(defglextfun "CombinerParameterfNV" combiner-parameter-f-nv :return "void" + :args + ((:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |param| :type |Float32| :direction :in)) + :category "NV_register_combiners" :version "1.1") +(defglextfun "CombinerParameterfvNV" combiner-parameter-fv-nv :return "void" + :args + ((:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "NV_register_combiners" :version "1.1") diff --git a/lib/opengl-nv_register_combiners2.lisp b/lib/opengl-nv_register_combiners2.lisp dissimilarity index 80% index 4e94147..1b29537 100644 --- a/lib/opengl-nv_register_combiners2.lisp +++ b/lib/opengl-nv_register_combiners2.lisp @@ -1,23 +1,20 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_register_combiners2 - -(defconstant +per-stage-constants-nv+ #x8535) -(defglextfun - (("GetCombinerStageParameterfvNV" get-combiner-stage-parameter-fv-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :dlflags ("notlistable") :category - ("NV_register_combiners2") :version ("1.1") :extension nil :glxflags - ("ignore") :glsflags ("get") :glsopcode ("0x0226") :offset ("?"))) -(defglextfun - (("CombinerStageParameterfvNV" combiner-stage-parameter-fv-nv) :args - ((:name |stage| :type |CombinerStageNV| :direction :in) - (:name |pname| :type |CombinerParameterNV| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("NV_register_combiners2") :version ("1.1") - :extension nil :glxflags ("ignore") :glsopcode ("0x0225") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_register_combiners2 + +(defconstant +per-stage-constants-nv+ #x8535) +(defglextfun "GetCombinerStageParameterfvNV" get-combiner-stage-parameter-fv-nv + :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "NV_register_combiners2" :version "1.1") +(defglextfun "CombinerStageParameterfvNV" combiner-stage-parameter-fv-nv + :return "void" :args + ((:name |stage| :type |CombinerStageNV| :direction :in) + (:name |pname| :type |CombinerParameterNV| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "NV_register_combiners2" :version "1.1") diff --git a/lib/opengl-nv_transform_feedback.lisp b/lib/opengl-nv_transform_feedback.lisp dissimilarity index 76% index 001c470..e5325d1 100644 --- a/lib/opengl-nv_transform_feedback.lisp +++ b/lib/opengl-nv_transform_feedback.lisp @@ -1,121 +1,92 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_transform_feedback - -(defconstant +back-primary-color-nv+ #x8C77) -(defconstant +back-secondary-color-nv+ #x8C78) -(defconstant +texture-coord-nv+ #x8C79) -(defconstant +clip-distance-nv+ #x8C7A) -(defconstant +vertex-id-nv+ #x8C7B) -(defconstant +primitive-id-nv+ #x8C7C) -(defconstant +generic-attrib-nv+ #x8C7D) -(defconstant +transform-feedback-attribs-nv+ #x8C7E) -(defconstant +transform-feedback-buffer-mode-nv+ #x8C7F) -(defconstant +max-transform-feedback-separate-components-nv+ #x8C80) -(defconstant +active-varyings-nv+ #x8C81) -(defconstant +active-varying-max-length-nv+ #x8C82) -(defconstant +transform-feedback-varyings-nv+ #x8C83) -(defconstant +transform-feedback-buffer-start-nv+ #x8C84) -(defconstant +transform-feedback-buffer-size-nv+ #x8C85) -(defconstant +transform-feedback-record-nv+ #x8C86) -(defconstant +primitives-generated-nv+ #x8C87) -(defconstant +transform-feedback-primitives-written-nv+ #x8C88) -(defconstant +rasterizer-discard-nv+ #x8C89) -(defconstant +max-transform-feedback-interleaved-attribs-nv+ #x8C8A) -(defconstant +max-transform-feedback-separate-attribs-nv+ #x8C8B) -(defconstant +interleaved-attribs-nv+ #x8C8C) -(defconstant +separate-attribs-nv+ #x8C8D) -(defconstant +transform-feedback-buffer-nv+ #x8C8E) -(defconstant +transform-feedback-buffer-binding-nv+ #x8C8F) -(defglextfun - (("GetTransformFeedbackVaryingNV" get-transform-feedback-varying-nv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_transform_feedback") :dlflags ("notlistable") - :version ("1.5") :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetActiveVaryingNV" get-active-varying-nv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |bufSize| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |size| :type |SizeI| :direction :out :array t :size #x1) - (:name |type| :type |GLenum| :direction :out :array t :size #x1) - (:name |name| :type |Char| :direction :out :array t :size - (|program| |index| |bufSize|))) - :return ("void") :category ("NV_transform_feedback") :dlflags ("notlistable") - :version ("1.5") :extension ("soft" "WINSOFT") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetVaryingLocationNV" get-varying-location-nv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t :size (|name|))) - :return ("Int32") :category ("NV_transform_feedback") :dlflags - ("notlistable") :version ("1.5") :glfflags ("ignore") :glsflags ("ignore") - :glxflags ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("ActiveVaryingNV" active-varying-nv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t :size (|name|))) - :return ("void") :category ("NV_transform_feedback") :version ("1.5") - :dlflags ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("TransformFeedbackVaryingsNV" transform-feedback-varyings-nv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |locations| :type |Int32| :direction :in :array t :size (|count|)) - (:name |bufferMode| :type |GLenum| :direction :in)) - :return ("void") :category ("NV_transform_feedback") :version ("1.5") - :dlflags ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("BindBufferBaseNV" bind-buffer-base-nv) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |buffer| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_transform_feedback") :version ("1.5") - :dlflags ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("BindBufferOffsetNV" bind-buffer-offset-nv) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |offset| :type |BufferOffset| :direction :in)) - :return ("void") :category ("NV_transform_feedback") :version ("1.5") - :dlflags ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("BindBufferRangeNV" bind-buffer-range-nv) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |buffer| :type |UInt32| :direction :in) - (:name |offset| :type |BufferOffset| :direction :in) - (:name |size| :type |BufferSize| :direction :in)) - :return ("void") :category ("NV_transform_feedback") :version ("1.5") - :dlflags ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("TransformFeedbackAttribsNV" transform-feedback-attribs-nv) :args - ((:name |count| :type |UInt32| :direction :in) - (:name |attribs| :type |Int32| :direction :in :array t :size (|count|)) - (:name |bufferMode| :type |GLenum| :direction :in)) - :return ("void") :category ("NV_transform_feedback") :version ("1.5") - :dlflags ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("EndTransformFeedbackNV" end-transform-feedback-nv) :args nil :return - ("void") :category ("NV_transform_feedback") :version ("1.5") :dlflags - ("notlistable") :glxflags ("ignore") :glfflags ("ignore") :glsflags - ("ignore") :extension ("soft" "WINSOFT"))) -(defglextfun - (("BeginTransformFeedbackNV" begin-transform-feedback-nv) :args - ((:name |primitiveMode| :type |GLenum| :direction :in)) :return ("void") - :category ("NV_transform_feedback") :version ("1.5") :dlflags ("notlistable") - :glxflags ("ignore") :glfflags ("ignore") :glsflags ("ignore") :extension - ("soft" "WINSOFT"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_transform_feedback + +(defconstant +back-primary-color-nv+ #x8C77) +(defconstant +back-secondary-color-nv+ #x8C78) +(defconstant +texture-coord-nv+ #x8C79) +(defconstant +clip-distance-nv+ #x8C7A) +(defconstant +vertex-id-nv+ #x8C7B) +(defconstant +primitive-id-nv+ #x8C7C) +(defconstant +generic-attrib-nv+ #x8C7D) +(defconstant +transform-feedback-attribs-nv+ #x8C7E) +(defconstant +transform-feedback-buffer-mode-nv+ #x8C7F) +(defconstant +max-transform-feedback-separate-components-nv+ #x8C80) +(defconstant +active-varyings-nv+ #x8C81) +(defconstant +active-varying-max-length-nv+ #x8C82) +(defconstant +transform-feedback-varyings-nv+ #x8C83) +(defconstant +transform-feedback-buffer-start-nv+ #x8C84) +(defconstant +transform-feedback-buffer-size-nv+ #x8C85) +(defconstant +transform-feedback-record-nv+ #x8C86) +(defconstant +primitives-generated-nv+ #x8C87) +(defconstant +transform-feedback-primitives-written-nv+ #x8C88) +(defconstant +rasterizer-discard-nv+ #x8C89) +(defconstant +max-transform-feedback-interleaved-attribs-nv+ #x8C8A) +(defconstant +max-transform-feedback-separate-attribs-nv+ #x8C8B) +(defconstant +interleaved-attribs-nv+ #x8C8C) +(defconstant +separate-attribs-nv+ #x8C8D) +(defconstant +transform-feedback-buffer-nv+ #x8C8E) +(defconstant +transform-feedback-buffer-binding-nv+ #x8C8F) +(defglextfun "GetTransformFeedbackVaryingNV" get-transform-feedback-varying-nv + :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :out :array t :size #x1)) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "GetActiveVaryingNV" get-active-varying-nv :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |bufSize| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |size| :type |SizeI| :direction :out :array t :size #x1) + (:name |type| :type |GLenum| :direction :out :array t :size #x1) + (:name |name| :type |Char| :direction :out :array t :size + (|program| |index| |bufSize|))) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "GetVaryingLocationNV" get-varying-location-nv :return "Int32" + :args + ((:name |program| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t :size (|name|))) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "ActiveVaryingNV" active-varying-nv :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t :size (|name|))) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "TransformFeedbackVaryingsNV" transform-feedback-varyings-nv + :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |locations| :type |Int32| :direction :in :array t :size (|count|)) + (:name |bufferMode| :type |GLenum| :direction :in)) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "BindBufferBaseNV" bind-buffer-base-nv :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |buffer| :type |UInt32| :direction :in)) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "BindBufferOffsetNV" bind-buffer-offset-nv :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |offset| :type |BufferOffset| :direction :in)) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "BindBufferRangeNV" bind-buffer-range-nv :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |buffer| :type |UInt32| :direction :in) + (:name |offset| :type |BufferOffset| :direction :in) + (:name |size| :type |BufferSize| :direction :in)) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "TransformFeedbackAttribsNV" transform-feedback-attribs-nv :return + "void" :args + ((:name |count| :type |UInt32| :direction :in) + (:name |attribs| :type |Int32| :direction :in :array t :size (|count|)) + (:name |bufferMode| :type |GLenum| :direction :in)) + :category "NV_transform_feedback" :version "1.5") +(defglextfun "EndTransformFeedbackNV" end-transform-feedback-nv :return "void" + :args nil :category "NV_transform_feedback" :version "1.5") +(defglextfun "BeginTransformFeedbackNV" begin-transform-feedback-nv :return + "void" :args ((:name |primitiveMode| :type |GLenum| :direction :in)) :category + "NV_transform_feedback" :version "1.5") diff --git a/lib/opengl-nv_vertex_array_range.lisp b/lib/opengl-nv_vertex_array_range.lisp dissimilarity index 64% index e920330..cec851e 100644 --- a/lib/opengl-nv_vertex_array_range.lisp +++ b/lib/opengl-nv_vertex_array_range.lisp @@ -1,26 +1,18 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_vertex_array_range - -(defconstant +vertex-array-range-nv+ #x851D) -(defconstant +vertex-array-range-length-nv+ #x851E) -(defconstant +vertex-array-range-valid-nv+ #x851F) -(defconstant +max-vertex-array-range-element-nv+ #x8520) -(defconstant +vertex-array-range-pointer-nv+ #x8521) -(defglextfun - (("VertexArrayRangeNV" vertex-array-range-nv) :args - ((:name |length| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size (|length|) - :retained t)) - :return ("void") :category ("NV_vertex_array_range") :version ("1.1") - :extension ("soft" "WINSOFT" "NV10") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode" "ignore") :glsflags ("client") - :glsopcode ("0x01E1") :offset ("498"))) -(defglextfun - (("FlushVertexArrayRangeNV" flush-vertex-array-range-nv) :args nil :return - ("void") :category ("NV_vertex_array_range") :version ("1.1") :extension - ("soft" "WINSOFT" "NV10") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode" "ignore") :glsflags ("client") - :glsopcode ("0x01E0") :offset ("497"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_vertex_array_range + +(defconstant +vertex-array-range-nv+ #x851D) +(defconstant +vertex-array-range-length-nv+ #x851E) +(defconstant +vertex-array-range-valid-nv+ #x851F) +(defconstant +max-vertex-array-range-element-nv+ #x8520) +(defconstant +vertex-array-range-pointer-nv+ #x8521) +(defglextfun "VertexArrayRangeNV" vertex-array-range-nv :return "void" :args + ((:name |length| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|length|) + :retained t)) + :category "NV_vertex_array_range" :version "1.1") +(defglextfun "FlushVertexArrayRangeNV" flush-vertex-array-range-nv :return + "void" :args nil :category "NV_vertex_array_range" :version "1.1") diff --git a/lib/opengl-nv_vertex_program.lisp b/lib/opengl-nv_vertex_program.lisp dissimilarity index 87% index fad01c1..2a830d9 100644 --- a/lib/opengl-nv_vertex_program.lisp +++ b/lib/opengl-nv_vertex_program.lisp @@ -1,618 +1,427 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_vertex_program - -(defconstant +vertex-program-nv+ #x8620) -(defconstant +vertex-state-program-nv+ #x8621) -(defconstant +attrib-array-size-nv+ #x8623) -(defconstant +attrib-array-stride-nv+ #x8624) -(defconstant +attrib-array-type-nv+ #x8625) -(defconstant +current-attrib-nv+ #x8626) -(defconstant +program-length-nv+ #x8627) -(defconstant +program-string-nv+ #x8628) -(defconstant +modelview-projection-nv+ #x8629) -(defconstant +identity-nv+ #x862A) -(defconstant +inverse-nv+ #x862B) -(defconstant +transpose-nv+ #x862C) -(defconstant +inverse-transpose-nv+ #x862D) -(defconstant +max-track-matrix-stack-depth-nv+ #x862E) -(defconstant +max-track-matrices-nv+ #x862F) -(defconstant +matrix0-nv+ #x8630) -(defconstant +matrix1-nv+ #x8631) -(defconstant +matrix2-nv+ #x8632) -(defconstant +matrix3-nv+ #x8633) -(defconstant +matrix4-nv+ #x8634) -(defconstant +matrix5-nv+ #x8635) -(defconstant +matrix6-nv+ #x8636) -(defconstant +matrix7-nv+ #x8637) -(defconstant +current-matrix-stack-depth-nv+ #x8640) -(defconstant +current-matrix-nv+ #x8641) -(defconstant +vertex-program-point-size-nv+ #x8642) -(defconstant +vertex-program-two-side-nv+ #x8643) -(defconstant +program-parameter-nv+ #x8644) -(defconstant +attrib-array-pointer-nv+ #x8645) -(defconstant +program-target-nv+ #x8646) -(defconstant +program-resident-nv+ #x8647) -(defconstant +track-matrix-nv+ #x8648) -(defconstant +track-matrix-transform-nv+ #x8649) -(defconstant +vertex-program-binding-nv+ #x864A) -(defconstant +program-error-position-nv+ #x864B) -(defconstant +vertex-attrib-array0-nv+ #x8650) -(defconstant +vertex-attrib-array1-nv+ #x8651) -(defconstant +vertex-attrib-array2-nv+ #x8652) -(defconstant +vertex-attrib-array3-nv+ #x8653) -(defconstant +vertex-attrib-array4-nv+ #x8654) -(defconstant +vertex-attrib-array5-nv+ #x8655) -(defconstant +vertex-attrib-array6-nv+ #x8656) -(defconstant +vertex-attrib-array7-nv+ #x8657) -(defconstant +vertex-attrib-array8-nv+ #x8658) -(defconstant +vertex-attrib-array9-nv+ #x8659) -(defconstant +vertex-attrib-array10-nv+ #x865A) -(defconstant +vertex-attrib-array11-nv+ #x865B) -(defconstant +vertex-attrib-array12-nv+ #x865C) -(defconstant +vertex-attrib-array13-nv+ #x865D) -(defconstant +vertex-attrib-array14-nv+ #x865E) -(defconstant +vertex-attrib-array15-nv+ #x865F) -(defconstant +map1-vertex-attrib0-4-nv+ #x8660) -(defconstant +map1-vertex-attrib1-4-nv+ #x8661) -(defconstant +map1-vertex-attrib2-4-nv+ #x8662) -(defconstant +map1-vertex-attrib3-4-nv+ #x8663) -(defconstant +map1-vertex-attrib4-4-nv+ #x8664) -(defconstant +map1-vertex-attrib5-4-nv+ #x8665) -(defconstant +map1-vertex-attrib6-4-nv+ #x8666) -(defconstant +map1-vertex-attrib7-4-nv+ #x8667) -(defconstant +map1-vertex-attrib8-4-nv+ #x8668) -(defconstant +map1-vertex-attrib9-4-nv+ #x8669) -(defconstant +map1-vertex-attrib10-4-nv+ #x866A) -(defconstant +map1-vertex-attrib11-4-nv+ #x866B) -(defconstant +map1-vertex-attrib12-4-nv+ #x866C) -(defconstant +map1-vertex-attrib13-4-nv+ #x866D) -(defconstant +map1-vertex-attrib14-4-nv+ #x866E) -(defconstant +map1-vertex-attrib15-4-nv+ #x866F) -(defconstant +map2-vertex-attrib0-4-nv+ #x8670) -(defconstant +map2-vertex-attrib1-4-nv+ #x8671) -(defconstant +map2-vertex-attrib2-4-nv+ #x8672) -(defconstant +map2-vertex-attrib3-4-nv+ #x8673) -(defconstant +map2-vertex-attrib4-4-nv+ #x8674) -(defconstant +map2-vertex-attrib5-4-nv+ #x8675) -(defconstant +map2-vertex-attrib6-4-nv+ #x8676) -(defconstant +map2-vertex-attrib7-4-nv+ #x8677) -(defconstant +map2-vertex-attrib8-4-nv+ #x8678) -(defconstant +map2-vertex-attrib9-4-nv+ #x8679) -(defconstant +map2-vertex-attrib10-4-nv+ #x867A) -(defconstant +map2-vertex-attrib11-4-nv+ #x867B) -(defconstant +map2-vertex-attrib12-4-nv+ #x867C) -(defconstant +map2-vertex-attrib13-4-nv+ #x867D) -(defconstant +map2-vertex-attrib14-4-nv+ #x867E) -(defconstant +map2-vertex-attrib15-4-nv+ #x867F) -(defglextfun - (("VertexAttribs4ubvNV" vertex-attribs-4ubv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |ColorUB| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4214") - :glsopcode ("0x0257") :offset ("641"))) -(defglextfun - (("VertexAttribs4svNV" vertex-attribs-4sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4205") - :glsopcode ("0x0254") :offset ("640"))) -(defglextfun - (("VertexAttribs4fvNV" vertex-attribs-4fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4209") - :glsopcode ("0x0255") :offset ("639"))) -(defglextfun - (("VertexAttribs4dvNV" vertex-attribs-4dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4213") - :glsopcode ("0x0256") :offset ("638"))) -(defglextfun - (("VertexAttribs3svNV" vertex-attribs-3sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size count*3)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4204") - :glsopcode ("0x0251") :offset ("637"))) -(defglextfun - (("VertexAttribs3fvNV" vertex-attribs-3fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size count*3)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4208") - :glsopcode ("0x0252") :offset ("636"))) -(defglextfun - (("VertexAttribs3dvNV" vertex-attribs-3dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size count*3)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4212") - :glsopcode ("0x0253") :offset ("635"))) -(defglextfun - (("VertexAttribs2svNV" vertex-attribs-2sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size count*2)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4203") - :glsopcode ("0x024E") :offset ("634"))) -(defglextfun - (("VertexAttribs2fvNV" vertex-attribs-2fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size count*2)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4207") - :glsopcode ("0x024F") :offset ("633"))) -(defglextfun - (("VertexAttribs2dvNV" vertex-attribs-2dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size count*2)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4211") - :glsopcode ("0x0250") :offset ("632"))) -(defglextfun - (("VertexAttribs1svNV" vertex-attribs-1sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size count)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4202") - :glsopcode ("0x024B") :offset ("631"))) -(defglextfun - (("VertexAttribs1fvNV" vertex-attribs-1fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4206") - :glsopcode ("0x024C") :offset ("630"))) -(defglextfun - (("VertexAttribs1dvNV" vertex-attribs-1dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size count)) - :return ("void") :category ("NV_vertex_program") :dlflags ("handcode") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxropcode ("4210") - :glsopcode ("0x024D") :offset ("629"))) -(defglextfun - (("VertexAttrib4ubvNV" vertex-attrib-4ubv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |ColorUB| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4201") :glsopcode ("0x024A") :alias - ("VertexAttrib4Nubv") :glsalias ("VertexAttrib4Nubv"))) -(defglextfun - (("VertexAttrib4ubNV" vertex-attrib-4ub-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |ColorUB| :direction :in) - (:name |y| :type |ColorUB| :direction :in) - (:name |z| :type |ColorUB| :direction :in) - (:name |w| :type |ColorUB| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :vectorequiv ("VertexAttrib4ubvNV") :alias - ("VertexAttrib4Nub") :glsalias ("VertexAttrib4Nub"))) -(defglextfun - (("VertexAttrib4svNV" vertex-attrib-4sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4192") :glsopcode ("0x0247") :alias - ("VertexAttrib4sv") :glsalias ("VertexAttrib4sv"))) -(defglextfun - (("VertexAttrib4sNV" vertex-attrib-4s-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in) - (:name |w| :type |Int16| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib4svNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib4s") :glsalias ("VertexAttrib4s"))) -(defglextfun - (("VertexAttrib4fvNV" vertex-attrib-4fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4196") :glsopcode ("0x0248") :alias - ("VertexAttrib4fv") :glsalias ("VertexAttrib4fv"))) -(defglextfun - (("VertexAttrib4fNV" vertex-attrib-4f-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib4fvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib4f") :glsalias ("VertexAttrib4f"))) -(defglextfun - (("VertexAttrib4dvNV" vertex-attrib-4dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4200") :glsopcode ("0x0249") :alias - ("VertexAttrib4dv") :glsalias ("VertexAttrib4dv"))) -(defglextfun - (("VertexAttrib4dNV" vertex-attrib-4d-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib4dvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib4d") :glsalias ("VertexAttrib4d"))) -(defglextfun - (("VertexAttrib3svNV" vertex-attrib-3sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4191") :glsopcode ("0x0244") :alias - ("VertexAttrib3sv") :glsalias ("VertexAttrib3sv"))) -(defglextfun - (("VertexAttrib3sNV" vertex-attrib-3s-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib3svNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib3s") :glsalias ("VertexAttrib3s"))) -(defglextfun - (("VertexAttrib3fvNV" vertex-attrib-3fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4195") :glsopcode ("0x0245") :alias - ("VertexAttrib3fv") :glsalias ("VertexAttrib3fv"))) -(defglextfun - (("VertexAttrib3fNV" vertex-attrib-3f-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib3fvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib3f") :glsalias ("VertexAttrib3f"))) -(defglextfun - (("VertexAttrib3dvNV" vertex-attrib-3dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4199") :glsopcode ("0x0246") :alias - ("VertexAttrib3dv") :glsalias ("VertexAttrib3dv"))) -(defglextfun - (("VertexAttrib3dNV" vertex-attrib-3d-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib3dvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib3d") :glsalias ("VertexAttrib3d"))) -(defglextfun - (("VertexAttrib2svNV" vertex-attrib-2sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4190") :glsopcode ("0x0241") :alias - ("VertexAttrib2sv") :glsalias ("VertexAttrib2sv"))) -(defglextfun - (("VertexAttrib2sNV" vertex-attrib-2s-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib2svNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib2s") :glsalias ("VertexAttrib2s"))) -(defglextfun - (("VertexAttrib2fvNV" vertex-attrib-2fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4194") :glsopcode ("0x0242") :alias - ("VertexAttrib2fv") :glsalias ("VertexAttrib2fv"))) -(defglextfun - (("VertexAttrib2fNV" vertex-attrib-2f-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib2fvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib2f") :glsalias ("VertexAttrib2f"))) -(defglextfun - (("VertexAttrib2dvNV" vertex-attrib-2dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4198") :glsopcode ("0x0243") :alias - ("VertexAttrib2dv") :glsalias ("VertexAttrib2dv"))) -(defglextfun - (("VertexAttrib2dNV" vertex-attrib-2d-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib2dvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib2d") :glsalias ("VertexAttrib2d"))) -(defglextfun - (("VertexAttrib1svNV" vertex-attrib-1sv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4189") :glsopcode ("0x023E") :alias - ("VertexAttrib1sv") :glsalias ("VertexAttrib1sv"))) -(defglextfun - (("VertexAttrib1sNV" vertex-attrib-1s-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib1svNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib1s") :glsalias ("VertexAttrib1s"))) -(defglextfun - (("VertexAttrib1fvNV" vertex-attrib-1fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4193") :glsopcode ("0x023F") :alias - ("VertexAttrib1fv") :glsalias ("VertexAttrib1fv"))) -(defglextfun - (("VertexAttrib1fNV" vertex-attrib-1f-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib1fvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib1f") :glsalias ("VertexAttrib1f"))) -(defglextfun - (("VertexAttrib1dvNV" vertex-attrib-1dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4197") :glsopcode ("0x0240") :alias - ("VertexAttrib1dv") :glsalias ("VertexAttrib1dv"))) -(defglextfun - (("VertexAttrib1dNV" vertex-attrib-1d-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("VertexAttrib1dvNV") :extension ("soft" "WINSOFT" "NV10") - :alias ("VertexAttrib1d") :glsalias ("VertexAttrib1d"))) -(defglextfun - (("VertexAttribPointerNV" vertex-attrib-pointer-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |fsize| :type |Int32| :direction :in) - (:name |type| :type |VertexAttribEnumNV| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|fsize| |type| |stride|) :retained t)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("client") :glsopcode ("0x023D") :offset ("602"))) -(defglextfun - (("TrackMatrixNV" track-matrix-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |address| :type |UInt32| :direction :in) - (:name |matrix| :type |VertexAttribEnumNV| :direction :in) - (:name |transform| :type |VertexAttribEnumNV| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4188") :glsopcode ("0x023C") :offset - ("601"))) -(defglextfun - (("RequestResidentProgramsNV" request-resident-programs-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |programs| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4182") :glsopcode ("0x022C") :offset - ("600"))) -(defglextfun - (("ProgramParameters4fvNV" program-parameters-4fv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4186") :glsopcode ("0x023B") :offset - ("599"))) -(defglextfun - (("ProgramParameters4dvNV" program-parameters-4dv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |count| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size count*4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4187") :glsopcode ("0x023A") :offset - ("598"))) -(defglextfun - (("ProgramParameter4fvNV" program-parameter-4fv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4184") :glsopcode ("0x0239") :offset - ("597"))) -(defglextfun - (("ProgramParameter4fNV" program-parameter-4f-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("ProgramParameter4fvNV") :extension ("soft" "WINSOFT" "NV10") - :offset ("596"))) -(defglextfun - (("ProgramParameter4dvNV" program-parameter-4dv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4185") :glsopcode ("0x0238") :offset - ("595"))) -(defglextfun - (("ProgramParameter4dNV" program-parameter-4d-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") - :vectorequiv ("ProgramParameter4dvNV") :extension ("soft" "WINSOFT" "NV10") - :offset ("594"))) -(defglextfun - (("LoadProgramNV" load-program-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |id| :type |UInt32| :direction :in) - (:name |len| :type |SizeI| :direction :in) - (:name |program| :type |UInt8| :direction :in :array t :size len)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4183") :glsopcode ("0x0237") :offset - ("593"))) -(defglextfun - (("IsProgramNV" is-program-nv) :args - ((:name |id| :type |UInt32| :direction :in)) :return ("Boolean") :category - ("NV_vertex_program") :dlflags ("notlistable") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1304") :glsflags ("get") - :glsopcode ("0x0236") :alias ("IsProgram") :glsalias ("IsProgram"))) -(defglextfun - (("GetVertexAttribPointervNV" get-vertex-attrib-pointerv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glsflags ("client" "get") :glsopcode ("0x0235") :alias - ("GetVertexAttribPointerv") :glsalias ("GetVertexAttribPointerv"))) -(defglextfun - (("GetVertexAttribivNV" get-vertex-attrib-iv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1303") - :glsflags ("client" "get") :glsopcode ("0x0234") :alias ("GetVertexAttribiv") - :glsalias ("GetVertexAttribiv"))) -(defglextfun - (("GetVertexAttribfvNV" get-vertex-attrib-fv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1302") - :glsflags ("client" "get") :glsopcode ("0x0233") :alias ("GetVertexAttribfv") - :glsalias ("GetVertexAttribfv"))) -(defglextfun - (("GetVertexAttribdvNV" get-vertex-attrib-dv-nv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1301") - :glsflags ("client" "get") :glsopcode ("0x0232") :alias ("GetVertexAttribdv") - :glsalias ("GetVertexAttribdv"))) -(defglextfun - (("GetTrackMatrixivNV" get-track-matrix-iv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |address| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glxvendorpriv ("1300") :glsflags ("get") :glsopcode ("0x0231") :offset - ("587"))) -(defglextfun - (("GetProgramStringNV" get-program-string-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |program| :type |ProgramCharacterNV| :direction :out :array t :size - (|id| |pname|))) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glxvendorpriv ("1299") :glsflags ("get") :glsopcode ("0x0230") :offset - ("586"))) -(defglextfun - (("GetProgramivNV" get-program-iv-nv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glxvendorpriv ("1298") :glsflags ("get") :glsopcode ("0x022F") :offset - ("585"))) -(defglextfun - (("GetProgramParameterfvNV" get-program-parameter-fv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glxvendorpriv ("1296") :glsflags ("get") :glsopcode ("0x022D") :offset - ("584"))) -(defglextfun - (("GetProgramParameterdvNV" get-program-parameter-dv-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnumNV| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glxvendorpriv ("1297") :glsflags ("get") :glsopcode ("0x022E") :offset - ("583"))) -(defglextfun - (("GenProgramsNV" gen-programs-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |programs| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1295") - :glsopcode ("0x022A") :alias ("GenProgramsARB") :glsalias ("GenProgramsARB"))) -(defglextfun - (("ExecuteProgramNV" execute-program-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |id| :type |UInt32| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glxropcode ("4181") - :glsopcode ("0x0229") :offset ("581"))) -(defglextfun - (("DeleteProgramsNV" delete-programs-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |programs| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1294") - :glsopcode ("0x0228") :alias ("DeleteProgramsARB") :glsalias - ("DeleteProgramsARB"))) -(defglextfun - (("BindProgramNV" bind-program-nv) :args - ((:name |target| :type |VertexAttribEnumNV| :direction :in) - (:name |id| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_vertex_program") :version ("1.2") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4180") :glsopcode ("0x0227") :alias - ("BindProgramARB") :glsalias ("BindProgramARB"))) -(defglextfun - (("AreProgramsResidentNV" are-programs-resident-nv) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |programs| :type |UInt32| :direction :in :array t :size n) - (:name |residences| :type |Boolean| :direction :out :array t :size n)) - :return ("Boolean") :category ("NV_vertex_program") :dlflags ("notlistable") - :version ("1.2") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") - :glxvendorpriv ("1293") :glsflags ("get") :glsopcode ("0x022B") :offset - ("578"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_vertex_program + +(defconstant +vertex-program-nv+ #x8620) +(defconstant +vertex-state-program-nv+ #x8621) +(defconstant +attrib-array-size-nv+ #x8623) +(defconstant +attrib-array-stride-nv+ #x8624) +(defconstant +attrib-array-type-nv+ #x8625) +(defconstant +current-attrib-nv+ #x8626) +(defconstant +program-length-nv+ #x8627) +(defconstant +program-string-nv+ #x8628) +(defconstant +modelview-projection-nv+ #x8629) +(defconstant +identity-nv+ #x862A) +(defconstant +inverse-nv+ #x862B) +(defconstant +transpose-nv+ #x862C) +(defconstant +inverse-transpose-nv+ #x862D) +(defconstant +max-track-matrix-stack-depth-nv+ #x862E) +(defconstant +max-track-matrices-nv+ #x862F) +(defconstant +matrix0-nv+ #x8630) +(defconstant +matrix1-nv+ #x8631) +(defconstant +matrix2-nv+ #x8632) +(defconstant +matrix3-nv+ #x8633) +(defconstant +matrix4-nv+ #x8634) +(defconstant +matrix5-nv+ #x8635) +(defconstant +matrix6-nv+ #x8636) +(defconstant +matrix7-nv+ #x8637) +(defconstant +current-matrix-stack-depth-nv+ #x8640) +(defconstant +current-matrix-nv+ #x8641) +(defconstant +vertex-program-point-size-nv+ #x8642) +(defconstant +vertex-program-two-side-nv+ #x8643) +(defconstant +program-parameter-nv+ #x8644) +(defconstant +attrib-array-pointer-nv+ #x8645) +(defconstant +program-target-nv+ #x8646) +(defconstant +program-resident-nv+ #x8647) +(defconstant +track-matrix-nv+ #x8648) +(defconstant +track-matrix-transform-nv+ #x8649) +(defconstant +vertex-program-binding-nv+ #x864A) +(defconstant +program-error-position-nv+ #x864B) +(defconstant +vertex-attrib-array0-nv+ #x8650) +(defconstant +vertex-attrib-array1-nv+ #x8651) +(defconstant +vertex-attrib-array2-nv+ #x8652) +(defconstant +vertex-attrib-array3-nv+ #x8653) +(defconstant +vertex-attrib-array4-nv+ #x8654) +(defconstant +vertex-attrib-array5-nv+ #x8655) +(defconstant +vertex-attrib-array6-nv+ #x8656) +(defconstant +vertex-attrib-array7-nv+ #x8657) +(defconstant +vertex-attrib-array8-nv+ #x8658) +(defconstant +vertex-attrib-array9-nv+ #x8659) +(defconstant +vertex-attrib-array10-nv+ #x865A) +(defconstant +vertex-attrib-array11-nv+ #x865B) +(defconstant +vertex-attrib-array12-nv+ #x865C) +(defconstant +vertex-attrib-array13-nv+ #x865D) +(defconstant +vertex-attrib-array14-nv+ #x865E) +(defconstant +vertex-attrib-array15-nv+ #x865F) +(defconstant +map1-vertex-attrib0-4-nv+ #x8660) +(defconstant +map1-vertex-attrib1-4-nv+ #x8661) +(defconstant +map1-vertex-attrib2-4-nv+ #x8662) +(defconstant +map1-vertex-attrib3-4-nv+ #x8663) +(defconstant +map1-vertex-attrib4-4-nv+ #x8664) +(defconstant +map1-vertex-attrib5-4-nv+ #x8665) +(defconstant +map1-vertex-attrib6-4-nv+ #x8666) +(defconstant +map1-vertex-attrib7-4-nv+ #x8667) +(defconstant +map1-vertex-attrib8-4-nv+ #x8668) +(defconstant +map1-vertex-attrib9-4-nv+ #x8669) +(defconstant +map1-vertex-attrib10-4-nv+ #x866A) +(defconstant +map1-vertex-attrib11-4-nv+ #x866B) +(defconstant +map1-vertex-attrib12-4-nv+ #x866C) +(defconstant +map1-vertex-attrib13-4-nv+ #x866D) +(defconstant +map1-vertex-attrib14-4-nv+ #x866E) +(defconstant +map1-vertex-attrib15-4-nv+ #x866F) +(defconstant +map2-vertex-attrib0-4-nv+ #x8670) +(defconstant +map2-vertex-attrib1-4-nv+ #x8671) +(defconstant +map2-vertex-attrib2-4-nv+ #x8672) +(defconstant +map2-vertex-attrib3-4-nv+ #x8673) +(defconstant +map2-vertex-attrib4-4-nv+ #x8674) +(defconstant +map2-vertex-attrib5-4-nv+ #x8675) +(defconstant +map2-vertex-attrib6-4-nv+ #x8676) +(defconstant +map2-vertex-attrib7-4-nv+ #x8677) +(defconstant +map2-vertex-attrib8-4-nv+ #x8678) +(defconstant +map2-vertex-attrib9-4-nv+ #x8679) +(defconstant +map2-vertex-attrib10-4-nv+ #x867A) +(defconstant +map2-vertex-attrib11-4-nv+ #x867B) +(defconstant +map2-vertex-attrib12-4-nv+ #x867C) +(defconstant +map2-vertex-attrib13-4-nv+ #x867D) +(defconstant +map2-vertex-attrib14-4-nv+ #x867E) +(defconstant +map2-vertex-attrib15-4-nv+ #x867F) +(defglextfun "VertexAttribs4ubvNV" vertex-attribs-4ubv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |ColorUB| :direction :in :array t :size count*4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs4svNV" vertex-attribs-4sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size count*4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs4fvNV" vertex-attribs-4fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size count*4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs4dvNV" vertex-attribs-4dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size count*4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs3svNV" vertex-attribs-3sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size count*3)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs3fvNV" vertex-attribs-3fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size count*3)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs3dvNV" vertex-attribs-3dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size count*3)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs2svNV" vertex-attribs-2sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size count*2)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs2fvNV" vertex-attribs-2fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size count*2)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs2dvNV" vertex-attribs-2dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size count*2)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs1svNV" vertex-attribs-1sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size count)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs1fvNV" vertex-attribs-1fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size count)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribs1dvNV" vertex-attribs-1dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size count)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4ubvNV" vertex-attrib-4ubv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |ColorUB| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4ubNV" vertex-attrib-4ub-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |ColorUB| :direction :in) + (:name |y| :type |ColorUB| :direction :in) + (:name |z| :type |ColorUB| :direction :in) + (:name |w| :type |ColorUB| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4svNV" vertex-attrib-4sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4sNV" vertex-attrib-4s-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in) + (:name |w| :type |Int16| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4fvNV" vertex-attrib-4fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4fNV" vertex-attrib-4f-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4dvNV" vertex-attrib-4dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib4dNV" vertex-attrib-4d-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib3svNV" vertex-attrib-3sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x3)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib3sNV" vertex-attrib-3s-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib3fvNV" vertex-attrib-3fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib3fNV" vertex-attrib-3f-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib3dvNV" vertex-attrib-3dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x3)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib3dNV" vertex-attrib-3d-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib2svNV" vertex-attrib-2sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x2)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib2sNV" vertex-attrib-2s-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib2fvNV" vertex-attrib-2fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x2)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib2fNV" vertex-attrib-2f-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib2dvNV" vertex-attrib-2dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x2)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib2dNV" vertex-attrib-2d-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib1svNV" vertex-attrib-1sv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib1sNV" vertex-attrib-1s-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib1fvNV" vertex-attrib-1fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib1fNV" vertex-attrib-1f-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib1dvNV" vertex-attrib-1dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttrib1dNV" vertex-attrib-1d-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "VertexAttribPointerNV" vertex-attrib-pointer-nv :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |fsize| :type |Int32| :direction :in) + (:name |type| :type |VertexAttribEnumNV| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|fsize| |type| |stride|) :retained t)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "TrackMatrixNV" track-matrix-nv :return "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |address| :type |UInt32| :direction :in) + (:name |matrix| :type |VertexAttribEnumNV| :direction :in) + (:name |transform| :type |VertexAttribEnumNV| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "RequestResidentProgramsNV" request-resident-programs-nv :return + "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |programs| :type |UInt32| :direction :in :array t :size n)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ProgramParameters4fvNV" program-parameters-4fv-nv :return "void" + :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size count*4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ProgramParameters4dvNV" program-parameters-4dv-nv :return "void" + :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |count| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size count*4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ProgramParameter4fvNV" program-parameter-4fv-nv :return "void" + :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ProgramParameter4fNV" program-parameter-4f-nv :return "void" + :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ProgramParameter4dvNV" program-parameter-4dv-nv :return "void" + :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ProgramParameter4dNV" program-parameter-4d-nv :return "void" + :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "LoadProgramNV" load-program-nv :return "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |id| :type |UInt32| :direction :in) + (:name |len| :type |SizeI| :direction :in) + (:name |program| :type |UInt8| :direction :in :array t :size len)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "IsProgramNV" is-program-nv :return "Boolean" :args + ((:name |id| :type |UInt32| :direction :in)) :category "NV_vertex_program" + :version "1.2") +(defglextfun "GetVertexAttribPointervNV" get-vertex-attrib-pointerv-nv :return + "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetVertexAttribivNV" get-vertex-attrib-iv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetVertexAttribfvNV" get-vertex-attrib-fv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetVertexAttribdvNV" get-vertex-attrib-dv-nv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetTrackMatrixivNV" get-track-matrix-iv-nv :return "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |address| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetProgramStringNV" get-program-string-nv :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |program| :type |ProgramCharacterNV| :direction :out :array t :size + (|id| |pname|))) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetProgramivNV" get-program-iv-nv :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetProgramParameterfvNV" get-program-parameter-fv-nv :return + "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GetProgramParameterdvNV" get-program-parameter-dv-nv :return + "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnumNV| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "GenProgramsNV" gen-programs-nv :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |programs| :type |UInt32| :direction :out :array t :size n)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "ExecuteProgramNV" execute-program-nv :return "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |id| :type |UInt32| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size #x4)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "DeleteProgramsNV" delete-programs-nv :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |programs| :type |UInt32| :direction :in :array t :size n)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "BindProgramNV" bind-program-nv :return "void" :args + ((:name |target| :type |VertexAttribEnumNV| :direction :in) + (:name |id| :type |UInt32| :direction :in)) + :category "NV_vertex_program" :version "1.2") +(defglextfun "AreProgramsResidentNV" are-programs-resident-nv :return "Boolean" + :args + ((:name |n| :type |SizeI| :direction :in) + (:name |programs| :type |UInt32| :direction :in :array t :size n) + (:name |residences| :type |Boolean| :direction :out :array t :size n)) + :category "NV_vertex_program" :version "1.2") diff --git a/lib/opengl-nv_vertex_program4.lisp b/lib/opengl-nv_vertex_program4.lisp dissimilarity index 97% index 234e32f..14f4692 100644 --- a/lib/opengl-nv_vertex_program4.lisp +++ b/lib/opengl-nv_vertex_program4.lisp @@ -1,194 +1,126 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; nv_vertex_program4 - -(defconstant +vertex-attrib-array-integer-nv+ #x88FD) -(defglextfun - (("GetVertexAttribIuivEXT" get-vertex-attrib-i-uiv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnum| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program4") :dlflags ("notlistable") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("GetVertexAttribIivEXT" get-vertex-attrib-i-iv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribEnum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x1)) - :return ("void") :category ("NV_vertex_program4") :dlflags ("notlistable") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribIPointerEXT" vertex-attrib-ipointer-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexAttribEnum| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :category ("NV_vertex_program4") :dlflags ("notlistable") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4usvEXT" vertex-attrib-i-4usv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt16| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4ubvEXT" vertex-attrib-i-4ubv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt8| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4svEXT" vertex-attrib-i-4sv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4bvEXT" vertex-attrib-i-4bv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int8| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4uivEXT" vertex-attrib-i-4uiv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI3uivEXT" vertex-attrib-i-3uiv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI2uivEXT" vertex-attrib-i-2uiv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI1uivEXT" vertex-attrib-i-1uiv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4ivEXT" vertex-attrib-i-4iv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI3ivEXT" vertex-attrib-i-3iv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x3)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI2ivEXT" vertex-attrib-i-2iv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x2)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI1ivEXT" vertex-attrib-i-1iv-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x1)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4uiEXT" vertex-attrib-i-4ui-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt32| :direction :in) - (:name |y| :type |UInt32| :direction :in) - (:name |z| :type |UInt32| :direction :in) - (:name |w| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI4uivEXT") :glxvectorequiv - ("VertexAttribI4uivEXT") :extension ("soft" "WINSOFT" "NV10") :glfflags - ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI3uiEXT" vertex-attrib-i-3ui-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt32| :direction :in) - (:name |y| :type |UInt32| :direction :in) - (:name |z| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI3uivEXT") :glxvectorequiv - ("VertexAttribI3uivEXT") :extension ("soft" "WINSOFT" "NV10") :glfflags - ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI2uiEXT" vertex-attrib-i-2ui-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt32| :direction :in) - (:name |y| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI2uivEXT") :glxvectorequiv - ("VertexAttribI2uivEXT") :extension ("soft" "WINSOFT" "NV10") :glfflags - ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI1uiEXT" vertex-attrib-i-1ui-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI1uivEXT") :glxvectorequiv - ("VertexAttribI1uivEXT") :extension ("soft" "WINSOFT" "NV10") :glfflags - ("ignore") :glsflags ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI4iEXT" vertex-attrib-i-4i-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in) - (:name |z| :type |Int32| :direction :in) - (:name |w| :type |Int32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI4ivEXT") :glxvectorequiv ("VertexAttribI4ivEXT") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI3iEXT" vertex-attrib-i-3i-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in) - (:name |z| :type |Int32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI3ivEXT") :glxvectorequiv ("VertexAttribI3ivEXT") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI2iEXT" vertex-attrib-i-2i-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int32| :direction :in) - (:name |y| :type |Int32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI2ivEXT") :glxvectorequiv ("VertexAttribI2ivEXT") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) -(defglextfun - (("VertexAttribI1iEXT" vertex-attrib-i-1i-ext) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int32| :direction :in)) - :return ("void") :category ("NV_vertex_program4") :beginend ("allow-inside") - :vectorequiv ("VertexAttribI1ivEXT") :glxvectorequiv ("VertexAttribI1ivEXT") - :extension ("soft" "WINSOFT" "NV10") :glfflags ("ignore") :glsflags - ("ignore") :glxflags ("ignore"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; nv_vertex_program4 + +(defconstant +vertex-attrib-array-integer-nv+ #x88FD) +(defglextfun "GetVertexAttribIuivEXT" get-vertex-attrib-i-uiv-ext :return + "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnum| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size #x1)) + :category "NV_vertex_program4" :version nil) +(defglextfun "GetVertexAttribIivEXT" get-vertex-attrib-i-iv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribEnum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x1)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribIPointerEXT" vertex-attrib-ipointer-ext :return + "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexAttribEnum| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4usvEXT" vertex-attrib-i-4usv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt16| :direction :in :array t :size #x4)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4ubvEXT" vertex-attrib-i-4ubv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt8| :direction :in :array t :size #x4)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4svEXT" vertex-attrib-i-4sv-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x4)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4bvEXT" vertex-attrib-i-4bv-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int8| :direction :in :array t :size #x4)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4uivEXT" vertex-attrib-i-4uiv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x4)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI3uivEXT" vertex-attrib-i-3uiv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x3)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI2uivEXT" vertex-attrib-i-2uiv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x2)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI1uivEXT" vertex-attrib-i-1uiv-ext :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x1)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4ivEXT" vertex-attrib-i-4iv-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x4)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI3ivEXT" vertex-attrib-i-3iv-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x3)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI2ivEXT" vertex-attrib-i-2iv-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x2)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI1ivEXT" vertex-attrib-i-1iv-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x1)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4uiEXT" vertex-attrib-i-4ui-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt32| :direction :in) + (:name |y| :type |UInt32| :direction :in) + (:name |z| :type |UInt32| :direction :in) + (:name |w| :type |UInt32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI3uiEXT" vertex-attrib-i-3ui-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt32| :direction :in) + (:name |y| :type |UInt32| :direction :in) + (:name |z| :type |UInt32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI2uiEXT" vertex-attrib-i-2ui-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt32| :direction :in) + (:name |y| :type |UInt32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI1uiEXT" vertex-attrib-i-1ui-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI4iEXT" vertex-attrib-i-4i-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in) + (:name |z| :type |Int32| :direction :in) + (:name |w| :type |Int32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI3iEXT" vertex-attrib-i-3i-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in) + (:name |z| :type |Int32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI2iEXT" vertex-attrib-i-2i-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int32| :direction :in) + (:name |y| :type |Int32| :direction :in)) + :category "NV_vertex_program4" :version nil) +(defglextfun "VertexAttribI1iEXT" vertex-attrib-i-1i-ext :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int32| :direction :in)) + :category "NV_vertex_program4" :version nil) diff --git a/lib/opengl-pgi_misc_hints.lisp b/lib/opengl-pgi_misc_hints.lisp index 0cf1934..39e9197 100644 --- a/lib/opengl-pgi_misc_hints.lisp +++ b/lib/opengl-pgi_misc_hints.lisp @@ -24,9 +24,7 @@ (defconstant +clip-far-hint-pgi+ #x1A221) (defconstant +wide-line-hint-pgi+ #x1A222) (defconstant +back-normals-hint-pgi+ #x1A223) -(defglextfun - (("HintPGI" hint-pgi) :args - ((:name |target| :type |HintTargetPGI| :direction :in) - (:name |mode| :type |Int32| :direction :in)) - :return ("void") :category ("PGI_misc_hints") :version ("1.1") :offset - ("544") :glsopcode ("0x01D0"))) +(defglextfun "HintPGI" hint-pgi :return "void" :args + ((:name |target| :type |HintTargetPGI| :direction :in) + (:name |mode| :type |Int32| :direction :in)) + :category "PGI_misc_hints" :version "1.1") diff --git a/lib/opengl-sgi_color_table.lisp b/lib/opengl-sgi_color_table.lisp dissimilarity index 95% index d6f673b..bf91716 100644 --- a/lib/opengl-sgi_color_table.lisp +++ b/lib/opengl-sgi_color_table.lisp @@ -1,74 +1,55 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgi_color_table - -(defglextfun - (("GetColorTableParameterivSGI" get-color-table-parameteriv-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |pname| :type |GetColorTableParameterPNameSGI| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("SGI_color_table") :dlflags ("notlistable") - :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4100") :extension nil - :glsflags ("get") :glsopcode ("0x016D") :offset ("429"))) -(defglextfun - (("GetColorTableParameterfvSGI" get-color-table-parameterfv-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |pname| :type |GetColorTableParameterPNameSGI| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("SGI_color_table") :dlflags ("notlistable") - :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4099") :extension nil - :glsflags ("get") :glsopcode ("0x016C") :offset ("428"))) -(defglextfun - (("GetColorTableSGI" get-color-table-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |table| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("SGI_color_table") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode" "SGI") :version ("1.0") - :glxvendorpriv ("4098") :extension nil :glsflags ("get" "pixel-pack") - :glsopcode ("0x016B") :offset ("427"))) -(defglextfun - (("CopyColorTableSGI" copy-color-table-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("SGI_color_table") :version ("1.0") :glxropcode - ("2056") :glxflags ("SGI") :extension nil :alias ("CopyColorTable") :glsalias - ("CopyColorTable"))) -(defglextfun - (("ColorTableParameterivSGI" color-table-parameteriv-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |pname| :type |ColorTableParameterPNameSGI| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGI_color_table") :version ("1.0") :glxropcode - ("2055") :glxflags ("SGI") :extension nil :alias ("ColorTableParameteriv") - :glsalias ("ColorTableParameteriv"))) -(defglextfun - (("ColorTableParameterfvSGI" color-table-parameterfv-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |pname| :type |ColorTableParameterPNameSGI| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGI_color_table") :version ("1.0") :glxropcode - ("2054") :glxflags ("SGI") :extension nil :alias ("ColorTableParameterfv") - :glsalias ("ColorTableParameterfv"))) -(defglextfun - (("ColorTableSGI" color-table-sgi) :args - ((:name |target| :type |ColorTableTargetSGI| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |table| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("SGI_color_table") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode" "SGI") :version ("1.0") - :glxropcode ("2053") :extension nil :alias ("ColorTable") :glsalias - ("ColorTable"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgi_color_table + +(defglextfun "GetColorTableParameterivSGI" get-color-table-parameteriv-sgi + :return "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |pname| :type |GetColorTableParameterPNameSGI| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "SGI_color_table" :version "1.0") +(defglextfun "GetColorTableParameterfvSGI" get-color-table-parameterfv-sgi + :return "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |pname| :type |GetColorTableParameterPNameSGI| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "SGI_color_table" :version "1.0") +(defglextfun "GetColorTableSGI" get-color-table-sgi :return "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |table| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "SGI_color_table" :version "1.0") +(defglextfun "CopyColorTableSGI" copy-color-table-sgi :return "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "SGI_color_table" :version "1.0") +(defglextfun "ColorTableParameterivSGI" color-table-parameteriv-sgi :return + "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |pname| :type |ColorTableParameterPNameSGI| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGI_color_table" :version "1.0") +(defglextfun "ColorTableParameterfvSGI" color-table-parameterfv-sgi :return + "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |pname| :type |ColorTableParameterPNameSGI| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGI_color_table" :version "1.0") +(defglextfun "ColorTableSGI" color-table-sgi :return "void" :args + ((:name |target| :type |ColorTableTargetSGI| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |table| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "SGI_color_table" :version "1.0") diff --git a/lib/opengl-sgis_detail_texture.lisp b/lib/opengl-sgis_detail_texture.lisp dissimilarity index 82% index f5b8ec3..9758ae3 100644 --- a/lib/opengl-sgis_detail_texture.lisp +++ b/lib/opengl-sgis_detail_texture.lisp @@ -1,21 +1,16 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_detail_texture - -(defglextfun - (("GetDetailTexFuncSGIS" get-detail-tex-func-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |points| :type |Float32| :direction :out :array t :size (|target|))) - :return ("void") :category ("SGIS_detail_texture") :dlflags ("notlistable") - :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4096") :extension nil - :glsflags ("get") :glsopcode ("0x0164") :offset ("443"))) -(defglextfun - (("DetailTexFuncSGIS" detail-tex-func-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |points| :type |Float32| :direction :in :array t :size n*2)) - :return ("void") :category ("SGIS_detail_texture") :glxflags ("SGI") :version - ("1.0") :glxropcode ("2051") :extension nil :glsopcode ("0x0163") :offset - ("442"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_detail_texture + +(defglextfun "GetDetailTexFuncSGIS" get-detail-tex-func-sgis :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |points| :type |Float32| :direction :out :array t :size (|target|))) + :category "SGIS_detail_texture" :version "1.0") +(defglextfun "DetailTexFuncSGIS" detail-tex-func-sgis :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |points| :type |Float32| :direction :in :array t :size n*2)) + :category "SGIS_detail_texture" :version "1.0") diff --git a/lib/opengl-sgis_fog_function.lisp b/lib/opengl-sgis_fog_function.lisp dissimilarity index 78% index 34dfed4..27c0cfb 100644 --- a/lib/opengl-sgis_fog_function.lisp +++ b/lib/opengl-sgis_fog_function.lisp @@ -1,19 +1,13 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_fog_function - -(defglextfun - (("GetFogFuncSGIS" get-fog-func-sgis) :args - ((:name |points| :type |Float32| :direction :out :array t)) :return ("void") - :category ("SGIS_fog_function") :version ("1.1") :dlflags ("notlistable") - :glxflags ("ignore") :extension nil :glsflags ("get") :glsopcode ("0x0191") - :offset nil)) -(defglextfun - (("FogFuncSGIS" fog-func-sgis) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |points| :type |Float32| :direction :in :array t :size n*2)) - :return ("void") :category ("SGIS_fog_function") :version ("1.1") :glxflags - ("SGI") :glxropcode ("2067") :extension nil :glsopcode ("0x0179") :offset - nil)) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_fog_function + +(defglextfun "GetFogFuncSGIS" get-fog-func-sgis :return "void" :args + ((:name |points| :type |Float32| :direction :out :array t)) :category + "SGIS_fog_function" :version "1.1") +(defglextfun "FogFuncSGIS" fog-func-sgis :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |points| :type |Float32| :direction :in :array t :size n*2)) + :category "SGIS_fog_function" :version "1.1") diff --git a/lib/opengl-sgis_multisample.lisp b/lib/opengl-sgis_multisample.lisp dissimilarity index 79% index 9af7514..5de3500 100644 --- a/lib/opengl-sgis_multisample.lisp +++ b/lib/opengl-sgis_multisample.lisp @@ -1,19 +1,13 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_multisample - -(defglextfun - (("SamplePatternSGIS" sample-pattern-sgis) :args - ((:name |pattern| :type |SamplePatternSGIS| :direction :in)) :return ("void") - :category ("SGIS_multisample") :version ("1.0") :glxropcode ("2049") - :glxflags ("SGI") :extension nil :alias ("SamplePatternEXT") :glsalias - ("SamplePatternEXT"))) -(defglextfun - (("SampleMaskSGIS" sample-mask-sgis) :args - ((:name |value| :type |ClampedFloat32| :direction :in) - (:name |invert| :type |Boolean| :direction :in)) - :return ("void") :category ("SGIS_multisample") :version ("1.1") :glxropcode - ("2048") :glxflags ("SGI") :extension nil :alias ("SampleMaskEXT") :glsalias - ("SampleMaskEXT"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_multisample + +(defglextfun "SamplePatternSGIS" sample-pattern-sgis :return "void" :args + ((:name |pattern| :type |SamplePatternSGIS| :direction :in)) :category + "SGIS_multisample" :version "1.0") +(defglextfun "SampleMaskSGIS" sample-mask-sgis :return "void" :args + ((:name |value| :type |ClampedFloat32| :direction :in) + (:name |invert| :type |Boolean| :direction :in)) + :category "SGIS_multisample" :version "1.1") diff --git a/lib/opengl-sgis_pixel_texture.lisp b/lib/opengl-sgis_pixel_texture.lisp dissimilarity index 89% index 567c652..e2ea2f4 100644 --- a/lib/opengl-sgis_pixel_texture.lisp +++ b/lib/opengl-sgis_pixel_texture.lisp @@ -1,54 +1,42 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_pixel_texture - -(defconstant +pixel-group-color-sgis+ #x8356) -(defconstant +pixel-group-color-sgis+ #x8356) -(defglextfun - (("GetPixelTexGenParameterfvSGIS" get-pixel-tex-gen-parameter-fv-sgis) :args - ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :out :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("SGIS_pixel_texture") - :version ("1.0") :extension nil :glxvendorpriv ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0197") :offset ("436"))) -(defglextfun - (("GetPixelTexGenParameterivSGIS" get-pixel-tex-gen-parameter-iv-sgis) :args - ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) - (:name |params| :type |CheckedInt32| :direction :out :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("SGIS_pixel_texture") - :version ("1.0") :extension nil :glxvendorpriv ("?") :glxflags ("ignore") - :glsflags ("get") :glsopcode ("0x0196") :offset ("435"))) -(defglextfun - (("PixelTexGenParameterfvSGIS" pixel-tex-gen-parameter-fv-sgis) :args - ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIS_pixel_texture") :version ("1.0") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("gl-enum") :glsopcode - ("0x0195") :offset ("434"))) -(defglextfun - (("PixelTexGenParameterfSGIS" pixel-tex-gen-parameter-f-sgis) :args - ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("SGIS_pixel_texture") :version ("1.0") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("gl-enum") :glsopcode - ("0x0194") :offset ("433"))) -(defglextfun - (("PixelTexGenParameterivSGIS" pixel-tex-gen-parameter-iv-sgis) :args - ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIS_pixel_texture") :version ("1.0") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("gl-enum") :glsopcode - ("0x0193") :offset ("432"))) -(defglextfun - (("PixelTexGenParameteriSGIS" pixel-tex-gen-parameter-i-sgis) :args - ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("SGIS_pixel_texture") :version ("1.0") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsflags ("gl-enum") :glsopcode - ("0x0192") :offset ("431"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_pixel_texture + +(defconstant +pixel-group-color-sgis+ #x8356) +(defconstant +pixel-group-color-sgis+ #x8356) +(defglextfun "GetPixelTexGenParameterfvSGIS" + get-pixel-tex-gen-parameter-fv-sgis :return "void" :args + ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :out :array t :size + (|pname|))) + :category "SGIS_pixel_texture" :version "1.0") +(defglextfun "GetPixelTexGenParameterivSGIS" + get-pixel-tex-gen-parameter-iv-sgis :return "void" :args + ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) + (:name |params| :type |CheckedInt32| :direction :out :array t :size + (|pname|))) + :category "SGIS_pixel_texture" :version "1.0") +(defglextfun "PixelTexGenParameterfvSGIS" pixel-tex-gen-parameter-fv-sgis + :return "void" :args + ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIS_pixel_texture" :version "1.0") +(defglextfun "PixelTexGenParameterfSGIS" pixel-tex-gen-parameter-f-sgis :return + "void" :args + ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIS_pixel_texture" :version "1.0") +(defglextfun "PixelTexGenParameterivSGIS" pixel-tex-gen-parameter-iv-sgis + :return "void" :args + ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGIS_pixel_texture" :version "1.0") +(defglextfun "PixelTexGenParameteriSGIS" pixel-tex-gen-parameter-i-sgis :return + "void" :args + ((:name |pname| :type |PixelTexGenParameterNameSGIS| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIS_pixel_texture" :version "1.0") diff --git a/lib/opengl-sgis_point_parameters.lisp b/lib/opengl-sgis_point_parameters.lisp index f143c8c..13a2118 100644 --- a/lib/opengl-sgis_point_parameters.lisp +++ b/lib/opengl-sgis_point_parameters.lisp @@ -16,18 +16,13 @@ (defconstant +point-distance-attenuation+ #x8129) (defconstant +point-distance-attenuation-arb+ #x8129) (defconstant +distance-attenuation-ext+ #x8129) -(defglextfun - (("PointParameterfvSGIS" point-parameter-fv-sgis) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIS_point_parameters") :version ("1.0") - :glxflags ("SGI") :extension nil :alias ("PointParameterfvARB") :glsalias - ("PointParameterfvARB"))) -(defglextfun - (("PointParameterfSGIS" point-parameter-f-sgis) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("SGIS_point_parameters") :version ("1.0") - :glxflags ("SGI") :extension nil :alias ("PointParameterfARB") :glsalias - ("PointParameterfARB"))) +(defglextfun "PointParameterfvSGIS" point-parameter-fv-sgis :return "void" + :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIS_point_parameters" :version "1.0") +(defglextfun "PointParameterfSGIS" point-parameter-f-sgis :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIS_point_parameters" :version "1.0") diff --git a/lib/opengl-sgis_sharpen_texture.lisp b/lib/opengl-sgis_sharpen_texture.lisp dissimilarity index 82% index 601a4a2..a94a364 100644 --- a/lib/opengl-sgis_sharpen_texture.lisp +++ b/lib/opengl-sgis_sharpen_texture.lisp @@ -1,21 +1,16 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_sharpen_texture - -(defglextfun - (("GetSharpenTexFuncSGIS" get-sharpen-tex-func-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |points| :type |Float32| :direction :out :array t :size (|target|))) - :return ("void") :category ("SGIS_sharpen_texture") :dlflags ("notlistable") - :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4097") :extension nil - :glsflags ("get") :glsopcode ("0x0166") :offset ("445"))) -(defglextfun - (("SharpenTexFuncSGIS" sharpen-tex-func-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |points| :type |Float32| :direction :in :array t :size n*2)) - :return ("void") :category ("SGIS_sharpen_texture") :glxflags ("SGI") - :version ("1.0") :glxropcode ("2052") :extension nil :glsopcode ("0x0165") - :offset ("444"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_sharpen_texture + +(defglextfun "GetSharpenTexFuncSGIS" get-sharpen-tex-func-sgis :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |points| :type |Float32| :direction :out :array t :size (|target|))) + :category "SGIS_sharpen_texture" :version "1.0") +(defglextfun "SharpenTexFuncSGIS" sharpen-tex-func-sgis :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |points| :type |Float32| :direction :in :array t :size n*2)) + :category "SGIS_sharpen_texture" :version "1.0") diff --git a/lib/opengl-sgis_texture4d.lisp b/lib/opengl-sgis_texture4d.lisp dissimilarity index 92% index 648dde6..e252ac4 100644 --- a/lib/opengl-sgis_texture4d.lisp +++ b/lib/opengl-sgis_texture4d.lisp @@ -1,44 +1,36 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_texture4d - -(defglextfun - (("TexSubImage4DSGIS" tex-sub-image-4d-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |woffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |size4d| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height| |depth| |size4d|))) - :return ("void") :category ("SGIS_texture4D") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "SGI") :version ("1.0") :glxropcode - ("2058") :extension nil :glsflags ("pixel-unpack") :glsopcode ("0x016F") - :offset ("438"))) -(defglextfun - (("TexImage4DSGIS" tex-image-4d-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |size4d| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height| |depth| |size4d|))) - :return ("void") :category ("SGIS_texture4D") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "SGI") :version ("1.0") :glxropcode - ("2057") :extension nil :glsflags ("pixel-null" "pixel-unpack") :glsopcode - ("0x016E") :offset ("437"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_texture4d + +(defglextfun "TexSubImage4DSGIS" tex-sub-image-4d-sgis :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |woffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |size4d| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height| |depth| |size4d|))) + :category "SGIS_texture4D" :version "1.0") +(defglextfun "TexImage4DSGIS" tex-image-4d-sgis :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |size4d| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height| |depth| |size4d|))) + :category "SGIS_texture4D" :version "1.0") diff --git a/lib/opengl-sgis_texture_color_mask.lisp b/lib/opengl-sgis_texture_color_mask.lisp index c55fdd2..d1bc921 100644 --- a/lib/opengl-sgis_texture_color_mask.lisp +++ b/lib/opengl-sgis_texture_color_mask.lisp @@ -6,11 +6,10 @@ (defconstant +texture-color-writemask-sgis+ #x81EF) (defconstant +texture-color-writemask-sgis+ #x81EF) -(defglextfun - (("TextureColorMaskSGIS" texture-color-mask-sgis) :args - ((:name |red| :type |Boolean| :direction :in) - (:name |green| :type |Boolean| :direction :in) - (:name |blue| :type |Boolean| :direction :in) - (:name |alpha| :type |Boolean| :direction :in)) - :return ("void") :category ("SGIS_texture_color_mask") :version ("1.1") - :glxropcode ("2082") :extension nil :glsopcode ("0x01B0") :offset ("?"))) +(defglextfun "TextureColorMaskSGIS" texture-color-mask-sgis :return "void" + :args + ((:name |red| :type |Boolean| :direction :in) + (:name |green| :type |Boolean| :direction :in) + (:name |blue| :type |Boolean| :direction :in) + (:name |alpha| :type |Boolean| :direction :in)) + :category "SGIS_texture_color_mask" :version "1.1") diff --git a/lib/opengl-sgis_texture_filter4.lisp b/lib/opengl-sgis_texture_filter4.lisp dissimilarity index 84% index ffc405f..9c6ef88 100644 --- a/lib/opengl-sgis_texture_filter4.lisp +++ b/lib/opengl-sgis_texture_filter4.lisp @@ -1,24 +1,19 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgis_texture_filter4 - -(defglextfun - (("TexFilterFuncSGIS" tex-filter-func-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |filter| :type |TextureFilterSGIS| :direction :in) - (:name |n| :type |SizeI| :direction :in) - (:name |weights| :type |Float32| :direction :in :array t :size n)) - :return ("void") :category ("SGIS_texture_filter4") :glxflags ("SGI") - :version ("1.0") :glxropcode ("2064") :extension nil :glsopcode ("0x0176") - :offset ("416"))) -(defglextfun - (("GetTexFilterFuncSGIS" get-tex-filter-func-sgis) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |filter| :type |TextureFilterSGIS| :direction :in) - (:name |weights| :type |Float32| :direction :out :array t :size - (|target| |filter|))) - :return ("void") :category ("SGIS_texture_filter4") :dlflags ("notlistable") - :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4101") :extension nil - :glsflags ("get") :glsopcode ("0x0175") :offset ("415"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgis_texture_filter4 + +(defglextfun "TexFilterFuncSGIS" tex-filter-func-sgis :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |filter| :type |TextureFilterSGIS| :direction :in) + (:name |n| :type |SizeI| :direction :in) + (:name |weights| :type |Float32| :direction :in :array t :size n)) + :category "SGIS_texture_filter4" :version "1.0") +(defglextfun "GetTexFilterFuncSGIS" get-tex-filter-func-sgis :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |filter| :type |TextureFilterSGIS| :direction :in) + (:name |weights| :type |Float32| :direction :out :array t :size + (|target| |filter|))) + :category "SGIS_texture_filter4" :version "1.0") diff --git a/lib/opengl-sgix_async.lisp b/lib/opengl-sgix_async.lisp dissimilarity index 91% index 5949b76..5bd2646 100644 --- a/lib/opengl-sgix_async.lisp +++ b/lib/opengl-sgix_async.lisp @@ -1,38 +1,26 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_async - -(defglextfun - (("IsAsyncMarkerSGIX" is-async-marker-sgix) :args - ((:name |marker| :type |UInt32| :direction :in)) :return ("Boolean") - :category ("SGIX_async") :version ("1.0") :dlflags ("notlistable") :glxflags - ("ignore") :extension nil :glsopcode ("0x019D") :offset ("?"))) -(defglextfun - (("DeleteAsyncMarkersSGIX" delete-async-markers-sgix) :args - ((:name |marker| :type |UInt32| :direction :in) - (:name |range| :type |SizeI| :direction :in)) - :return ("void") :category ("SGIX_async") :version ("1.0") :dlflags - ("notlistable") :glxflags ("ignore") :extension nil :glsopcode ("0x019C") - :offset ("?"))) -(defglextfun - (("GenAsyncMarkersSGIX" gen-async-markers-sgix) :args - ((:name |range| :type |SizeI| :direction :in)) :return ("UInt32") :category - ("SGIX_async") :version ("1.0") :dlflags ("notlistable") :glxflags ("ignore") - :extension nil :glsopcode ("0x019B") :offset ("?"))) -(defglextfun - (("PollAsyncSGIX" poll-async-sgix) :args - ((:name |markerp| :type |UInt32| :direction :out :array t :size #x1)) :return - ("Int32") :category ("SGIX_async") :version ("1.0") :dlflags ("notlistable") - :glxflags ("ignore") :extension nil :glsopcode ("0x019A") :offset ("?"))) -(defglextfun - (("FinishAsyncSGIX" finish-async-sgix) :args - ((:name |markerp| :type |UInt32| :direction :out :array t :size #x1)) :return - ("Int32") :category ("SGIX_async") :version ("1.0") :dlflags ("notlistable") - :glxflags ("ignore") :extension nil :glsopcode ("0x0199") :offset ("?"))) -(defglextfun - (("AsyncMarkerSGIX" async-marker-sgix) :args - ((:name |marker| :type |UInt32| :direction :in)) :return ("void") :category - ("SGIX_async") :version ("1.0") :glxflags ("ignore") :extension nil - :glsopcode ("0x0198") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_async + +(defglextfun "IsAsyncMarkerSGIX" is-async-marker-sgix :return "Boolean" :args + ((:name |marker| :type |UInt32| :direction :in)) :category "SGIX_async" + :version "1.0") +(defglextfun "DeleteAsyncMarkersSGIX" delete-async-markers-sgix :return "void" + :args + ((:name |marker| :type |UInt32| :direction :in) + (:name |range| :type |SizeI| :direction :in)) + :category "SGIX_async" :version "1.0") +(defglextfun "GenAsyncMarkersSGIX" gen-async-markers-sgix :return "UInt32" + :args ((:name |range| :type |SizeI| :direction :in)) :category "SGIX_async" + :version "1.0") +(defglextfun "PollAsyncSGIX" poll-async-sgix :return "Int32" :args + ((:name |markerp| :type |UInt32| :direction :out :array t :size #x1)) + :category "SGIX_async" :version "1.0") +(defglextfun "FinishAsyncSGIX" finish-async-sgix :return "Int32" :args + ((:name |markerp| :type |UInt32| :direction :out :array t :size #x1)) + :category "SGIX_async" :version "1.0") +(defglextfun "AsyncMarkerSGIX" async-marker-sgix :return "void" :args + ((:name |marker| :type |UInt32| :direction :in)) :category "SGIX_async" + :version "1.0") diff --git a/lib/opengl-sgix_flush_raster.lisp b/lib/opengl-sgix_flush_raster.lisp index f218248..ee5638d 100644 --- a/lib/opengl-sgix_flush_raster.lisp +++ b/lib/opengl-sgix_flush_raster.lisp @@ -4,8 +4,5 @@ ;;;; sgix_flush_raster -(defglextfun - (("FlushRasterSGIX" flush-raster-sgix) :args nil :return ("void") :category - ("SGIX_flush_raster") :version ("1.0") :dlflags ("notlistable") :glxflags - ("SGI") :glxvendorpriv ("4105") :extension nil :glsopcode ("0x0180") :offset - ("469"))) +(defglextfun "FlushRasterSGIX" flush-raster-sgix :return "void" :args nil + :category "SGIX_flush_raster" :version "1.0") diff --git a/lib/opengl-sgix_fragment_lighting.lisp b/lib/opengl-sgix_fragment_lighting.lisp dissimilarity index 96% index e4a8d14..f3058b7 100644 --- a/lib/opengl-sgix_fragment_lighting.lisp +++ b/lib/opengl-sgix_fragment_lighting.lisp @@ -1,143 +1,111 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_fragment_lighting - -(defconstant +current-raster-normal-sgix+ #x8406) -(defconstant +current-raster-normal-sgix+ #x8406) -(defglextfun - (("LightEnviSGIX" light-env-i-sgix) :args - ((:name |pname| :type |LightEnvParameterSGIX| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsflags ("gl-enum") :glsopcode ("0x01AF") - :offset ("493"))) -(defglextfun - (("GetFragmentMaterialivSGIX" get-fragment-material-iv-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :dlflags - ("notlistable") :glxflags ("ignore") :version ("1.0") :extension nil - :glsflags ("get") :glsopcode ("0x01AE") :offset ("492"))) -(defglextfun - (("GetFragmentMaterialfvSGIX" get-fragment-material-fv-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :dlflags - ("notlistable") :glxflags ("ignore") :version ("1.0") :extension nil - :glsflags ("get") :glsopcode ("0x01AD") :offset ("491"))) -(defglextfun - (("GetFragmentLightivSGIX" get-fragment-light-iv-sgix) :args - ((:name |light| :type |FragmentLightNameSGIX| :direction :in) - (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :dlflags - ("notlistable") :glxflags ("ignore") :version ("1.0") :extension nil - :glsflags ("get") :glsopcode ("0x01AC") :offset ("490"))) -(defglextfun - (("GetFragmentLightfvSGIX" get-fragment-light-fv-sgix) :args - ((:name |light| :type |FragmentLightNameSGIX| :direction :in) - (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :dlflags - ("notlistable") :glxflags ("ignore") :version ("1.0") :extension nil - :glsflags ("get") :glsopcode ("0x01AB") :offset ("489"))) -(defglextfun - (("FragmentMaterialivSGIX" fragment-material-iv-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01AA") :offset ("488"))) -(defglextfun - (("FragmentMaterialiSGIX" fragment-material-i-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01A9") :offset ("487"))) -(defglextfun - (("FragmentMaterialfvSGIX" fragment-material-fv-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01A8") :offset ("486"))) -(defglextfun - (("FragmentMaterialfSGIX" fragment-material-f-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01A7") :offset ("485"))) -(defglextfun - (("FragmentLightModelivSGIX" fragment-light-model-iv-sgix) :args - ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsflags ("gl-enum") :glsopcode ("0x01A6") - :offset ("484"))) -(defglextfun - (("FragmentLightModeliSGIX" fragment-light-model-i-sgix) :args - ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsflags ("gl-enum") :glsopcode ("0x01A5") - :offset ("483"))) -(defglextfun - (("FragmentLightModelfvSGIX" fragment-light-model-fv-sgix) :args - ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsflags ("gl-enum") :glsopcode ("0x01A4") - :offset ("482"))) -(defglextfun - (("FragmentLightModelfSGIX" fragment-light-model-f-sgix) :args - ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsflags ("gl-enum") :glsopcode ("0x01A3") - :offset ("481"))) -(defglextfun - (("FragmentLightivSGIX" fragment-light-iv-sgix) :args - ((:name |light| :type |FragmentLightNameSGIX| :direction :in) - (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01A2") :offset ("480"))) -(defglextfun - (("FragmentLightiSGIX" fragment-light-i-sgix) :args - ((:name |light| :type |FragmentLightNameSGIX| :direction :in) - (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01A1") :offset ("479"))) -(defglextfun - (("FragmentLightfvSGIX" fragment-light-fv-sgix) :args - ((:name |light| :type |FragmentLightNameSGIX| :direction :in) - (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x01A0") :offset ("478"))) -(defglextfun - (("FragmentLightfSGIX" fragment-light-f-sgix) :args - ((:name |light| :type |FragmentLightNameSGIX| :direction :in) - (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x019F") :offset ("477"))) -(defglextfun - (("FragmentColorMaterialSGIX" fragment-color-material-sgix) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |mode| :type |MaterialParameter| :direction :in)) - :return ("void") :category ("SGIX_fragment_lighting") :glxflags ("ignore") - :version ("1.0") :extension nil :glsopcode ("0x019E") :offset ("476"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_fragment_lighting + +(defconstant +current-raster-normal-sgix+ #x8406) +(defconstant +current-raster-normal-sgix+ #x8406) +(defglextfun "LightEnviSGIX" light-env-i-sgix :return "void" :args + ((:name |pname| :type |LightEnvParameterSGIX| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "GetFragmentMaterialivSGIX" get-fragment-material-iv-sgix :return + "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "GetFragmentMaterialfvSGIX" get-fragment-material-fv-sgix :return + "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "GetFragmentLightivSGIX" get-fragment-light-iv-sgix :return "void" + :args + ((:name |light| :type |FragmentLightNameSGIX| :direction :in) + (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "GetFragmentLightfvSGIX" get-fragment-light-fv-sgix :return "void" + :args + ((:name |light| :type |FragmentLightNameSGIX| :direction :in) + (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentMaterialivSGIX" fragment-material-iv-sgix :return "void" + :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentMaterialiSGIX" fragment-material-i-sgix :return "void" + :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentMaterialfvSGIX" fragment-material-fv-sgix :return "void" + :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentMaterialfSGIX" fragment-material-f-sgix :return "void" + :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightModelivSGIX" fragment-light-model-iv-sgix :return + "void" :args + ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightModeliSGIX" fragment-light-model-i-sgix :return + "void" :args + ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightModelfvSGIX" fragment-light-model-fv-sgix :return + "void" :args + ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightModelfSGIX" fragment-light-model-f-sgix :return + "void" :args + ((:name |pname| :type |FragmentLightModelParameterSGIX| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightivSGIX" fragment-light-iv-sgix :return "void" :args + ((:name |light| :type |FragmentLightNameSGIX| :direction :in) + (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightiSGIX" fragment-light-i-sgix :return "void" :args + ((:name |light| :type |FragmentLightNameSGIX| :direction :in) + (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightfvSGIX" fragment-light-fv-sgix :return "void" :args + ((:name |light| :type |FragmentLightNameSGIX| :direction :in) + (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentLightfSGIX" fragment-light-f-sgix :return "void" :args + ((:name |light| :type |FragmentLightNameSGIX| :direction :in) + (:name |pname| :type |FragmentLightParameterSGIX| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") +(defglextfun "FragmentColorMaterialSGIX" fragment-color-material-sgix :return + "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |mode| :type |MaterialParameter| :direction :in)) + :category "SGIX_fragment_lighting" :version "1.0") diff --git a/lib/opengl-sgix_framezoom.lisp b/lib/opengl-sgix_framezoom.lisp dissimilarity index 61% index 983ac82..55c3e4a 100644 --- a/lib/opengl-sgix_framezoom.lisp +++ b/lib/opengl-sgix_framezoom.lisp @@ -1,11 +1,9 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_framezoom - -(defglextfun - (("FrameZoomSGIX" frame-zoom-sgix) :args - ((:name |factor| :type |CheckedInt32| :direction :in)) :return ("void") - :category ("SGIX_framezoom") :version ("1.0") :glxflags ("SGI") :glxropcode - ("2072") :extension nil :glsopcode ("0x0182") :offset ("466"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_framezoom + +(defglextfun "FrameZoomSGIX" frame-zoom-sgix :return "void" :args + ((:name |factor| :type |CheckedInt32| :direction :in)) :category + "SGIX_framezoom" :version "1.0") diff --git a/lib/opengl-sgix_igloo_interface.lisp b/lib/opengl-sgix_igloo_interface.lisp dissimilarity index 70% index d5b985f..0fe6f5a 100644 --- a/lib/opengl-sgix_igloo_interface.lisp +++ b/lib/opengl-sgix_igloo_interface.lisp @@ -1,14 +1,11 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_igloo_interface - -(defglextfun - (("IglooInterfaceSGIX" igloo-interface-sgix) :args - ((:name |pname| :type |IglooFunctionSelectSGIX| :direction :in) - (:name |params| :type |IglooParameterSGIX| :direction :in :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :category ("SGIX_igloo_interface") - :version ("1.0") :glxflags ("SGI" "ignore") :extension nil :glxropcode - ("200") :glsopcode ("0x0183") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_igloo_interface + +(defglextfun "IglooInterfaceSGIX" igloo-interface-sgix :return "void" :args + ((:name |pname| :type |IglooFunctionSelectSGIX| :direction :in) + (:name |params| :type |IglooParameterSGIX| :direction :in :array t :size + (|pname|))) + :category "SGIX_igloo_interface" :version "1.0") diff --git a/lib/opengl-sgix_instruments.lisp b/lib/opengl-sgix_instruments.lisp dissimilarity index 91% index c98c01e..234a3f3 100644 --- a/lib/opengl-sgix_instruments.lisp +++ b/lib/opengl-sgix_instruments.lisp @@ -1,39 +1,25 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_instruments - -(defglextfun - (("StopInstrumentsSGIX" stop-instruments-sgix) :args - ((:name |marker| :type |Int32| :direction :in)) :return ("void") :category - ("SGIX_instruments") :version ("1.0") :glxflags ("SGI") :glxropcode ("2070") - :extension nil :glsopcode ("0x017F") :offset ("465"))) -(defglextfun - (("StartInstrumentsSGIX" start-instruments-sgix) :args nil :return ("void") - :category ("SGIX_instruments") :version ("1.0") :glxflags ("SGI") :glxropcode - ("2069") :extension nil :glsopcode ("0x017E") :offset ("464"))) -(defglextfun - (("ReadInstrumentsSGIX" read-instruments-sgix) :args - ((:name |marker| :type |Int32| :direction :in)) :return ("void") :category - ("SGIX_instruments") :version ("1.0") :glxflags ("SGI") :glxropcode ("2077") - :extension nil :glsopcode ("0x017D") :offset ("463"))) -(defglextfun - (("PollInstrumentsSGIX" poll-instruments-sgix) :args - ((:name |marker_p| :type |Int32| :direction :out :array t :size #x1)) :return - ("Int32") :dlflags ("notlistable") :category ("SGIX_instruments") :version - ("1.0") :glxflags ("SGI") :glxvendorpriv ("4104") :extension nil :glsflags - ("get") :glsopcode ("0x017C") :offset ("462"))) -(defglextfun - (("InstrumentsBufferSGIX" instruments-buffer-sgix) :args - ((:name |size| :type |SizeI| :direction :in) - (:name |buffer| :type |Int32| :direction :out :array t :size size :retained - t)) - :return ("void") :dlflags ("notlistable") :category ("SGIX_instruments") - :version ("1.0") :glxflags ("SGI") :glxvendorpriv ("4103") :extension nil - :glsflags ("client") :glsopcode ("0x017B") :offset ("461"))) -(defglextfun - (("GetInstrumentsSGIX" get-instruments-sgix) :args nil :return ("Int32") - :dlflags ("notlistable") :category ("SGIX_instruments") :version ("1.0") - :glxflags ("SGI") :glxvendorpriv ("4102") :extension nil :glsflags ("get") - :glsopcode ("0x017A") :offset ("460"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_instruments + +(defglextfun "StopInstrumentsSGIX" stop-instruments-sgix :return "void" :args + ((:name |marker| :type |Int32| :direction :in)) :category "SGIX_instruments" + :version "1.0") +(defglextfun "StartInstrumentsSGIX" start-instruments-sgix :return "void" :args + nil :category "SGIX_instruments" :version "1.0") +(defglextfun "ReadInstrumentsSGIX" read-instruments-sgix :return "void" :args + ((:name |marker| :type |Int32| :direction :in)) :category "SGIX_instruments" + :version "1.0") +(defglextfun "PollInstrumentsSGIX" poll-instruments-sgix :return "Int32" :args + ((:name |marker_p| :type |Int32| :direction :out :array t :size #x1)) + :category "SGIX_instruments" :version "1.0") +(defglextfun "InstrumentsBufferSGIX" instruments-buffer-sgix :return "void" + :args + ((:name |size| :type |SizeI| :direction :in) + (:name |buffer| :type |Int32| :direction :out :array t :size size :retained + t)) + :category "SGIX_instruments" :version "1.0") +(defglextfun "GetInstrumentsSGIX" get-instruments-sgix :return "Int32" :args + nil :category "SGIX_instruments" :version "1.0") diff --git a/lib/opengl-sgix_list_priority.lisp b/lib/opengl-sgix_list_priority.lisp dissimilarity index 93% index 0302740..af0e93f 100644 --- a/lib/opengl-sgix_list_priority.lisp +++ b/lib/opengl-sgix_list_priority.lisp @@ -1,58 +1,42 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_list_priority - -(defglextfun - (("ListParameterivSGIX" list-parameter-iv-sgix) :args - ((:name |list| :type |List| :direction :in) - (:name |pname| :type |ListParameterName| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :glxflags ("ignore") :category - ("SGIX_list_priority") :version ("1.0") :glxropcode ("2081") :extension nil - :glsopcode ("0x018D") :offset ("475"))) -(defglextfun - (("ListParameteriSGIX" list-parameter-i-sgix) :args - ((:name |list| :type |List| :direction :in) - (:name |pname| :type |ListParameterName| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :dlflags ("notlistable") :glxflags ("ignore") :category - ("SGIX_list_priority") :version ("1.0") :glxropcode ("2080") :extension nil - :glsopcode ("0x018C") :offset ("474"))) -(defglextfun - (("ListParameterfvSGIX" list-parameter-fv-sgix) :args - ((:name |list| :type |List| :direction :in) - (:name |pname| :type |ListParameterName| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :glxflags ("ignore") :category - ("SGIX_list_priority") :version ("1.0") :glxropcode ("2079") :extension nil - :glsopcode ("0x018B") :offset ("473"))) -(defglextfun - (("ListParameterfSGIX" list-parameter-f-sgix) :args - ((:name |list| :type |List| :direction :in) - (:name |pname| :type |ListParameterName| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :dlflags ("notlistable") :glxflags ("ignore") :category - ("SGIX_list_priority") :version ("1.0") :glxropcode ("2078") :extension nil - :glsopcode ("0x018A") :offset ("472"))) -(defglextfun - (("GetListParameterivSGIX" get-list-parameter-iv-sgix) :args - ((:name |list| :type |List| :direction :in) - (:name |pname| :type |ListParameterName| :direction :in) - (:name |params| :type |CheckedInt32| :direction :out :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :glxflags ("ignore") :category - ("SGIX_list_priority") :version ("1.0") :glxvendorpriv ("?") :extension nil - :glsopcode ("0x0189") :offset ("471"))) -(defglextfun - (("GetListParameterfvSGIX" get-list-parameter-fv-sgix) :args - ((:name |list| :type |List| :direction :in) - (:name |pname| :type |ListParameterName| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :out :array t :size - (|pname|))) - :return ("void") :dlflags ("notlistable") :glxflags ("ignore") :category - ("SGIX_list_priority") :version ("1.0") :glxvendorpriv ("?") :extension nil - :glsopcode ("0x0188") :offset ("470"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_list_priority + +(defglextfun "ListParameterivSGIX" list-parameter-iv-sgix :return "void" :args + ((:name |list| :type |List| :direction :in) + (:name |pname| :type |ListParameterName| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGIX_list_priority" :version "1.0") +(defglextfun "ListParameteriSGIX" list-parameter-i-sgix :return "void" :args + ((:name |list| :type |List| :direction :in) + (:name |pname| :type |ListParameterName| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIX_list_priority" :version "1.0") +(defglextfun "ListParameterfvSGIX" list-parameter-fv-sgix :return "void" :args + ((:name |list| :type |List| :direction :in) + (:name |pname| :type |ListParameterName| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIX_list_priority" :version "1.0") +(defglextfun "ListParameterfSGIX" list-parameter-f-sgix :return "void" :args + ((:name |list| :type |List| :direction :in) + (:name |pname| :type |ListParameterName| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIX_list_priority" :version "1.0") +(defglextfun "GetListParameterivSGIX" get-list-parameter-iv-sgix :return "void" + :args + ((:name |list| :type |List| :direction :in) + (:name |pname| :type |ListParameterName| :direction :in) + (:name |params| :type |CheckedInt32| :direction :out :array t :size + (|pname|))) + :category "SGIX_list_priority" :version "1.0") +(defglextfun "GetListParameterfvSGIX" get-list-parameter-fv-sgix :return "void" + :args + ((:name |list| :type |List| :direction :in) + (:name |pname| :type |ListParameterName| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :out :array t :size + (|pname|))) + :category "SGIX_list_priority" :version "1.0") diff --git a/lib/opengl-sgix_pixel_texture.lisp b/lib/opengl-sgix_pixel_texture.lisp dissimilarity index 62% index aa577cd..9e2b0c0 100644 --- a/lib/opengl-sgix_pixel_texture.lisp +++ b/lib/opengl-sgix_pixel_texture.lisp @@ -1,11 +1,9 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_pixel_texture - -(defglextfun - (("PixelTexGenSGIX" pixel-tex-gen-sgix) :args - ((:name |mode| :type |PixelTexGenModeSGIX| :direction :in)) :return ("void") - :category ("SGIX_pixel_texture") :version ("1.0") :glxflags ("SGI") - :glxropcode ("2059") :extension nil :glsopcode ("0x0170") :offset ("430"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_pixel_texture + +(defglextfun "PixelTexGenSGIX" pixel-tex-gen-sgix :return "void" :args + ((:name |mode| :type |PixelTexGenModeSGIX| :direction :in)) :category + "SGIX_pixel_texture" :version "1.0") diff --git a/lib/opengl-sgix_polynomial_ffd.lisp b/lib/opengl-sgix_polynomial_ffd.lisp dissimilarity index 94% index 0b01016..57baa07 100644 --- a/lib/opengl-sgix_polynomial_ffd.lisp +++ b/lib/opengl-sgix_polynomial_ffd.lisp @@ -1,56 +1,49 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_polynomial_ffd - -(defglextfun - (("LoadIdentityDeformationMapSGIX" load-identity-deformation-map-sgix) :args - ((:name |mask| :type |FfdMaskSGIX| :direction :in)) :return ("void") - :category ("SGIX_polynomial_ffd") :version ("1.0") :glxflags ("SGI" "ignore") - :glxropcode ("2076") :extension nil :glsopcode ("0x0187") :offset ("?"))) -(defglextfun - (("DeformSGIX" deform-sgix) :args - ((:name |mask| :type |FfdMaskSGIX| :direction :in)) :return ("void") - :category ("SGIX_polynomial_ffd") :version ("1.0") :glxflags ("SGI" "ignore") - :glxropcode ("2075") :extension nil :glsopcode ("0x0186") :offset ("?"))) -(defglextfun - (("DeformationMap3fSGIX" deformation-map-3f-sgix) :args - ((:name |target| :type |FfdTargetSGIX| :direction :in) - (:name |u1| :type |CoordF| :direction :in) - (:name |u2| :type |CoordF| :direction :in) - (:name |ustride| :type |Int32| :direction :in) - (:name |uorder| :type |CheckedInt32| :direction :in) - (:name |v1| :type |CoordF| :direction :in) - (:name |v2| :type |CoordF| :direction :in) - (:name |vstride| :type |Int32| :direction :in) - (:name |vorder| :type |CheckedInt32| :direction :in) - (:name |w1| :type |CoordF| :direction :in) - (:name |w2| :type |CoordF| :direction :in) - (:name |wstride| :type |Int32| :direction :in) - (:name |worder| :type |CheckedInt32| :direction :in) - (:name |points| :type |CoordF| :direction :in :array t :size - (|target| |ustride| |uorder| |vstride| |vorder| |wstride| |worder|))) - :return ("void") :category ("SGIX_polynomial_ffd") :dlflags ("handcode") - :version ("1.0") :glxflags ("SGI" "ignore") :glxropcode ("2074") :extension - nil :glsflags ("capture-handcode") :glsopcode ("0x0185") :offset ("?"))) -(defglextfun - (("DeformationMap3dSGIX" deformation-map-3d-sgix) :args - ((:name |target| :type |FfdTargetSGIX| :direction :in) - (:name |u1| :type |CoordD| :direction :in) - (:name |u2| :type |CoordD| :direction :in) - (:name |ustride| :type |Int32| :direction :in) - (:name |uorder| :type |CheckedInt32| :direction :in) - (:name |v1| :type |CoordD| :direction :in) - (:name |v2| :type |CoordD| :direction :in) - (:name |vstride| :type |Int32| :direction :in) - (:name |vorder| :type |CheckedInt32| :direction :in) - (:name |w1| :type |CoordD| :direction :in) - (:name |w2| :type |CoordD| :direction :in) - (:name |wstride| :type |Int32| :direction :in) - (:name |worder| :type |CheckedInt32| :direction :in) - (:name |points| :type |CoordD| :direction :in :array t :size - (|target| |ustride| |uorder| |vstride| |vorder| |wstride| |worder|))) - :return ("void") :dlflags ("handcode") :category ("SGIX_polynomial_ffd") - :version ("1.0") :glxflags ("SGI" "ignore") :glxropcode ("2073") :extension - nil :glsflags ("capture-handcode") :glsopcode ("0x0184") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_polynomial_ffd + +(defglextfun "LoadIdentityDeformationMapSGIX" + load-identity-deformation-map-sgix :return "void" :args + ((:name |mask| :type |FfdMaskSGIX| :direction :in)) :category + "SGIX_polynomial_ffd" :version "1.0") +(defglextfun "DeformSGIX" deform-sgix :return "void" :args + ((:name |mask| :type |FfdMaskSGIX| :direction :in)) :category + "SGIX_polynomial_ffd" :version "1.0") +(defglextfun "DeformationMap3fSGIX" deformation-map-3f-sgix :return "void" + :args + ((:name |target| :type |FfdTargetSGIX| :direction :in) + (:name |u1| :type |CoordF| :direction :in) + (:name |u2| :type |CoordF| :direction :in) + (:name |ustride| :type |Int32| :direction :in) + (:name |uorder| :type |CheckedInt32| :direction :in) + (:name |v1| :type |CoordF| :direction :in) + (:name |v2| :type |CoordF| :direction :in) + (:name |vstride| :type |Int32| :direction :in) + (:name |vorder| :type |CheckedInt32| :direction :in) + (:name |w1| :type |CoordF| :direction :in) + (:name |w2| :type |CoordF| :direction :in) + (:name |wstride| :type |Int32| :direction :in) + (:name |worder| :type |CheckedInt32| :direction :in) + (:name |points| :type |CoordF| :direction :in :array t :size + (|target| |ustride| |uorder| |vstride| |vorder| |wstride| |worder|))) + :category "SGIX_polynomial_ffd" :version "1.0") +(defglextfun "DeformationMap3dSGIX" deformation-map-3d-sgix :return "void" + :args + ((:name |target| :type |FfdTargetSGIX| :direction :in) + (:name |u1| :type |CoordD| :direction :in) + (:name |u2| :type |CoordD| :direction :in) + (:name |ustride| :type |Int32| :direction :in) + (:name |uorder| :type |CheckedInt32| :direction :in) + (:name |v1| :type |CoordD| :direction :in) + (:name |v2| :type |CoordD| :direction :in) + (:name |vstride| :type |Int32| :direction :in) + (:name |vorder| :type |CheckedInt32| :direction :in) + (:name |w1| :type |CoordD| :direction :in) + (:name |w2| :type |CoordD| :direction :in) + (:name |wstride| :type |Int32| :direction :in) + (:name |worder| :type |CheckedInt32| :direction :in) + (:name |points| :type |CoordD| :direction :in :array t :size + (|target| |ustride| |uorder| |vstride| |vorder| |wstride| |worder|))) + :category "SGIX_polynomial_ffd" :version "1.0") diff --git a/lib/opengl-sgix_reference_plane.lisp b/lib/opengl-sgix_reference_plane.lisp dissimilarity index 63% index a0a5698..91e55b9 100644 --- a/lib/opengl-sgix_reference_plane.lisp +++ b/lib/opengl-sgix_reference_plane.lisp @@ -1,12 +1,9 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_reference_plane - -(defglextfun - (("ReferencePlaneSGIX" reference-plane-sgix) :args - ((:name |equation| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("SGIX_reference_plane") :version ("1.0") - :glxflags ("SGI") :glxropcode ("2071") :extension nil :glsopcode ("0x0181") - :offset ("468"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_reference_plane + +(defglextfun "ReferencePlaneSGIX" reference-plane-sgix :return "void" :args + ((:name |equation| :type |Float64| :direction :in :array t :size #x4)) + :category "SGIX_reference_plane" :version "1.0") diff --git a/lib/opengl-sgix_sprite.lisp b/lib/opengl-sgix_sprite.lisp dissimilarity index 77% index 2b95550..f2e9095 100644 --- a/lib/opengl-sgix_sprite.lisp +++ b/lib/opengl-sgix_sprite.lisp @@ -1,42 +1,34 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sgix_sprite - -(defconstant +sprite-axial-sgix+ #x814C) -(defconstant +sprite-object-aligned-sgix+ #x814D) -(defconstant +sprite-eye-aligned-sgix+ #x814E) -(defconstant +sprite-axial-sgix+ #x814C) -(defconstant +sprite-object-aligned-sgix+ #x814D) -(defconstant +sprite-eye-aligned-sgix+ #x814E) -(defglextfun - (("SpriteParameterivSGIX" sprite-parameter-iv-sgix) :args - ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_sprite") :version ("1.0") :glxflags ("SGI") - :glxropcode ("2063") :extension nil :glsflags ("gl-enum") :glsopcode - ("0x0174") :offset ("457"))) -(defglextfun - (("SpriteParameteriSGIX" sprite-parameter-i-sgix) :args - ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("SGIX_sprite") :version ("1.0") :glxflags ("SGI") - :glxropcode ("2062") :extension nil :glsflags ("gl-enum") :glsopcode - ("0x0173") :offset ("456"))) -(defglextfun - (("SpriteParameterfvSGIX" sprite-parameter-fv-sgix) :args - ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("SGIX_sprite") :version ("1.0") :glxflags ("SGI") - :glxropcode ("2061") :extension nil :glsflags ("gl-enum") :glsopcode - ("0x0172") :offset ("455"))) -(defglextfun - (("SpriteParameterfSGIX" sprite-parameter-f-sgix) :args - ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("SGIX_sprite") :version ("1.0") :glxflags ("SGI") - :glxropcode ("2060") :extension nil :glsflags ("gl-enum") :glsopcode - ("0x0171") :offset ("454"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sgix_sprite + +(defconstant +sprite-axial-sgix+ #x814C) +(defconstant +sprite-object-aligned-sgix+ #x814D) +(defconstant +sprite-eye-aligned-sgix+ #x814E) +(defconstant +sprite-axial-sgix+ #x814C) +(defconstant +sprite-object-aligned-sgix+ #x814D) +(defconstant +sprite-eye-aligned-sgix+ #x814E) +(defglextfun "SpriteParameterivSGIX" sprite-parameter-iv-sgix :return "void" + :args + ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "SGIX_sprite" :version "1.0") +(defglextfun "SpriteParameteriSGIX" sprite-parameter-i-sgix :return "void" + :args + ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "SGIX_sprite" :version "1.0") +(defglextfun "SpriteParameterfvSGIX" sprite-parameter-fv-sgix :return "void" + :args + ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "SGIX_sprite" :version "1.0") +(defglextfun "SpriteParameterfSGIX" sprite-parameter-f-sgix :return "void" + :args + ((:name |pname| :type |SpriteParameterNameSGIX| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "SGIX_sprite" :version "1.0") diff --git a/lib/opengl-sgix_tag_sample_buffer.lisp b/lib/opengl-sgix_tag_sample_buffer.lisp index c81289b..dd00ed2 100644 --- a/lib/opengl-sgix_tag_sample_buffer.lisp +++ b/lib/opengl-sgix_tag_sample_buffer.lisp @@ -4,7 +4,5 @@ ;;;; sgix_tag_sample_buffer -(defglextfun - (("TagSampleBufferSGIX" tag-sample-buffer-sgix) :args nil :return ("void") - :category ("SGIX_tag_sample_buffer") :version ("1.0") :glxropcode ("2050") - :glxflags ("SGI") :extension nil :glsopcode ("0x0162") :offset ("467"))) +(defglextfun "TagSampleBufferSGIX" tag-sample-buffer-sgix :return "void" :args + nil :category "SGIX_tag_sample_buffer" :version "1.0") diff --git a/lib/opengl-sun_global_alpha.lisp b/lib/opengl-sun_global_alpha.lisp dissimilarity index 88% index 625a6a1..2034eeb 100644 --- a/lib/opengl-sun_global_alpha.lisp +++ b/lib/opengl-sun_global_alpha.lisp @@ -1,48 +1,32 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sun_global_alpha - -(defconstant +global-alpha-sun+ #x81D9) -(defconstant +global-alpha-factor-sun+ #x81DA) -(defglextfun - (("GlobalAlphaFactoruiSUN" global-alpha-factor-ui-sun) :args - ((:name |factor| :type |UInt32| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactorusSUN" global-alpha-factor-us-sun) :args - ((:name |factor| :type |UInt16| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactorubSUN" global-alpha-factor-ub-sun) :args - ((:name |factor| :type |UInt8| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactordSUN" global-alpha-factor-d-sun) :args - ((:name |factor| :type |Float64| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactorfSUN" global-alpha-factor-f-sun) :args - ((:name |factor| :type |Float32| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactoriSUN" global-alpha-factor-i-sun) :args - ((:name |factor| :type |Int32| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactorsSUN" global-alpha-factor-s-sun) :args - ((:name |factor| :type |Int16| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("GlobalAlphaFactorbSUN" global-alpha-factor-b-sun) :args - ((:name |factor| :type |Int8| :direction :in)) :return ("void") :category - ("SUN_global_alpha") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sun_global_alpha + +(defconstant +global-alpha-sun+ #x81D9) +(defconstant +global-alpha-factor-sun+ #x81DA) +(defglextfun "GlobalAlphaFactoruiSUN" global-alpha-factor-ui-sun :return "void" + :args ((:name |factor| :type |UInt32| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactorusSUN" global-alpha-factor-us-sun :return "void" + :args ((:name |factor| :type |UInt16| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactorubSUN" global-alpha-factor-ub-sun :return "void" + :args ((:name |factor| :type |UInt8| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactordSUN" global-alpha-factor-d-sun :return "void" + :args ((:name |factor| :type |Float64| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactorfSUN" global-alpha-factor-f-sun :return "void" + :args ((:name |factor| :type |Float32| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactoriSUN" global-alpha-factor-i-sun :return "void" + :args ((:name |factor| :type |Int32| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactorsSUN" global-alpha-factor-s-sun :return "void" + :args ((:name |factor| :type |Int16| :direction :in)) :category + "SUN_global_alpha" :version "1.1") +(defglextfun "GlobalAlphaFactorbSUN" global-alpha-factor-b-sun :return "void" + :args ((:name |factor| :type |Int8| :direction :in)) :category + "SUN_global_alpha" :version "1.1") diff --git a/lib/opengl-sun_mesh_array.lisp b/lib/opengl-sun_mesh_array.lisp dissimilarity index 65% index 1de55b5..bcc42c0 100644 --- a/lib/opengl-sun_mesh_array.lisp +++ b/lib/opengl-sun_mesh_array.lisp @@ -1,17 +1,14 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sun_mesh_array - -(defconstant +quad-mesh-sun+ #x8614) -(defconstant +triangle-mesh-sun+ #x8615) -(defglextfun - (("DrawMeshArraysSUN" draw-mesh-arrays-sun) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("SUN_mesh_array") :dlflags ("handcode") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glxropcode ("?") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sun_mesh_array + +(defconstant +quad-mesh-sun+ #x8614) +(defconstant +triangle-mesh-sun+ #x8615) +(defglextfun "DrawMeshArraysSUN" draw-mesh-arrays-sun :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "SUN_mesh_array" :version "1.1") diff --git a/lib/opengl-sun_triangle_list.lisp b/lib/opengl-sun_triangle_list.lisp dissimilarity index 67% index 5e14107..85a27a2 100644 --- a/lib/opengl-sun_triangle_list.lisp +++ b/lib/opengl-sun_triangle_list.lisp @@ -1,61 +1,48 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sun_triangle_list - -(defconstant +restart-sun+ #x1) -(defconstant +replace-middle-sun+ #x2) -(defconstant +replace-oldest-sun+ #x3) -(defconstant +triangle-list-sun+ #x81D7) -(defconstant +replacement-code-sun+ #x81D8) -(defconstant +replacement-code-array-sun+ #x85C0) -(defconstant +replacement-code-array-type-sun+ #x85C1) -(defconstant +replacement-code-array-stride-sun+ #x85C2) -(defconstant +replacement-code-array-pointer-sun+ #x85C3) -(defconstant +r1ui-v3f-sun+ #x85C4) -(defconstant +r1ui-c4ub-v3f-sun+ #x85C5) -(defconstant +r1ui-c3f-v3f-sun+ #x85C6) -(defconstant +r1ui-n3f-v3f-sun+ #x85C7) -(defconstant +r1ui-c4f-n3f-v3f-sun+ #x85C8) -(defconstant +r1ui-t2f-v3f-sun+ #x85C9) -(defconstant +r1ui-t2f-n3f-v3f-sun+ #x85CA) -(defconstant +r1ui-t2f-c4f-n3f-v3f-sun+ #x85CB) -(defglextfun - (("ReplacementCodePointerSUN" replacement-code-pointer-sun) :args - ((:name |type| :type |ReplacementCodeTypeSUN| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("SUN_triangle_list") :version ("1.1") :glxropcode - ("?") :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeubvSUN" replacement-code-ubv-sun) :args - ((:name |code| :type |UInt8| :direction :in :array t)) :return ("void") - :category ("SUN_triangle_list") :version ("1.1") :glxropcode ("?") :glsflags - ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeusvSUN" replacement-code-usv-sun) :args - ((:name |code| :type |UInt16| :direction :in :array t)) :return ("void") - :category ("SUN_triangle_list") :version ("1.1") :glxropcode ("?") :glsflags - ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuivSUN" replacement-code-uiv-sun) :args - ((:name |code| :type |UInt32| :direction :in :array t)) :return ("void") - :category ("SUN_triangle_list") :version ("1.1") :glxropcode ("?") :glsflags - ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeubSUN" replacement-code-ub-sun) :args - ((:name |code| :type |UInt8| :direction :in)) :return ("void") :category - ("SUN_triangle_list") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("ReplacementCodeusSUN" replacement-code-us-sun) :args - ((:name |code| :type |UInt16| :direction :in)) :return ("void") :category - ("SUN_triangle_list") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) -(defglextfun - (("ReplacementCodeuiSUN" replacement-code-ui-sun) :args - ((:name |code| :type |UInt32| :direction :in)) :return ("void") :category - ("SUN_triangle_list") :version ("1.1") :glxropcode ("?") :glsflags ("ignore") - :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sun_triangle_list + +(defconstant +restart-sun+ #x1) +(defconstant +replace-middle-sun+ #x2) +(defconstant +replace-oldest-sun+ #x3) +(defconstant +triangle-list-sun+ #x81D7) +(defconstant +replacement-code-sun+ #x81D8) +(defconstant +replacement-code-array-sun+ #x85C0) +(defconstant +replacement-code-array-type-sun+ #x85C1) +(defconstant +replacement-code-array-stride-sun+ #x85C2) +(defconstant +replacement-code-array-pointer-sun+ #x85C3) +(defconstant +r1ui-v3f-sun+ #x85C4) +(defconstant +r1ui-c4ub-v3f-sun+ #x85C5) +(defconstant +r1ui-c3f-v3f-sun+ #x85C6) +(defconstant +r1ui-n3f-v3f-sun+ #x85C7) +(defconstant +r1ui-c4f-n3f-v3f-sun+ #x85C8) +(defconstant +r1ui-t2f-v3f-sun+ #x85C9) +(defconstant +r1ui-t2f-n3f-v3f-sun+ #x85CA) +(defconstant +r1ui-t2f-c4f-n3f-v3f-sun+ #x85CB) +(defglextfun "ReplacementCodePointerSUN" replacement-code-pointer-sun :return + "void" :args + ((:name |type| :type |ReplacementCodeTypeSUN| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :in :array t :size + (|type| |stride|) :retained t)) + :category "SUN_triangle_list" :version "1.1") +(defglextfun "ReplacementCodeubvSUN" replacement-code-ubv-sun :return "void" + :args ((:name |code| :type |UInt8| :direction :in :array t)) :category + "SUN_triangle_list" :version "1.1") +(defglextfun "ReplacementCodeusvSUN" replacement-code-usv-sun :return "void" + :args ((:name |code| :type |UInt16| :direction :in :array t)) :category + "SUN_triangle_list" :version "1.1") +(defglextfun "ReplacementCodeuivSUN" replacement-code-uiv-sun :return "void" + :args ((:name |code| :type |UInt32| :direction :in :array t)) :category + "SUN_triangle_list" :version "1.1") +(defglextfun "ReplacementCodeubSUN" replacement-code-ub-sun :return "void" + :args ((:name |code| :type |UInt8| :direction :in)) :category + "SUN_triangle_list" :version "1.1") +(defglextfun "ReplacementCodeusSUN" replacement-code-us-sun :return "void" + :args ((:name |code| :type |UInt16| :direction :in)) :category + "SUN_triangle_list" :version "1.1") +(defglextfun "ReplacementCodeuiSUN" replacement-code-ui-sun :return "void" + :args ((:name |code| :type |UInt32| :direction :in)) :category + "SUN_triangle_list" :version "1.1") diff --git a/lib/opengl-sun_vertex.lisp b/lib/opengl-sun_vertex.lisp dissimilarity index 99% index aea9c2c..61b75a5 100644 --- a/lib/opengl-sun_vertex.lisp +++ b/lib/opengl-sun_vertex.lisp @@ -1,428 +1,347 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; sun_vertex - -(defglextfun - (("ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN" - replacement-codeui-tex-coord-2f-color-4f-normal-3f-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |c| :type |Float32| :direction :in :array t :size #x4) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN" - replacement-codeui-tex-coord-2f-color-4f-normal-3f-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |a| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN" - replacement-codeui-tex-coord-2f-normal-3f-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiTexCoord2fNormal3fVertex3fSUN" - replacement-codeui-tex-coord-2f-normal-3f-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiTexCoord2fVertex3fvSUN" - replacement-codeui-tex-coord-2f-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiTexCoord2fVertex3fSUN" - replacement-codeui-tex-coord-2f-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiColor4fNormal3fVertex3fvSUN" - replacement-codeui-color-4f-normal-3f-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |c| :type |Float32| :direction :in :array t :size #x4) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiColor4fNormal3fVertex3fSUN" - replacement-codeui-color-4f-normal-3f-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |a| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiNormal3fVertex3fvSUN" - replacement-codeui-normal-3f-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiNormal3fVertex3fSUN" - replacement-codeui-normal-3f-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiColor3fVertex3fvSUN" - replacement-codeui-color-3f-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |c| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiColor3fVertex3fSUN" - replacement-codeui-color-3f-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiColor4ubVertex3fvSUN" - replacement-codeui-color-4ub-vertex-3fv-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |c| :type |UInt8| :direction :in :array t :size #x4) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiColor4ubVertex3fSUN" - replacement-codeui-color-4ub-vertex-3f-sun) - :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |r| :type |UInt8| :direction :in) - (:name |g| :type |UInt8| :direction :in) - (:name |b| :type |UInt8| :direction :in) - (:name |a| :type |UInt8| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiVertex3fvSUN" replacement-codeui-vertex-3fv-sun) :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("ReplacementCodeuiVertex3fSUN" replacement-codeui-vertex-3f-sun) :args - ((:name |rc| :type |ReplacementCodeSUN| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord4fColor4fNormal3fVertex4fvSUN" - tex-coord-4f-color-4f-normal-3f-vertex-4fv-sun) - :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x4) - (:name |c| :type |Float32| :direction :in :array t :size #x4) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord4fColor4fNormal3fVertex4fSUN" - tex-coord-4f-color-4f-normal-3f-vertex-4f-sun) - :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |p| :type |Float32| :direction :in) - (:name |q| :type |Float32| :direction :in) - (:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |a| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fColor4fNormal3fVertex3fvSUN" - tex-coord-2f-color-4f-normal-3f-vertex-3fv-sun) - :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |c| :type |Float32| :direction :in :array t :size #x4) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fColor4fNormal3fVertex3fSUN" - tex-coord-2f-color-4f-normal-3f-vertex-3f-sun) - :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |a| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fNormal3fVertex3fvSUN" tex-coord-2f-normal-3f-vertex-3fv-sun) - :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fNormal3fVertex3fSUN" tex-coord-2f-normal-3f-vertex-3f-sun) :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fColor3fVertex3fvSUN" tex-coord-2f-color-3f-vertex-3fv-sun) :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |c| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fColor3fVertex3fSUN" tex-coord-2f-color-3f-vertex-3f-sun) :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fColor4ubVertex3fvSUN" tex-coord-2f-color-4ub-vertex-3fv-sun) - :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |c| :type |UInt8| :direction :in :array t :size #x4) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fColor4ubVertex3fSUN" tex-coord-2f-color-4ub-vertex-3f-sun) :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |r| :type |UInt8| :direction :in) - (:name |g| :type |UInt8| :direction :in) - (:name |b| :type |UInt8| :direction :in) - (:name |a| :type |UInt8| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord4fVertex4fvSUN" tex-coord-4f-vertex-4fv-sun) :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x4) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord4fVertex4fSUN" tex-coord-4f-vertex-4f-sun) :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |p| :type |Float32| :direction :in) - (:name |q| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fVertex3fvSUN" tex-coord-2f-vertex-3fv-sun) :args - ((:name |tc| :type |Float32| :direction :in :array t :size #x2) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("TexCoord2fVertex3fSUN" tex-coord-2f-vertex-3f-sun) :args - ((:name |s| :type |Float32| :direction :in) - (:name |t| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color4fNormal3fVertex3fvSUN" color-4f-normal-3f-vertex-3fv-sun) :args - ((:name |c| :type |Float32| :direction :in :array t :size #x4) - (:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color4fNormal3fVertex3fSUN" color-4f-normal-3f-vertex-3f-sun) :args - ((:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |a| :type |Float32| :direction :in) - (:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Normal3fVertex3fvSUN" normal-3f-vertex-3fv-sun) :args - ((:name |n| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Normal3fVertex3fSUN" normal-3f-vertex-3f-sun) :args - ((:name |nx| :type |Float32| :direction :in) - (:name |ny| :type |Float32| :direction :in) - (:name |nz| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color3fVertex3fvSUN" color-3f-vertex-3fv-sun) :args - ((:name |c| :type |Float32| :direction :in :array t :size #x3) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color3fVertex3fSUN" color-3f-vertex-3f-sun) :args - ((:name |r| :type |Float32| :direction :in) - (:name |g| :type |Float32| :direction :in) - (:name |b| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color4ubVertex3fvSUN" color-4ub-vertex-3fv-sun) :args - ((:name |c| :type |UInt8| :direction :in :array t :size #x4) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color4ubVertex3fSUN" color-4ub-vertex-3f-sun) :args - ((:name |r| :type |UInt8| :direction :in) - (:name |g| :type |UInt8| :direction :in) - (:name |b| :type |UInt8| :direction :in) - (:name |a| :type |UInt8| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color4ubVertex2fvSUN" color-4ub-vertex-2fv-sun) :args - ((:name |c| :type |UInt8| :direction :in :array t :size #x4) - (:name |v| :type |Float32| :direction :in :array t :size #x2)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) -(defglextfun - (("Color4ubVertex2fSUN" color-4ub-vertex-2f-sun) :args - ((:name |r| :type |UInt8| :direction :in) - (:name |g| :type |UInt8| :direction :in) - (:name |b| :type |UInt8| :direction :in) - (:name |a| :type |UInt8| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in)) - :return ("void") :category ("SUN_vertex") :version ("1.1") :glxropcode ("?") - :glsflags ("ignore") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; sun_vertex + +(defglextfun "ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fvSUN" + replacement-codeui-tex-coord-2f-color-4f-normal-3f-vertex-3fv-sun :return + "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |c| :type |Float32| :direction :in :array t :size #x4) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiTexCoord2fColor4fNormal3fVertex3fSUN" + replacement-codeui-tex-coord-2f-color-4f-normal-3f-vertex-3f-sun :return + "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |a| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiTexCoord2fNormal3fVertex3fvSUN" + replacement-codeui-tex-coord-2f-normal-3f-vertex-3fv-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiTexCoord2fNormal3fVertex3fSUN" + replacement-codeui-tex-coord-2f-normal-3f-vertex-3f-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiTexCoord2fVertex3fvSUN" + replacement-codeui-tex-coord-2f-vertex-3fv-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiTexCoord2fVertex3fSUN" + replacement-codeui-tex-coord-2f-vertex-3f-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiColor4fNormal3fVertex3fvSUN" + replacement-codeui-color-4f-normal-3f-vertex-3fv-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |c| :type |Float32| :direction :in :array t :size #x4) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiColor4fNormal3fVertex3fSUN" + replacement-codeui-color-4f-normal-3f-vertex-3f-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |a| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiNormal3fVertex3fvSUN" + replacement-codeui-normal-3f-vertex-3fv-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiNormal3fVertex3fSUN" + replacement-codeui-normal-3f-vertex-3f-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiColor3fVertex3fvSUN" + replacement-codeui-color-3f-vertex-3fv-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |c| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiColor3fVertex3fSUN" + replacement-codeui-color-3f-vertex-3f-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiColor4ubVertex3fvSUN" + replacement-codeui-color-4ub-vertex-3fv-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |c| :type |UInt8| :direction :in :array t :size #x4) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiColor4ubVertex3fSUN" + replacement-codeui-color-4ub-vertex-3f-sun :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |r| :type |UInt8| :direction :in) + (:name |g| :type |UInt8| :direction :in) + (:name |b| :type |UInt8| :direction :in) + (:name |a| :type |UInt8| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiVertex3fvSUN" replacement-codeui-vertex-3fv-sun + :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in :array t :size #x1) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "ReplacementCodeuiVertex3fSUN" replacement-codeui-vertex-3f-sun + :return "void" :args + ((:name |rc| :type |ReplacementCodeSUN| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord4fColor4fNormal3fVertex4fvSUN" + tex-coord-4f-color-4f-normal-3f-vertex-4fv-sun :return "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x4) + (:name |c| :type |Float32| :direction :in :array t :size #x4) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord4fColor4fNormal3fVertex4fSUN" + tex-coord-4f-color-4f-normal-3f-vertex-4f-sun :return "void" :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |p| :type |Float32| :direction :in) + (:name |q| :type |Float32| :direction :in) + (:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |a| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fColor4fNormal3fVertex3fvSUN" + tex-coord-2f-color-4f-normal-3f-vertex-3fv-sun :return "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |c| :type |Float32| :direction :in :array t :size #x4) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fColor4fNormal3fVertex3fSUN" + tex-coord-2f-color-4f-normal-3f-vertex-3f-sun :return "void" :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |a| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fNormal3fVertex3fvSUN" + tex-coord-2f-normal-3f-vertex-3fv-sun :return "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fNormal3fVertex3fSUN" + tex-coord-2f-normal-3f-vertex-3f-sun :return "void" :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fColor3fVertex3fvSUN" + tex-coord-2f-color-3f-vertex-3fv-sun :return "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |c| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fColor3fVertex3fSUN" tex-coord-2f-color-3f-vertex-3f-sun + :return "void" :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fColor4ubVertex3fvSUN" + tex-coord-2f-color-4ub-vertex-3fv-sun :return "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |c| :type |UInt8| :direction :in :array t :size #x4) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fColor4ubVertex3fSUN" + tex-coord-2f-color-4ub-vertex-3f-sun :return "void" :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |r| :type |UInt8| :direction :in) + (:name |g| :type |UInt8| :direction :in) + (:name |b| :type |UInt8| :direction :in) + (:name |a| :type |UInt8| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord4fVertex4fvSUN" tex-coord-4f-vertex-4fv-sun :return + "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x4) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord4fVertex4fSUN" tex-coord-4f-vertex-4f-sun :return "void" + :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |p| :type |Float32| :direction :in) + (:name |q| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fVertex3fvSUN" tex-coord-2f-vertex-3fv-sun :return + "void" :args + ((:name |tc| :type |Float32| :direction :in :array t :size #x2) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "TexCoord2fVertex3fSUN" tex-coord-2f-vertex-3f-sun :return "void" + :args + ((:name |s| :type |Float32| :direction :in) + (:name |t| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color4fNormal3fVertex3fvSUN" color-4f-normal-3f-vertex-3fv-sun + :return "void" :args + ((:name |c| :type |Float32| :direction :in :array t :size #x4) + (:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color4fNormal3fVertex3fSUN" color-4f-normal-3f-vertex-3f-sun + :return "void" :args + ((:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |a| :type |Float32| :direction :in) + (:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Normal3fVertex3fvSUN" normal-3f-vertex-3fv-sun :return "void" + :args + ((:name |n| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Normal3fVertex3fSUN" normal-3f-vertex-3f-sun :return "void" :args + ((:name |nx| :type |Float32| :direction :in) + (:name |ny| :type |Float32| :direction :in) + (:name |nz| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color3fVertex3fvSUN" color-3f-vertex-3fv-sun :return "void" :args + ((:name |c| :type |Float32| :direction :in :array t :size #x3) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color3fVertex3fSUN" color-3f-vertex-3f-sun :return "void" :args + ((:name |r| :type |Float32| :direction :in) + (:name |g| :type |Float32| :direction :in) + (:name |b| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color4ubVertex3fvSUN" color-4ub-vertex-3fv-sun :return "void" + :args + ((:name |c| :type |UInt8| :direction :in :array t :size #x4) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color4ubVertex3fSUN" color-4ub-vertex-3f-sun :return "void" :args + ((:name |r| :type |UInt8| :direction :in) + (:name |g| :type |UInt8| :direction :in) + (:name |b| :type |UInt8| :direction :in) + (:name |a| :type |UInt8| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color4ubVertex2fvSUN" color-4ub-vertex-2fv-sun :return "void" + :args + ((:name |c| :type |UInt8| :direction :in :array t :size #x4) + (:name |v| :type |Float32| :direction :in :array t :size #x2)) + :category "SUN_vertex" :version "1.1") +(defglextfun "Color4ubVertex2fSUN" color-4ub-vertex-2f-sun :return "void" :args + ((:name |r| :type |UInt8| :direction :in) + (:name |g| :type |UInt8| :direction :in) + (:name |b| :type |UInt8| :direction :in) + (:name |a| :type |UInt8| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in)) + :category "SUN_vertex" :version "1.1") diff --git a/lib/opengl-sunx_constant_data.lisp b/lib/opengl-sunx_constant_data.lisp index 28dfc1a..f336f46 100644 --- a/lib/opengl-sunx_constant_data.lisp +++ b/lib/opengl-sunx_constant_data.lisp @@ -6,7 +6,5 @@ (defconstant +unpack-constant-data-sunx+ #x81D5) (defconstant +texture-constant-data-sunx+ #x81D6) -(defglextfun - (("FinishTextureSUNX" finish-texture-sunx) :args nil :return ("void") - :category ("SUNX_constant_data") :version ("1.1") :glxropcode ("?") :glsflags - ("ignore") :offset ("?"))) +(defglextfun "FinishTextureSUNX" finish-texture-sunx :return "void" :args nil + :category "SUNX_constant_data" :version "1.1") diff --git a/lib/opengl-version_1_1.lisp b/lib/opengl-version_1_1.lisp dissimilarity index 98% index fa64f0e..3c861ec 100644 --- a/lib/opengl-version_1_1.lisp +++ b/lib/opengl-version_1_1.lisp @@ -1,251 +1,173 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; 1_1 - -(defglfun - (("PushClientAttrib" push-client-attrib) :args - ((:name |mask| :type |ClientAttribMask| :direction :in)) :return ("void") - :category ("1_1") :version ("1.1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :glsflags ("client") - :glsopcode ("0x015F") :offset ("335"))) -(defglfun - (("PopClientAttrib" pop-client-attrib) :args nil :return ("void") :category - ("1_1") :version ("1.1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :glsflags ("client") - :glsopcode ("0x015E") :offset ("334"))) -(defglfun - (("Indexubv" index-ubv) :args - ((:name |c| :type |ColorIndexValueUB| :direction :in :array t :size #x1)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("194") - :glsopcode ("0x015D") :offset ("316"))) -(defglfun - (("Indexub" index-ub) :args - ((:name |c| :type |ColorIndexValueUB| :direction :in)) :return ("void") - :category ("1_1") :vectorequiv ("Indexubv") :version ("1.1") :offset ("315"))) -(defglfun - (("PrioritizeTextures" prioritize-textures) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :in :array t :size n) - (:name |priorities| :type |ClampedFloat32| :direction :in :array t :size n)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("4118") - :glxflags ("EXT") :glsopcode ("0x014C") :offset ("331"))) -(defglfun - (("IsTexture" is-texture) :args - ((:name |texture| :type |Texture| :direction :in)) :return ("Boolean") - :category ("1_1") :dlflags ("notlistable") :version ("1.1") :glxsingle - ("146") :glsflags ("get") :glsopcode ("0x025C") :offset ("330"))) -(defglfun - (("GenTextures" gen-textures) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :out :array t :size n)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :version ("1.1") - :glxsingle ("145") :glsopcode ("0x025B") :offset ("328"))) -(defglfun - (("DeleteTextures" delete-textures) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :in :array t :size n)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :version ("1.1") - :glxsingle ("144") :glsopcode ("0x025A") :offset ("327"))) -(defglfun - (("BindTexture" bind-texture) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |texture| :type |Texture| :direction :in)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("4117") - :glxflags ("EXT") :glsopcode ("0x0148") :offset ("307"))) -(defglfun - (("AreTexturesResident" are-textures-resident) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |textures| :type |Texture| :direction :in :array t :size n) - (:name |residences| :type |Boolean| :direction :out :array t :size n)) - :return ("Boolean") :category ("1_1") :glxsingle ("143") :dlflags - ("notlistable") :version ("1.1") :glsflags ("get") :glsopcode ("0x0259") - :offset ("322"))) -(defglfun - (("TexSubImage2D" tex-sub-image-2d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("1_1") :dlflags ("handcode") :glxflags - ("EXT" "client-handcode" "server-handcode") :version ("1.1") :glxropcode - ("4100") :glsflags ("pixel-unpack") :glsopcode ("0x0124") :offset ("333"))) -(defglfun - (("TexSubImage1D" tex-sub-image-1d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("1_1") :dlflags ("handcode") :glxflags - ("EXT" "client-handcode" "server-handcode") :version ("1.1") :glxropcode - ("4099") :glsflags ("pixel-unpack") :glsopcode ("0x0123") :offset ("332"))) -(defglfun - (("CopyTexSubImage2D" copy-tex-sub-image-2d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("4122") - :glxflags ("EXT") :glsopcode ("0x0150") :offset ("326"))) -(defglfun - (("CopyTexSubImage1D" copy-tex-sub-image-1d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("4121") - :glxflags ("EXT") :glsopcode ("0x014F") :offset ("325"))) -(defglfun - (("CopyTexImage2D" copy-tex-image-2d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("4120") - :glxflags ("EXT") :glsopcode ("0x014E") :offset ("324"))) -(defglfun - (("CopyTexImage1D" copy-tex-image-1d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("4119") - :glxflags ("EXT") :glsopcode ("0x014D") :offset ("323"))) -(defglfun - (("PolygonOffset" polygon-offset) :args - ((:name |factor| :type |Float32| :direction :in) - (:name |units| :type |Float32| :direction :in)) - :return ("void") :category ("1_1") :version ("1.1") :glxropcode ("192") - :glsopcode ("0x015C") :offset ("319"))) -(defglfun - (("VertexPointer" vertex-pointer) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x015B") :offset ("321"))) -(defglfun - (("TexCoordPointer" tex-coord-pointer) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |TexCoordPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x015A") :offset ("320"))) -(defglfun - (("NormalPointer" normal-pointer) :args - ((:name |type| :type |NormalPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x0159") :offset ("318"))) -(defglfun - (("InterleavedArrays" interleaved-arrays) :args - ((:name |format| :type |InterleavedArrayFormat| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|format| |stride|) :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x0158") :offset ("317"))) -(defglfun - (("IndexPointer" index-pointer) :args - ((:name |type| :type |IndexPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x0157") :offset ("314"))) -(defglfun - (("GetPointerv" get-pointerv) :args - ((:name |pname| :type |GetPointervPName| :direction :in) - (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client" "get") :glsopcode ("0x0142") :offset ("329"))) -(defglfun - (("EnableClientState" enable-client-state) :args - ((:name |array| :type |EnableCap| :direction :in)) :return ("void") :category - ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x0156") :offset ("313"))) -(defglfun - (("EdgeFlagPointer" edge-flag-pointer) :args - ((:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size (|stride|) - :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x0155") :offset ("312"))) -(defglfun - (("DrawElements" draw-elements) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |Void| :direction :in :array t :size - (|count| |type|))) - :return ("void") :category ("1_1") :dlflags ("handcode") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsopcode ("0x0154") :offset ("311"))) -(defglfun - (("DrawArrays" draw-arrays) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in)) - :return ("void") :category ("1_1") :dlflags ("handcode") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glxropcode ("193") :glsopcode ("0x0258") :offset ("310"))) -(defglfun - (("DisableClientState" disable-client-state) :args - ((:name |array| :type |EnableCap| :direction :in)) :return ("void") :category - ("1_1") :version ("1.1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :glsflags ("client") - :glsopcode ("0x0153") :offset ("309"))) -(defglfun - (("ColorPointer" color-pointer) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |ColorPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :category ("1_1") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsflags ("client") :glsopcode ("0x0152") :offset ("308"))) -(defglfun - (("ArrayElement" array-element) :args - ((:name |i| :type |Int32| :direction :in)) :return ("void") :category ("1_1") - :dlflags ("handcode") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.1") - :glsopcode ("0x013E") :offset ("306"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; 1_1 + +(defglfun "PushClientAttrib" push-client-attrib :return "void" :args + ((:name |mask| :type |ClientAttribMask| :direction :in)) :category "1_1" + :version "1.1") +(defglfun "PopClientAttrib" pop-client-attrib :return "void" :args nil + :category "1_1" :version "1.1") +(defglfun "Indexubv" index-ubv :return "void" :args + ((:name |c| :type |ColorIndexValueUB| :direction :in :array t :size #x1)) + :category "1_1" :version "1.1") +(defglfun "Indexub" index-ub :return "void" :args + ((:name |c| :type |ColorIndexValueUB| :direction :in)) :category "1_1" + :version "1.1") +(defglfun "PrioritizeTextures" prioritize-textures :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :in :array t :size n) + (:name |priorities| :type |ClampedFloat32| :direction :in :array t :size n)) + :category "1_1" :version "1.1") +(defglfun "IsTexture" is-texture :return "Boolean" :args + ((:name |texture| :type |Texture| :direction :in)) :category "1_1" :version + "1.1") +(defglfun "GenTextures" gen-textures :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :out :array t :size n)) + :category "1_1" :version "1.1") +(defglfun "DeleteTextures" delete-textures :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :in :array t :size n)) + :category "1_1" :version "1.1") +(defglfun "BindTexture" bind-texture :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |texture| :type |Texture| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "AreTexturesResident" are-textures-resident :return "Boolean" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |textures| :type |Texture| :direction :in :array t :size n) + (:name |residences| :type |Boolean| :direction :out :array t :size n)) + :category "1_1" :version "1.1") +(defglfun "TexSubImage2D" tex-sub-image-2d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height|))) + :category "1_1" :version "1.1") +(defglfun "TexSubImage1D" tex-sub-image-1d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "1_1" :version "1.1") +(defglfun "CopyTexSubImage2D" copy-tex-sub-image-2d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "CopyTexSubImage1D" copy-tex-sub-image-1d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "CopyTexImage2D" copy-tex-image-2d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "CopyTexImage1D" copy-tex-image-1d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "PolygonOffset" polygon-offset :return "void" :args + ((:name |factor| :type |Float32| :direction :in) + (:name |units| :type |Float32| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "VertexPointer" vertex-pointer :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "1_1" :version "1.1") +(defglfun "TexCoordPointer" tex-coord-pointer :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |TexCoordPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "1_1" :version "1.1") +(defglfun "NormalPointer" normal-pointer :return "void" :args + ((:name |type| :type |NormalPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "1_1" :version "1.1") +(defglfun "InterleavedArrays" interleaved-arrays :return "void" :args + ((:name |format| :type |InterleavedArrayFormat| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|format| |stride|) :retained t)) + :category "1_1" :version "1.1") +(defglfun "IndexPointer" index-pointer :return "void" :args + ((:name |type| :type |IndexPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "1_1" :version "1.1") +(defglfun "GetPointerv" get-pointerv :return "void" :args + ((:name |pname| :type |GetPointervPName| :direction :in) + (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "1_1" :version "1.1") +(defglfun "EnableClientState" enable-client-state :return "void" :args + ((:name |array| :type |EnableCap| :direction :in)) :category "1_1" :version + "1.1") +(defglfun "EdgeFlagPointer" edge-flag-pointer :return "void" :args + ((:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|stride|) + :retained t)) + :category "1_1" :version "1.1") +(defglfun "DrawElements" draw-elements :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |Void| :direction :in :array t :size + (|count| |type|))) + :category "1_1" :version "1.1") +(defglfun "DrawArrays" draw-arrays :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in)) + :category "1_1" :version "1.1") +(defglfun "DisableClientState" disable-client-state :return "void" :args + ((:name |array| :type |EnableCap| :direction :in)) :category "1_1" :version + "1.1") +(defglfun "ColorPointer" color-pointer :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |ColorPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "1_1" :version "1.1") +(defglfun "ArrayElement" array-element :return "void" :args + ((:name |i| :type |Int32| :direction :in)) :category "1_1" :version "1.1") diff --git a/lib/opengl-version_1_2.lisp b/lib/opengl-version_1_2.lisp dissimilarity index 96% index 500c136..bbf8c61 100644 --- a/lib/opengl-version_1_2.lisp +++ b/lib/opengl-version_1_2.lisp @@ -1,388 +1,295 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; version_1_2 - -(defconstant +max-elements-vertices+ #x80E8) -(defconstant +max-elements-indices+ #x80E9) -(defconstant +pack-skip-images+ #x806B) -(defconstant +pack-image-height+ #x806C) -(defconstant +unpack-skip-images+ #x806D) -(defconstant +unpack-image-height+ #x806E) -(defconstant +texture-3d+ #x806F) -(defconstant +proxy-texture-3d+ #x8070) -(defconstant +texture-depth+ #x8071) -(defconstant +texture-wrap-r+ #x8072) -(defconstant +max-3d-texture-size+ #x8073) -(defconstant +max-elements-vertices+ #x80E8) -(defconstant +max-elements-indices+ #x80E9) -(defglfun - (("CopyTexSubImage3D" copy-tex-sub-image-3d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4123") :glsopcode ("0x0151") :offset ("373"))) -(defglfun - (("TexSubImage3D" tex-sub-image-3d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height| |depth|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.2") :glxropcode - ("4115") :glsflags ("pixel-unpack") :glsopcode ("0x013D") :offset ("372"))) -(defglfun - (("TexImage3D" tex-image-3d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |TextureComponentCount| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height| |depth|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.2") :glxropcode - ("4114") :glsflags ("pixel-null" "pixel-unpack") :glsopcode ("0x013C") - :offset ("371"))) -(defglfun - (("ResetMinmax" reset-minmax) :args - ((:name |target| :type |MinmaxTarget| :direction :in)) :return ("void") - :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") :glxropcode - ("4113") :glsopcode ("0x013B") :offset ("370"))) -(defglfun - (("ResetHistogram" reset-histogram) :args - ((:name |target| :type |HistogramTarget| :direction :in)) :return ("void") - :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") :glxropcode - ("4112") :glsopcode ("0x013A") :offset ("369"))) -(defglfun - (("Minmax" minmax) :args - ((:name |target| :type |MinmaxTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |sink| :type |Boolean| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4111") :glsopcode ("0x0139") :offset ("368"))) -(defglfun - (("Histogram" histogram) :args - ((:name |target| :type |HistogramTarget| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |sink| :type |Boolean| :direction :in)) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("EXT") :version ("1.2") :glxropcode ("4110") :glsopcode ("0x0138") :offset - ("367"))) -(defglfun - (("GetMinmaxParameteriv" get-minmax-parameter-iv) :args - ((:name |target| :type |MinmaxTarget| :direction :in) - (:name |pname| :type |GetMinmaxParameterPName| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("159") :glsflags ("get") :glsopcode ("0x0269") :offset - ("366"))) -(defglfun - (("GetMinmaxParameterfv" get-minmax-parameter-fv) :args - ((:name |target| :type |MinmaxTarget| :direction :in) - (:name |pname| :type |GetMinmaxParameterPName| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("158") :glsflags ("get") :glsopcode ("0x0268") :offset - ("365"))) -(defglfun - (("GetMinmax" get-minmax) :args - ((:name |target| :type |MinmaxTarget| :direction :in) - (:name |reset| :type |Boolean| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |values| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.2") :glxsingle ("157") - :glsflags ("get" "pixel-pack") :glsopcode ("0x0267") :offset ("364"))) -(defglfun - (("GetHistogramParameteriv" get-histogram-parameter-iv) :args - ((:name |target| :type |HistogramTarget| :direction :in) - (:name |pname| :type |GetHistogramParameterPName| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("156") :glsflags ("get") :glsopcode ("0x0266") :offset - ("363"))) -(defglfun - (("GetHistogramParameterfv" get-histogram-parameter-fv) :args - ((:name |target| :type |HistogramTarget| :direction :in) - (:name |pname| :type |GetHistogramParameterPName| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("155") :glsflags ("get") :glsopcode ("0x0265") :offset - ("362"))) -(defglfun - (("GetHistogram" get-histogram) :args - ((:name |target| :type |HistogramTarget| :direction :in) - (:name |reset| :type |Boolean| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |values| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.2") :glxsingle ("154") - :glsflags ("get" "pixel-pack") :glsopcode ("0x0264") :offset ("361"))) -(defglfun - (("SeparableFilter2D" separable-filter-2d) :args - ((:name |target| :type |SeparableTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |row| :type |Void| :direction :in :array t :size - (|target| |format| |type| |width|)) - (:name |column| :type |Void| :direction :in :array t :size - (|target| |format| |type| |height|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.2") :glxropcode - ("4109") :glsflags ("pixel-unpack") :glsopcode ("0x0131") :offset ("360"))) -(defglfun - (("GetSeparableFilter" get-separable-filter) :args - ((:name |target| :type |SeparableTarget| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |row| :type |Void| :direction :out :array t :size - (|target| |format| |type|)) - (:name |column| :type |Void| :direction :out :array t :size - (|target| |format| |type|)) - (:name |span| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.2") :glxsingle ("153") - :glsflags ("get" "pixel-pack") :glsopcode ("0x0263") :offset ("359"))) -(defglfun - (("GetConvolutionParameteriv" get-convolution-parameter-iv) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |pname| :type |GetConvolutionParameterPName| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("152") :glsflags ("get") :glsopcode ("0x0262") :offset - ("358"))) -(defglfun - (("GetConvolutionParameterfv" get-convolution-parameter-fv) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |pname| :type |GetConvolutionParameterPName| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("151") :glsflags ("get") :glsopcode ("0x0261") :offset - ("357"))) -(defglfun - (("GetConvolutionFilter" get-convolution-filter) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |image| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.2") :glxsingle ("150") - :glsflags ("get" "pixel-pack") :glsopcode ("0x0260") :offset ("356"))) -(defglfun - (("CopyConvolutionFilter2D" copy-convolution-filter-2d) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4108") :glsopcode ("0x012C") :offset ("355"))) -(defglfun - (("CopyConvolutionFilter1D" copy-convolution-filter-1d) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4107") :glsopcode ("0x012B") :offset ("354"))) -(defglfun - (("ConvolutionParameteriv" convolution-parameter-iv) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |pname| :type |ConvolutionParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4106") :glsflags ("gl-enum") :glsopcode ("0x012A") :offset - ("353"))) -(defglfun - (("ConvolutionParameteri" convolution-parameter-i) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |pname| :type |ConvolutionParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4105") :glsflags ("gl-enum") :glsopcode ("0x0129") :offset - ("352"))) -(defglfun - (("ConvolutionParameterfv" convolution-parameter-fv) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |pname| :type |ConvolutionParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4104") :glsflags ("gl-enum") :glsopcode ("0x0128") :offset - ("351"))) -(defglfun - (("ConvolutionParameterf" convolution-parameter-f) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |pname| :type |ConvolutionParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4103") :glsflags ("gl-enum") :glsopcode ("0x0127") :offset - ("350"))) -(defglfun - (("ConvolutionFilter2D" convolution-filter-2d) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |image| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.2") :glxropcode - ("4102") :glsflags ("pixel-unpack") :glsopcode ("0x0126") :offset ("349"))) -(defglfun - (("ConvolutionFilter1D" convolution-filter-1d) :args - ((:name |target| :type |ConvolutionTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |image| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.2") :glxropcode - ("4101") :glsflags ("pixel-unpack") :glsopcode ("0x0125") :offset ("348"))) -(defglfun - (("CopyColorSubTable" copy-color-sub-table) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |start| :type |SizeI| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_2") :version ("1.2") :glxropcode - ("196") :glsopcode ("0x018F") :offset ("347"))) -(defglfun - (("ColorSubTable" color-sub-table) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |start| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |data| :type |Void| :direction :in :array t :size - (|format| |type| |count|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.2") :glxropcode ("195") - :glsflags ("pixel-unpack") :glsopcode ("0x018E") :offset ("346"))) -(defglfun - (("GetColorTableParameteriv" get-color-table-parameter-iv) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |pname| :type |GetColorTableParameterPName| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("149") :glsflags ("get") :glsopcode ("0x025F") :offset - ("345"))) -(defglfun - (("GetColorTableParameterfv" get-color-table-parameter-fv) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |pname| :type |GetColorTableParameterPName| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :version - ("1.2") :glxsingle ("148") :glsflags ("get") :glsopcode ("0x025E") :offset - ("344"))) -(defglfun - (("GetColorTable" get-color-table) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |table| :type |Void| :direction :out :array t :size - (|target| |format| |type|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.2") :glxsingle ("147") - :glsflags ("get" "pixel-pack") :glsopcode ("0x025D") :offset ("343"))) -(defglfun - (("CopyColorTable" copy-color-table) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("2056") :glsopcode ("0x016A") :offset ("342"))) -(defglfun - (("ColorTableParameteriv" color-table-parameter-iv) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |pname| :type |ColorTableParameterPName| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("2055") :glsopcode ("0x0169") :offset ("341"))) -(defglfun - (("ColorTableParameterfv" color-table-parameter-fv) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |pname| :type |ColorTableParameterPName| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("2054") :glsopcode ("0x0168") :offset ("340"))) -(defglfun - (("ColorTable" color-table) :args - ((:name |target| :type |ColorTableTarget| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |table| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode" "EXT") :version ("1.2") :glxropcode - ("2053") :glsflags ("pixel-unpack") :glsopcode ("0x0167") :offset ("339"))) -(defglfun - (("DrawRangeElements" draw-range-elements) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |start| :type |UInt32| :direction :in) - (:name |end| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |Void| :direction :in :array t :size - (|count| |type|))) - :return ("void") :category ("VERSION_1_2") :dlflags ("handcode") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :version ("1.2") - :glsopcode ("0x0190") :offset ("338"))) -(defglfun - (("BlendEquation" blend-equation) :args - ((:name |mode| :type |BlendEquationMode| :direction :in)) :return ("void") - :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") :glxropcode - ("4097") :glsopcode ("0x0121") :offset ("337"))) -(defglfun - (("BlendColor" blend-color) :args - ((:name |red| :type |ClampedColorF| :direction :in) - (:name |green| :type |ClampedColorF| :direction :in) - (:name |blue| :type |ClampedColorF| :direction :in) - (:name |alpha| :type |ClampedColorF| :direction :in)) - :return ("void") :category ("VERSION_1_2") :glxflags ("EXT") :version ("1.2") - :glxropcode ("4096") :glsopcode ("0x0120") :offset ("336"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; version_1_2 + +(defconstant +max-elements-vertices+ #x80E8) +(defconstant +max-elements-indices+ #x80E9) +(defconstant +pack-skip-images+ #x806B) +(defconstant +pack-image-height+ #x806C) +(defconstant +unpack-skip-images+ #x806D) +(defconstant +unpack-image-height+ #x806E) +(defconstant +texture-3d+ #x806F) +(defconstant +proxy-texture-3d+ #x8070) +(defconstant +texture-depth+ #x8071) +(defconstant +texture-wrap-r+ #x8072) +(defconstant +max-3d-texture-size+ #x8073) +(defconstant +max-elements-vertices+ #x80E8) +(defconstant +max-elements-indices+ #x80E9) +(defglfun "CopyTexSubImage3D" copy-tex-sub-image-3d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "TexSubImage3D" tex-sub-image-3d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height| |depth|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "TexImage3D" tex-image-3d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |TextureComponentCount| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height| |depth|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "ResetMinmax" reset-minmax :return "void" :args + ((:name |target| :type |MinmaxTarget| :direction :in)) :category "VERSION_1_2" + :version "1.2") +(defglfun "ResetHistogram" reset-histogram :return "void" :args + ((:name |target| :type |HistogramTarget| :direction :in)) :category + "VERSION_1_2" :version "1.2") +(defglfun "Minmax" minmax :return "void" :args + ((:name |target| :type |MinmaxTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |sink| :type |Boolean| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "Histogram" histogram :return "void" :args + ((:name |target| :type |HistogramTarget| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |sink| :type |Boolean| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetMinmaxParameteriv" get-minmax-parameter-iv :return "void" :args + ((:name |target| :type |MinmaxTarget| :direction :in) + (:name |pname| :type |GetMinmaxParameterPName| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetMinmaxParameterfv" get-minmax-parameter-fv :return "void" :args + ((:name |target| :type |MinmaxTarget| :direction :in) + (:name |pname| :type |GetMinmaxParameterPName| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetMinmax" get-minmax :return "void" :args + ((:name |target| :type |MinmaxTarget| :direction :in) + (:name |reset| :type |Boolean| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |values| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetHistogramParameteriv" get-histogram-parameter-iv :return "void" + :args + ((:name |target| :type |HistogramTarget| :direction :in) + (:name |pname| :type |GetHistogramParameterPName| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetHistogramParameterfv" get-histogram-parameter-fv :return "void" + :args + ((:name |target| :type |HistogramTarget| :direction :in) + (:name |pname| :type |GetHistogramParameterPName| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetHistogram" get-histogram :return "void" :args + ((:name |target| :type |HistogramTarget| :direction :in) + (:name |reset| :type |Boolean| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |values| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "SeparableFilter2D" separable-filter-2d :return "void" :args + ((:name |target| :type |SeparableTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |row| :type |Void| :direction :in :array t :size + (|target| |format| |type| |width|)) + (:name |column| :type |Void| :direction :in :array t :size + (|target| |format| |type| |height|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetSeparableFilter" get-separable-filter :return "void" :args + ((:name |target| :type |SeparableTarget| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |row| :type |Void| :direction :out :array t :size + (|target| |format| |type|)) + (:name |column| :type |Void| :direction :out :array t :size + (|target| |format| |type|)) + (:name |span| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetConvolutionParameteriv" get-convolution-parameter-iv :return + "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |pname| :type |GetConvolutionParameterPName| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetConvolutionParameterfv" get-convolution-parameter-fv :return + "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |pname| :type |GetConvolutionParameterPName| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetConvolutionFilter" get-convolution-filter :return "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |image| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "CopyConvolutionFilter2D" copy-convolution-filter-2d :return "void" + :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "CopyConvolutionFilter1D" copy-convolution-filter-1d :return "void" + :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "ConvolutionParameteriv" convolution-parameter-iv :return "void" + :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |pname| :type |ConvolutionParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "ConvolutionParameteri" convolution-parameter-i :return "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |pname| :type |ConvolutionParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "ConvolutionParameterfv" convolution-parameter-fv :return "void" + :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |pname| :type |ConvolutionParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "ConvolutionParameterf" convolution-parameter-f :return "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |pname| :type |ConvolutionParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "ConvolutionFilter2D" convolution-filter-2d :return "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |image| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "ConvolutionFilter1D" convolution-filter-1d :return "void" :args + ((:name |target| :type |ConvolutionTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |image| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "CopyColorSubTable" copy-color-sub-table :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |start| :type |SizeI| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "ColorSubTable" color-sub-table :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |start| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |data| :type |Void| :direction :in :array t :size + (|format| |type| |count|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetColorTableParameteriv" get-color-table-parameter-iv :return + "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |pname| :type |GetColorTableParameterPName| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetColorTableParameterfv" get-color-table-parameter-fv :return + "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |pname| :type |GetColorTableParameterPName| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "GetColorTable" get-color-table :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |table| :type |Void| :direction :out :array t :size + (|target| |format| |type|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "CopyColorTable" copy-color-table :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in)) + :category "VERSION_1_2" :version "1.2") +(defglfun "ColorTableParameteriv" color-table-parameter-iv :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |pname| :type |ColorTableParameterPName| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "ColorTableParameterfv" color-table-parameter-fv :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |pname| :type |ColorTableParameterPName| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "ColorTable" color-table :return "void" :args + ((:name |target| :type |ColorTableTarget| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |table| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "DrawRangeElements" draw-range-elements :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |start| :type |UInt32| :direction :in) + (:name |end| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |Void| :direction :in :array t :size + (|count| |type|))) + :category "VERSION_1_2" :version "1.2") +(defglfun "BlendEquation" blend-equation :return "void" :args + ((:name |mode| :type |BlendEquationMode| :direction :in)) :category + "VERSION_1_2" :version "1.2") +(defglfun "BlendColor" blend-color :return "void" :args + ((:name |red| :type |ClampedColorF| :direction :in) + (:name |green| :type |ClampedColorF| :direction :in) + (:name |blue| :type |ClampedColorF| :direction :in) + (:name |alpha| :type |ClampedColorF| :direction :in)) + :category "VERSION_1_2" :version "1.2") diff --git a/lib/opengl-version_1_3.lisp b/lib/opengl-version_1_3.lisp dissimilarity index 82% index fd4fcc9..743c398 100644 --- a/lib/opengl-version_1_3.lisp +++ b/lib/opengl-version_1_3.lisp @@ -1,461 +1,353 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; version_1_3 - -(defconstant +texture0+ #x84C0) -(defconstant +texture1+ #x84C1) -(defconstant +texture2+ #x84C2) -(defconstant +texture3+ #x84C3) -(defconstant +texture4+ #x84C4) -(defconstant +texture5+ #x84C5) -(defconstant +texture6+ #x84C6) -(defconstant +texture7+ #x84C7) -(defconstant +texture8+ #x84C8) -(defconstant +texture9+ #x84C9) -(defconstant +texture10+ #x84CA) -(defconstant +texture11+ #x84CB) -(defconstant +texture12+ #x84CC) -(defconstant +texture13+ #x84CD) -(defconstant +texture14+ #x84CE) -(defconstant +texture15+ #x84CF) -(defconstant +texture16+ #x84D0) -(defconstant +texture17+ #x84D1) -(defconstant +texture18+ #x84D2) -(defconstant +texture19+ #x84D3) -(defconstant +texture20+ #x84D4) -(defconstant +texture21+ #x84D5) -(defconstant +texture22+ #x84D6) -(defconstant +texture23+ #x84D7) -(defconstant +texture24+ #x84D8) -(defconstant +texture25+ #x84D9) -(defconstant +texture26+ #x84DA) -(defconstant +texture27+ #x84DB) -(defconstant +texture28+ #x84DC) -(defconstant +texture29+ #x84DD) -(defconstant +texture30+ #x84DE) -(defconstant +texture31+ #x84DF) -(defconstant +active-texture+ #x84E0) -(defconstant +client-active-texture+ #x84E1) -(defconstant +max-texture-units+ #x84E2) -(defconstant +transpose-modelview-matrix+ #x84E3) -(defconstant +transpose-projection-matrix+ #x84E4) -(defconstant +transpose-texture-matrix+ #x84E5) -(defconstant +transpose-color-matrix+ #x84E6) -(defconstant +multisample+ #x809D) -(defconstant +sample-alpha-to-coverage+ #x809E) -(defconstant +sample-alpha-to-one+ #x809F) -(defconstant +sample-coverage+ #x80A0) -(defconstant +sample-buffers+ #x80A8) -(defconstant +samples+ #x80A9) -(defconstant +sample-coverage-value+ #x80AA) -(defconstant +sample-coverage-invert+ #x80AB) -(defconstant +multisample-bit+ #x20000000) -(defconstant +normal-map+ #x8511) -(defconstant +reflection-map+ #x8512) -(defconstant +texture-cube-map+ #x8513) -(defconstant +texture-binding-cube-map+ #x8514) -(defconstant +texture-cube-map-positive-x+ #x8515) -(defconstant +texture-cube-map-negative-x+ #x8516) -(defconstant +texture-cube-map-positive-y+ #x8517) -(defconstant +texture-cube-map-negative-y+ #x8518) -(defconstant +texture-cube-map-positive-z+ #x8519) -(defconstant +texture-cube-map-negative-z+ #x851A) -(defconstant +proxy-texture-cube-map+ #x851B) -(defconstant +max-cube-map-texture-size+ #x851C) -(defconstant +compressed-alpha+ #x84E9) -(defconstant +compressed-luminance+ #x84EA) -(defconstant +compressed-luminance-alpha+ #x84EB) -(defconstant +compressed-intensity+ #x84EC) -(defconstant +compressed-rgb+ #x84ED) -(defconstant +compressed-rgba+ #x84EE) -(defconstant +texture-compression-hint+ #x84EF) -(defconstant +texture-compressed-image-size+ #x86A0) -(defconstant +texture-compressed+ #x86A1) -(defconstant +num-compressed-texture-formats+ #x86A2) -(defconstant +compressed-texture-formats+ #x86A3) -(defconstant +combine+ #x8570) -(defconstant +combine-rgb+ #x8571) -(defconstant +combine-alpha+ #x8572) -(defconstant +source0-rgb+ #x8580) -(defconstant +source1-rgb+ #x8581) -(defconstant +source2-rgb+ #x8582) -(defconstant +source0-alpha+ #x8588) -(defconstant +source1-alpha+ #x8589) -(defconstant +source2-alpha+ #x858A) -(defconstant +operand0-rgb+ #x8590) -(defconstant +operand1-rgb+ #x8591) -(defconstant +operand2-rgb+ #x8592) -(defconstant +operand0-alpha+ #x8598) -(defconstant +operand1-alpha+ #x8599) -(defconstant +operand2-alpha+ #x859A) -(defconstant +rgb-scale+ #x8573) -(defconstant +add-signed+ #x8574) -(defconstant +interpolate+ #x8575) -(defconstant +subtract+ #x84E7) -(defconstant +constant+ #x8576) -(defconstant +primary-color+ #x8577) -(defconstant +previous+ #x8578) -(defconstant +dot3-rgb+ #x86AE) -(defconstant +dot3-rgba+ #x86AF) -(defglfun - (("GetCompressedTexImage" get-compressed-tex-image) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |img| :type |CompressedTextureARB| :direction :out :array t :size - (|target| |level|))) - :return ("void") :category ("VERSION_1_3") :dlflags ("notlistable") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxsingle - ("160") :glsflags ("get") :glsopcode ("0x01CF") :wglflags - ("client-handcode" "server-handcode") :offset ("560"))) -(defglfun - (("CompressedTexSubImage1D" compressed-tex-sub-image-1d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("VERSION_1_3") :dlflags ("handcode") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxropcode - ("217") :glsopcode ("0x01CE") :wglflags ("client-handcode" "server-handcode") - :offset ("559"))) -(defglfun - (("CompressedTexSubImage2D" compressed-tex-sub-image-2d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("VERSION_1_3") :dlflags ("handcode") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxropcode - ("218") :glsopcode ("0x01CD") :wglflags ("client-handcode" "server-handcode") - :offset ("558"))) -(defglfun - (("CompressedTexSubImage3D" compressed-tex-sub-image-3d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |xoffset| :type |CheckedInt32| :direction :in) - (:name |yoffset| :type |CheckedInt32| :direction :in) - (:name |zoffset| :type |CheckedInt32| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("VERSION_1_3") :dlflags ("handcode") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxropcode - ("219") :glsopcode ("0x01CC") :wglflags ("client-handcode" "server-handcode") - :offset ("557"))) -(defglfun - (("CompressedTexImage1D" compressed-tex-image-1d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("VERSION_1_3") :dlflags ("handcode") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxropcode - ("214") :glsopcode ("0x01CB") :wglflags ("client-handcode" "server-handcode") - :offset ("556"))) -(defglfun - (("CompressedTexImage2D" compressed-tex-image-2d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("VERSION_1_3") :dlflags ("handcode") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxropcode - ("215") :glsopcode ("0x01CA") :wglflags ("client-handcode" "server-handcode") - :offset ("555"))) -(defglfun - (("CompressedTexImage3D" compressed-tex-image-3d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |PixelInternalFormat| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |depth| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |imageSize| :type |SizeI| :direction :in) - (:name |data| :type |CompressedTextureARB| :direction :in :array t :size - imagesize)) - :return ("void") :category ("VERSION_1_3") :dlflags ("handcode") :glxflags - ("ARB" "client-handcode" "server-handcode") :version ("1.3") :glxropcode - ("216") :glsopcode ("0x01C9") :wglflags ("client-handcode" "server-handcode") - :offset ("554"))) -(defglfun - (("SampleCoverage" sample-coverage) :args - ((:name |value| :type |ClampedFloat32| :direction :in) - (:name |invert| :type |Boolean| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("229") :glsopcode ("0x01C7") :offset ("412"))) -(defglfun - (("MultTransposeMatrixd" mult-transpose-matrix-d) :args - ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :return - ("void") :category ("VERSION_1_3") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.3") :glsflags ("matrix") :glsopcode ("0x01C6") :offset ("411"))) -(defglfun - (("MultTransposeMatrixf" mult-transpose-matrix-f) :args - ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :return - ("void") :category ("VERSION_1_3") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.3") :glsflags ("matrix") :glsopcode ("0x01C5") :offset ("410"))) -(defglfun - (("LoadTransposeMatrixd" load-transpose-matrix-d) :args - ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :return - ("void") :category ("VERSION_1_3") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.3") :glsflags ("matrix") :glsopcode ("0x01C4") :offset ("409"))) -(defglfun - (("LoadTransposeMatrixf" load-transpose-matrix-f) :args - ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :return - ("void") :category ("VERSION_1_3") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.3") :glsflags ("matrix") :glsopcode ("0x01C3") :offset ("408"))) -(defglfun - (("MultiTexCoord4sv" multi-tex-coord-4sv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("213") :glsopcode ("0x01C2") :offset ("407"))) -(defglfun - (("MultiTexCoord4s" multi-tex-coord-4s) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in) - (:name |r| :type |CoordS| :direction :in) - (:name |q| :type |CoordS| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord4sv") :offset ("406"))) -(defglfun - (("MultiTexCoord4iv" multi-tex-coord-4iv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("212") :glsopcode ("0x01C1") :offset ("405"))) -(defglfun - (("MultiTexCoord4i" multi-tex-coord-4i) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in) - (:name |r| :type |CoordI| :direction :in) - (:name |q| :type |CoordI| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord4iv") :offset ("404"))) -(defglfun - (("MultiTexCoord4fv" multi-tex-coord-4fv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("211") :glsopcode ("0x01C0") :offset ("403"))) -(defglfun - (("MultiTexCoord4f" multi-tex-coord-4f) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in) - (:name |r| :type |CoordF| :direction :in) - (:name |q| :type |CoordF| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord4fv") :offset ("402"))) -(defglfun - (("MultiTexCoord4dv" multi-tex-coord-4dv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("210") :glsopcode ("0x01BF") :offset ("401"))) -(defglfun - (("MultiTexCoord4d" multi-tex-coord-4d) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in) - (:name |r| :type |CoordD| :direction :in) - (:name |q| :type |CoordD| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord4dv") :offset ("400"))) -(defglfun - (("MultiTexCoord3sv" multi-tex-coord-3sv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_1_3") :version ("1.3") :glxflags ("ARB") - :glxropcode ("209") :glsopcode ("0x01BE") :offset ("399"))) -(defglfun - (("MultiTexCoord3s" multi-tex-coord-3s) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in) - (:name |r| :type |CoordS| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord3sv") :offset ("398"))) -(defglfun - (("MultiTexCoord3iv" multi-tex-coord-3iv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("208") :glsopcode ("0x01BD") :offset ("397"))) -(defglfun - (("MultiTexCoord3i" multi-tex-coord-3i) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in) - (:name |r| :type |CoordI| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord3iv") :offset ("396"))) -(defglfun - (("MultiTexCoord3fv" multi-tex-coord-3fv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("207") :glsopcode ("0x01BC") :offset ("395"))) -(defglfun - (("MultiTexCoord3f" multi-tex-coord-3f) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in) - (:name |r| :type |CoordF| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord3fv") :offset ("394"))) -(defglfun - (("MultiTexCoord3dv" multi-tex-coord-3dv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("206") :glsopcode ("0x01BB") :offset ("393"))) -(defglfun - (("MultiTexCoord3d" multi-tex-coord-3d) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in) - (:name |r| :type |CoordD| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord3dv") :offset ("392"))) -(defglfun - (("MultiTexCoord2sv" multi-tex-coord-2sv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("205") :glsopcode ("0x01BA") :offset ("391"))) -(defglfun - (("MultiTexCoord2s" multi-tex-coord-2s) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord2sv") :offset ("390"))) -(defglfun - (("MultiTexCoord2iv" multi-tex-coord-2iv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("204") :glsopcode ("0x01B9") :offset ("389"))) -(defglfun - (("MultiTexCoord2i" multi-tex-coord-2i) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord2iv") :offset ("388"))) -(defglfun - (("MultiTexCoord2fv" multi-tex-coord-2fv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("203") :glsopcode ("0x01B8") :offset ("387"))) -(defglfun - (("MultiTexCoord2f" multi-tex-coord-2f) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord2fv") :offset ("386"))) -(defglfun - (("MultiTexCoord2dv" multi-tex-coord-2dv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("202") :glsopcode ("0x01B7") :offset ("385"))) -(defglfun - (("MultiTexCoord2d" multi-tex-coord-2d) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord2dv") :offset ("384"))) -(defglfun - (("MultiTexCoord1sv" multi-tex-coord-1sv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordS| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("201") :glsopcode ("0x01B6") :offset ("383"))) -(defglfun - (("MultiTexCoord1s" multi-tex-coord-1s) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordS| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord1sv") :offset ("382"))) -(defglfun - (("MultiTexCoord1iv" multi-tex-coord-1iv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordI| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("200") :glsopcode ("0x01B5") :offset ("381"))) -(defglfun - (("MultiTexCoord1i" multi-tex-coord-1i) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordI| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord1iv") :offset ("380"))) -(defglfun - (("MultiTexCoord1fv" multi-tex-coord-1fv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordF| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("199") :glsopcode ("0x01B4") :offset ("379"))) -(defglfun - (("MultiTexCoord1f" multi-tex-coord-1f) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordF| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord1fv") :offset ("378"))) -(defglfun - (("MultiTexCoord1dv" multi-tex-coord-1dv) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |v| :type |CoordD| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :glxropcode ("198") :glsopcode ("0x01B3") :offset ("377"))) -(defglfun - (("MultiTexCoord1d" multi-tex-coord-1d) :args - ((:name |target| :type |TextureUnit| :direction :in) - (:name |s| :type |CoordD| :direction :in)) - :return ("void") :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") - :vectorequiv ("MultiTexCoord1dv") :offset ("376"))) -(defglfun - (("ClientActiveTexture" client-active-texture) :args - ((:name |texture| :type |TextureUnit| :direction :in)) :return ("void") - :category ("VERSION_1_3") :dlflags ("notlistable") :glxflags - ("ARB" "client-handcode" "client-intercept" "server-handcode") :version - ("1.3") :glsflags ("client") :glsopcode ("0x01B2") :offset ("375"))) -(defglfun - (("ActiveTexture" active-texture) :args - ((:name |texture| :type |TextureUnit| :direction :in)) :return ("void") - :category ("VERSION_1_3") :glxflags ("ARB") :version ("1.3") :glxropcode - ("197") :glsopcode ("0x01B1") :offset ("374"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; version_1_3 + +(defconstant +texture0+ #x84C0) +(defconstant +texture1+ #x84C1) +(defconstant +texture2+ #x84C2) +(defconstant +texture3+ #x84C3) +(defconstant +texture4+ #x84C4) +(defconstant +texture5+ #x84C5) +(defconstant +texture6+ #x84C6) +(defconstant +texture7+ #x84C7) +(defconstant +texture8+ #x84C8) +(defconstant +texture9+ #x84C9) +(defconstant +texture10+ #x84CA) +(defconstant +texture11+ #x84CB) +(defconstant +texture12+ #x84CC) +(defconstant +texture13+ #x84CD) +(defconstant +texture14+ #x84CE) +(defconstant +texture15+ #x84CF) +(defconstant +texture16+ #x84D0) +(defconstant +texture17+ #x84D1) +(defconstant +texture18+ #x84D2) +(defconstant +texture19+ #x84D3) +(defconstant +texture20+ #x84D4) +(defconstant +texture21+ #x84D5) +(defconstant +texture22+ #x84D6) +(defconstant +texture23+ #x84D7) +(defconstant +texture24+ #x84D8) +(defconstant +texture25+ #x84D9) +(defconstant +texture26+ #x84DA) +(defconstant +texture27+ #x84DB) +(defconstant +texture28+ #x84DC) +(defconstant +texture29+ #x84DD) +(defconstant +texture30+ #x84DE) +(defconstant +texture31+ #x84DF) +(defconstant +active-texture+ #x84E0) +(defconstant +client-active-texture+ #x84E1) +(defconstant +max-texture-units+ #x84E2) +(defconstant +transpose-modelview-matrix+ #x84E3) +(defconstant +transpose-projection-matrix+ #x84E4) +(defconstant +transpose-texture-matrix+ #x84E5) +(defconstant +transpose-color-matrix+ #x84E6) +(defconstant +multisample+ #x809D) +(defconstant +sample-alpha-to-coverage+ #x809E) +(defconstant +sample-alpha-to-one+ #x809F) +(defconstant +sample-coverage+ #x80A0) +(defconstant +sample-buffers+ #x80A8) +(defconstant +samples+ #x80A9) +(defconstant +sample-coverage-value+ #x80AA) +(defconstant +sample-coverage-invert+ #x80AB) +(defconstant +multisample-bit+ #x20000000) +(defconstant +normal-map+ #x8511) +(defconstant +reflection-map+ #x8512) +(defconstant +texture-cube-map+ #x8513) +(defconstant +texture-binding-cube-map+ #x8514) +(defconstant +texture-cube-map-positive-x+ #x8515) +(defconstant +texture-cube-map-negative-x+ #x8516) +(defconstant +texture-cube-map-positive-y+ #x8517) +(defconstant +texture-cube-map-negative-y+ #x8518) +(defconstant +texture-cube-map-positive-z+ #x8519) +(defconstant +texture-cube-map-negative-z+ #x851A) +(defconstant +proxy-texture-cube-map+ #x851B) +(defconstant +max-cube-map-texture-size+ #x851C) +(defconstant +compressed-alpha+ #x84E9) +(defconstant +compressed-luminance+ #x84EA) +(defconstant +compressed-luminance-alpha+ #x84EB) +(defconstant +compressed-intensity+ #x84EC) +(defconstant +compressed-rgb+ #x84ED) +(defconstant +compressed-rgba+ #x84EE) +(defconstant +texture-compression-hint+ #x84EF) +(defconstant +texture-compressed-image-size+ #x86A0) +(defconstant +texture-compressed+ #x86A1) +(defconstant +num-compressed-texture-formats+ #x86A2) +(defconstant +compressed-texture-formats+ #x86A3) +(defconstant +combine+ #x8570) +(defconstant +combine-rgb+ #x8571) +(defconstant +combine-alpha+ #x8572) +(defconstant +source0-rgb+ #x8580) +(defconstant +source1-rgb+ #x8581) +(defconstant +source2-rgb+ #x8582) +(defconstant +source0-alpha+ #x8588) +(defconstant +source1-alpha+ #x8589) +(defconstant +source2-alpha+ #x858A) +(defconstant +operand0-rgb+ #x8590) +(defconstant +operand1-rgb+ #x8591) +(defconstant +operand2-rgb+ #x8592) +(defconstant +operand0-alpha+ #x8598) +(defconstant +operand1-alpha+ #x8599) +(defconstant +operand2-alpha+ #x859A) +(defconstant +rgb-scale+ #x8573) +(defconstant +add-signed+ #x8574) +(defconstant +interpolate+ #x8575) +(defconstant +subtract+ #x84E7) +(defconstant +constant+ #x8576) +(defconstant +primary-color+ #x8577) +(defconstant +previous+ #x8578) +(defconstant +dot3-rgb+ #x86AE) +(defconstant +dot3-rgba+ #x86AF) +(defglfun "GetCompressedTexImage" get-compressed-tex-image :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |img| :type |CompressedTextureARB| :direction :out :array t :size + (|target| |level|))) + :category "VERSION_1_3" :version "1.3") +(defglfun "CompressedTexSubImage1D" compressed-tex-sub-image-1d :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "VERSION_1_3" :version "1.3") +(defglfun "CompressedTexSubImage2D" compressed-tex-sub-image-2d :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "VERSION_1_3" :version "1.3") +(defglfun "CompressedTexSubImage3D" compressed-tex-sub-image-3d :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |xoffset| :type |CheckedInt32| :direction :in) + (:name |yoffset| :type |CheckedInt32| :direction :in) + (:name |zoffset| :type |CheckedInt32| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "VERSION_1_3" :version "1.3") +(defglfun "CompressedTexImage1D" compressed-tex-image-1d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "VERSION_1_3" :version "1.3") +(defglfun "CompressedTexImage2D" compressed-tex-image-2d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "VERSION_1_3" :version "1.3") +(defglfun "CompressedTexImage3D" compressed-tex-image-3d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |PixelInternalFormat| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |depth| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |imageSize| :type |SizeI| :direction :in) + (:name |data| :type |CompressedTextureARB| :direction :in :array t :size + imagesize)) + :category "VERSION_1_3" :version "1.3") +(defglfun "SampleCoverage" sample-coverage :return "void" :args + ((:name |value| :type |ClampedFloat32| :direction :in) + (:name |invert| :type |Boolean| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultTransposeMatrixd" mult-transpose-matrix-d :return "void" :args + ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :category + "VERSION_1_3" :version "1.3") +(defglfun "MultTransposeMatrixf" mult-transpose-matrix-f :return "void" :args + ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :category + "VERSION_1_3" :version "1.3") +(defglfun "LoadTransposeMatrixd" load-transpose-matrix-d :return "void" :args + ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :category + "VERSION_1_3" :version "1.3") +(defglfun "LoadTransposeMatrixf" load-transpose-matrix-f :return "void" :args + ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :category + "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4sv" multi-tex-coord-4sv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x4)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4s" multi-tex-coord-4s :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in) + (:name |r| :type |CoordS| :direction :in) + (:name |q| :type |CoordS| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4iv" multi-tex-coord-4iv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x4)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4i" multi-tex-coord-4i :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in) + (:name |r| :type |CoordI| :direction :in) + (:name |q| :type |CoordI| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4fv" multi-tex-coord-4fv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x4)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4f" multi-tex-coord-4f :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in) + (:name |r| :type |CoordF| :direction :in) + (:name |q| :type |CoordF| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4dv" multi-tex-coord-4dv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x4)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord4d" multi-tex-coord-4d :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in) + (:name |r| :type |CoordD| :direction :in) + (:name |q| :type |CoordD| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3sv" multi-tex-coord-3sv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x3)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3s" multi-tex-coord-3s :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in) + (:name |r| :type |CoordS| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3iv" multi-tex-coord-3iv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x3)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3i" multi-tex-coord-3i :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in) + (:name |r| :type |CoordI| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3fv" multi-tex-coord-3fv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x3)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3f" multi-tex-coord-3f :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in) + (:name |r| :type |CoordF| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3dv" multi-tex-coord-3dv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x3)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord3d" multi-tex-coord-3d :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in) + (:name |r| :type |CoordD| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2sv" multi-tex-coord-2sv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x2)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2s" multi-tex-coord-2s :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2iv" multi-tex-coord-2iv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x2)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2i" multi-tex-coord-2i :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2fv" multi-tex-coord-2fv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x2)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2f" multi-tex-coord-2f :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2dv" multi-tex-coord-2dv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x2)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord2d" multi-tex-coord-2d :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1sv" multi-tex-coord-1sv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordS| :direction :in :array t :size #x1)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1s" multi-tex-coord-1s :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordS| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1iv" multi-tex-coord-1iv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordI| :direction :in :array t :size #x1)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1i" multi-tex-coord-1i :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordI| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1fv" multi-tex-coord-1fv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordF| :direction :in :array t :size #x1)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1f" multi-tex-coord-1f :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordF| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1dv" multi-tex-coord-1dv :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |v| :type |CoordD| :direction :in :array t :size #x1)) + :category "VERSION_1_3" :version "1.3") +(defglfun "MultiTexCoord1d" multi-tex-coord-1d :return "void" :args + ((:name |target| :type |TextureUnit| :direction :in) + (:name |s| :type |CoordD| :direction :in)) + :category "VERSION_1_3" :version "1.3") +(defglfun "ClientActiveTexture" client-active-texture :return "void" :args + ((:name |texture| :type |TextureUnit| :direction :in)) :category "VERSION_1_3" + :version "1.3") +(defglfun "ActiveTexture" active-texture :return "void" :args + ((:name |texture| :type |TextureUnit| :direction :in)) :category "VERSION_1_3" + :version "1.3") diff --git a/lib/opengl-version_1_4.lisp b/lib/opengl-version_1_4.lisp dissimilarity index 89% index c953bb8..08c6569 100644 --- a/lib/opengl-version_1_4.lisp +++ b/lib/opengl-version_1_4.lisp @@ -1,326 +1,226 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; version_1_4 - -(defconstant +blend-dst-rgb+ #x80C8) -(defconstant +blend-src-rgb+ #x80C9) -(defconstant +blend-dst-alpha+ #x80CA) -(defconstant +blend-src-alpha+ #x80CB) -(defconstant +point-size-min+ #x8126) -(defconstant +point-size-max+ #x8127) -(defconstant +point-fade-threshold-size+ #x8128) -(defconstant +point-distance-attenuation+ #x8129) -(defconstant +mirrored-repeat+ #x8370) -(defconstant +fog-coordinate-source+ #x8450) -(defconstant +fog-coordinate+ #x8451) -(defconstant +fragment-depth+ #x8452) -(defconstant +current-fog-coordinate+ #x8453) -(defconstant +fog-coordinate-array-type+ #x8454) -(defconstant +fog-coordinate-array-stride+ #x8455) -(defconstant +fog-coordinate-array-pointer+ #x8456) -(defconstant +fog-coordinate-array+ #x8457) -(defconstant +color-sum+ #x8458) -(defconstant +current-secondary-color+ #x8459) -(defconstant +secondary-color-array-size+ #x845A) -(defconstant +secondary-color-array-type+ #x845B) -(defconstant +secondary-color-array-stride+ #x845C) -(defconstant +secondary-color-array-pointer+ #x845D) -(defconstant +secondary-color-array+ #x845E) -(defconstant +max-texture-lod-bias+ #x84FD) -(defconstant +texture-filter-control+ #x8500) -(defconstant +texture-lod-bias+ #x8501) -(defconstant +incr-wrap+ #x8507) -(defconstant +decr-wrap+ #x8508) -(defconstant +texture-depth-size+ #x884A) -(defconstant +depth-texture-mode+ #x884B) -(defconstant +texture-compare-mode+ #x884C) -(defconstant +texture-compare-func+ #x884D) -(defconstant +compare-r-to-texture+ #x884E) -(defglfun - (("WindowPos3sv" window-pos-3sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F7") :offset - ("528"))) -(defglfun - (("WindowPos3s" window-pos-3s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos3sv") - :version ("1.4") :offset ("527"))) -(defglfun - (("WindowPos3iv" window-pos-3iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F6") :offset - ("526"))) -(defglfun - (("WindowPos3i" window-pos-3i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos3iv") - :version ("1.4") :offset ("525"))) -(defglfun - (("WindowPos3fv" window-pos-3fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F5") :offset - ("524"))) -(defglfun - (("WindowPos3f" window-pos-3f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos3fv") - :version ("1.4") :offset ("523"))) -(defglfun - (("WindowPos3dv" window-pos-3dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F4") :offset - ("522"))) -(defglfun - (("WindowPos3d" window-pos-3d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in)) - :return ("void") :vectorequiv ("WindowPos3dv") :category ("VERSION_1_4") - :version ("1.4") :offset ("521"))) -(defglfun - (("WindowPos2sv" window-pos-2sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F3") :offset - ("520"))) -(defglfun - (("WindowPos2s" window-pos-2s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos2sv") - :version ("1.4") :offset ("519"))) -(defglfun - (("WindowPos2iv" window-pos-2iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F2") :offset - ("518"))) -(defglfun - (("WindowPos2i" window-pos-2i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos2iv") - :version ("1.4") :offset ("517"))) -(defglfun - (("WindowPos2fv" window-pos-2fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F1") :offset - ("516"))) -(defglfun - (("WindowPos2f" window-pos-2f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos2fv") - :version ("1.4") :offset ("515"))) -(defglfun - (("WindowPos2dv" window-pos-2dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("230") - :glxflags ("client-handcode" "server-handcode") :glsopcode ("0x01F0") :offset - ("514"))) -(defglfun - (("WindowPos2d" window-pos-2d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("WindowPos2dv") - :version ("1.4") :offset ("513"))) -(defglfun - (("SecondaryColorPointer" secondary-color-pointer) :args - ((:name |size| :type |Int32| :direction :in) - (:name |type| :type |ColorPointerType| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :category ("VERSION_1_4") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.4") :extension nil - :glsflags ("client") :glsopcode ("0x0205") :offset ("577"))) -(defglfun - (("SecondaryColor3usv" secondary-color-3usv) :args - ((:name |v| :type |ColorUS| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4132") - :glsopcode ("0x0204") :offset ("576"))) -(defglfun - (("SecondaryColor3us" secondary-color-3us) :args - ((:name |red| :type |ColorUS| :direction :in) - (:name |green| :type |ColorUS| :direction :in) - (:name |blue| :type |ColorUS| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv - ("SecondaryColor3usv") :version ("1.4") :offset ("575"))) -(defglfun - (("SecondaryColor3uiv" secondary-color-3uiv) :args - ((:name |v| :type |ColorUI| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4133") - :glsopcode ("0x0203") :offset ("574"))) -(defglfun - (("SecondaryColor3ui" secondary-color-3ui) :args - ((:name |red| :type |ColorUI| :direction :in) - (:name |green| :type |ColorUI| :direction :in) - (:name |blue| :type |ColorUI| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv - ("SecondaryColor3uiv") :version ("1.4") :offset ("573"))) -(defglfun - (("SecondaryColor3ubv" secondary-color-3ubv) :args - ((:name |v| :type |ColorUB| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4131") - :glsopcode ("0x0202") :offset ("572"))) -(defglfun - (("SecondaryColor3ub" secondary-color-3ub) :args - ((:name |red| :type |ColorUB| :direction :in) - (:name |green| :type |ColorUB| :direction :in) - (:name |blue| :type |ColorUB| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv - ("SecondaryColor3ubv") :version ("1.4") :offset ("571"))) -(defglfun - (("SecondaryColor3sv" secondary-color-3sv) :args - ((:name |v| :type |ColorS| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4127") - :glsopcode ("0x0201") :offset ("570"))) -(defglfun - (("SecondaryColor3s" secondary-color-3s) :args - ((:name |red| :type |ColorS| :direction :in) - (:name |green| :type |ColorS| :direction :in) - (:name |blue| :type |ColorS| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("SecondaryColor3sv") - :version ("1.4") :offset ("569"))) -(defglfun - (("SecondaryColor3iv" secondary-color-3iv) :args - ((:name |v| :type |ColorI| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4128") - :glsopcode ("0x0200") :offset ("568"))) -(defglfun - (("SecondaryColor3i" secondary-color-3i) :args - ((:name |red| :type |ColorI| :direction :in) - (:name |green| :type |ColorI| :direction :in) - (:name |blue| :type |ColorI| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("SecondaryColor3iv") - :version ("1.4") :offset ("567"))) -(defglfun - (("SecondaryColor3fv" secondary-color-3fv) :args - ((:name |v| :type |ColorF| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4129") - :glsopcode ("0x01FF") :offset ("566"))) -(defglfun - (("SecondaryColor3f" secondary-color-3f) :args - ((:name |red| :type |ColorF| :direction :in) - (:name |green| :type |ColorF| :direction :in) - (:name |blue| :type |ColorF| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("SecondaryColor3fv") - :version ("1.4") :offset ("565"))) -(defglfun - (("SecondaryColor3dv" secondary-color-3dv) :args - ((:name |v| :type |ColorD| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4130") - :glsopcode ("0x01FE") :offset ("564"))) -(defglfun - (("SecondaryColor3d" secondary-color-3d) :args - ((:name |red| :type |ColorD| :direction :in) - (:name |green| :type |ColorD| :direction :in) - (:name |blue| :type |ColorD| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("SecondaryColor3dv") - :version ("1.4") :offset ("563"))) -(defglfun - (("SecondaryColor3bv" secondary-color-3bv) :args - ((:name |v| :type |ColorB| :direction :in :array t :size #x3)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4126") - :glsopcode ("0x01FD") :offset ("562"))) -(defglfun - (("SecondaryColor3b" secondary-color-3b) :args - ((:name |red| :type |ColorB| :direction :in) - (:name |green| :type |ColorB| :direction :in) - (:name |blue| :type |ColorB| :direction :in)) - :return ("void") :category ("VERSION_1_4") :vectorequiv ("SecondaryColor3bv") - :version ("1.4") :offset ("561"))) -(defglfun - (("PointParameteriv" point-parameter-iv) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_4") :version ("1.4") :extension - ("soft" "WINSOFT" "NV20") :glxropcode ("4222re") :glsflags ("ignore") :offset - ("643"))) -(defglfun - (("PointParameteri" point-parameter-i) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("VERSION_1_4") :version ("1.4") :extension - ("soft" "WINSOFT" "NV20") :glxropcode ("4221") :glsflags ("ignore") :offset - ("642"))) -(defglfun - (("PointParameterfv" point-parameter-fv) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode - ("2066") :extension nil :glsopcode ("0x0178") :offset ("459"))) -(defglfun - (("PointParameterf" point-parameter-f) :args - ((:name |pname| :type |PointParameterNameARB| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode - ("2065") :extension nil :glsopcode ("0x0177") :offset ("458"))) -(defglfun - (("MultiDrawElements" multi-draw-elements) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) - (:name |type| :type |DrawElementsType| :direction :in) - (:name |indices| :type |VoidPointer| :direction :in :array t :size - (|primcount|)) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("?") - :glsflags ("ignore") :offset ("645"))) -(defglfun - (("MultiDrawArrays" multi-draw-arrays) :args - ((:name |mode| :type |BeginMode| :direction :in) - (:name |first| :type |Int32| :direction :out :array t :size (|count|)) - (:name |count| :type |SizeI| :direction :out :array t :size (|primcount|)) - (:name |primcount| :type |SizeI| :direction :in)) - :return ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("?") - :glsflags ("ignore") :offset ("644"))) -(defglfun - (("FogCoordPointer" fog-coord-pointer) :args - ((:name |type| :type |FogPointerTypeEXT| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|type| |stride|) :retained t)) - :return ("void") :category ("VERSION_1_4") :dlflags ("notlistable") :version - ("1.4") :glxflags ("client-handcode" "server-handcode") :glsflags ("client") - :glsopcode ("0x01DB") :offset ("549"))) -(defglfun - (("FogCoorddv" fog-coord-dv) :args - ((:name |coord| :type |CoordD| :direction :in :array t :size #x1)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4125") - :glsopcode ("0x01DA") :offset ("548"))) -(defglfun - (("FogCoordd" fog-coord-d) :args - ((:name |coord| :type |CoordD| :direction :in)) :return ("void") :category - ("VERSION_1_4") :vectorequiv ("FogCoorddv") :version ("1.4") :offset ("547"))) -(defglfun - (("FogCoordfv" fog-coord-fv) :args - ((:name |coord| :type |CoordF| :direction :in :array t :size #x1)) :return - ("void") :category ("VERSION_1_4") :version ("1.4") :glxropcode ("4124") - :glsopcode ("0x01D8") :offset ("546"))) -(defglfun - (("FogCoordf" fog-coord-f) :args - ((:name |coord| :type |CoordF| :direction :in)) :return ("void") :category - ("VERSION_1_4") :vectorequiv ("FogCoordfv") :version ("1.4") :offset ("545"))) -(defglfun - (("BlendFuncSeparate" blend-func-separate) :args - ((:name |sfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |dfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |sfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in) - (:name |dfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in)) - :return ("void") :category ("VERSION_1_4") :glxropcode ("4134") :version - ("1.4") :extension nil :glsopcode ("0x01DC") :offset ("537"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; version_1_4 + +(defconstant +blend-dst-rgb+ #x80C8) +(defconstant +blend-src-rgb+ #x80C9) +(defconstant +blend-dst-alpha+ #x80CA) +(defconstant +blend-src-alpha+ #x80CB) +(defconstant +point-size-min+ #x8126) +(defconstant +point-size-max+ #x8127) +(defconstant +point-fade-threshold-size+ #x8128) +(defconstant +point-distance-attenuation+ #x8129) +(defconstant +mirrored-repeat+ #x8370) +(defconstant +fog-coordinate-source+ #x8450) +(defconstant +fog-coordinate+ #x8451) +(defconstant +fragment-depth+ #x8452) +(defconstant +current-fog-coordinate+ #x8453) +(defconstant +fog-coordinate-array-type+ #x8454) +(defconstant +fog-coordinate-array-stride+ #x8455) +(defconstant +fog-coordinate-array-pointer+ #x8456) +(defconstant +fog-coordinate-array+ #x8457) +(defconstant +color-sum+ #x8458) +(defconstant +current-secondary-color+ #x8459) +(defconstant +secondary-color-array-size+ #x845A) +(defconstant +secondary-color-array-type+ #x845B) +(defconstant +secondary-color-array-stride+ #x845C) +(defconstant +secondary-color-array-pointer+ #x845D) +(defconstant +secondary-color-array+ #x845E) +(defconstant +max-texture-lod-bias+ #x84FD) +(defconstant +texture-filter-control+ #x8500) +(defconstant +texture-lod-bias+ #x8501) +(defconstant +incr-wrap+ #x8507) +(defconstant +decr-wrap+ #x8508) +(defconstant +texture-depth-size+ #x884A) +(defconstant +depth-texture-mode+ #x884B) +(defconstant +texture-compare-mode+ #x884C) +(defconstant +texture-compare-func+ #x884D) +(defconstant +compare-r-to-texture+ #x884E) +(defglfun "WindowPos3sv" window-pos-3sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3s" window-pos-3s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3iv" window-pos-3iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3i" window-pos-3i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3fv" window-pos-3fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3f" window-pos-3f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3dv" window-pos-3dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos3d" window-pos-3d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2sv" window-pos-2sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2s" window-pos-2s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2iv" window-pos-2iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2i" window-pos-2i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2fv" window-pos-2fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2f" window-pos-2f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2dv" window-pos-2dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :category + "VERSION_1_4" :version "1.4") +(defglfun "WindowPos2d" window-pos-2d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColorPointer" secondary-color-pointer :return "void" :args + ((:name |size| :type |Int32| :direction :in) + (:name |type| :type |ColorPointerType| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3usv" secondary-color-3usv :return "void" :args + ((:name |v| :type |ColorUS| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3us" secondary-color-3us :return "void" :args + ((:name |red| :type |ColorUS| :direction :in) + (:name |green| :type |ColorUS| :direction :in) + (:name |blue| :type |ColorUS| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3uiv" secondary-color-3uiv :return "void" :args + ((:name |v| :type |ColorUI| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3ui" secondary-color-3ui :return "void" :args + ((:name |red| :type |ColorUI| :direction :in) + (:name |green| :type |ColorUI| :direction :in) + (:name |blue| :type |ColorUI| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3ubv" secondary-color-3ubv :return "void" :args + ((:name |v| :type |ColorUB| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3ub" secondary-color-3ub :return "void" :args + ((:name |red| :type |ColorUB| :direction :in) + (:name |green| :type |ColorUB| :direction :in) + (:name |blue| :type |ColorUB| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3sv" secondary-color-3sv :return "void" :args + ((:name |v| :type |ColorS| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3s" secondary-color-3s :return "void" :args + ((:name |red| :type |ColorS| :direction :in) + (:name |green| :type |ColorS| :direction :in) + (:name |blue| :type |ColorS| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3iv" secondary-color-3iv :return "void" :args + ((:name |v| :type |ColorI| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3i" secondary-color-3i :return "void" :args + ((:name |red| :type |ColorI| :direction :in) + (:name |green| :type |ColorI| :direction :in) + (:name |blue| :type |ColorI| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3fv" secondary-color-3fv :return "void" :args + ((:name |v| :type |ColorF| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3f" secondary-color-3f :return "void" :args + ((:name |red| :type |ColorF| :direction :in) + (:name |green| :type |ColorF| :direction :in) + (:name |blue| :type |ColorF| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3dv" secondary-color-3dv :return "void" :args + ((:name |v| :type |ColorD| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3d" secondary-color-3d :return "void" :args + ((:name |red| :type |ColorD| :direction :in) + (:name |green| :type |ColorD| :direction :in) + (:name |blue| :type |ColorD| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3bv" secondary-color-3bv :return "void" :args + ((:name |v| :type |ColorB| :direction :in :array t :size #x3)) :category + "VERSION_1_4" :version "1.4") +(defglfun "SecondaryColor3b" secondary-color-3b :return "void" :args + ((:name |red| :type |ColorB| :direction :in) + (:name |green| :type |ColorB| :direction :in) + (:name |blue| :type |ColorB| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "PointParameteriv" point-parameter-iv :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) + :category "VERSION_1_4" :version "1.4") +(defglfun "PointParameteri" point-parameter-i :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "PointParameterfv" point-parameter-fv :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "VERSION_1_4" :version "1.4") +(defglfun "PointParameterf" point-parameter-f :return "void" :args + ((:name |pname| :type |PointParameterNameARB| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "MultiDrawElements" multi-draw-elements :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |count| :type |SizeI| :direction :in :array t :size (|primcount|)) + (:name |type| :type |DrawElementsType| :direction :in) + (:name |indices| :type |VoidPointer| :direction :in :array t :size + (|primcount|)) + (:name |primcount| :type |SizeI| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "MultiDrawArrays" multi-draw-arrays :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in) + (:name |first| :type |Int32| :direction :out :array t :size (|count|)) + (:name |count| :type |SizeI| :direction :out :array t :size (|primcount|)) + (:name |primcount| :type |SizeI| :direction :in)) + :category "VERSION_1_4" :version "1.4") +(defglfun "FogCoordPointer" fog-coord-pointer :return "void" :args + ((:name |type| :type |FogPointerTypeEXT| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size (|type| |stride|) + :retained t)) + :category "VERSION_1_4" :version "1.4") +(defglfun "FogCoorddv" fog-coord-dv :return "void" :args + ((:name |coord| :type |CoordD| :direction :in :array t :size #x1)) :category + "VERSION_1_4" :version "1.4") +(defglfun "FogCoordd" fog-coord-d :return "void" :args + ((:name |coord| :type |CoordD| :direction :in)) :category "VERSION_1_4" + :version "1.4") +(defglfun "FogCoordfv" fog-coord-fv :return "void" :args + ((:name |coord| :type |CoordF| :direction :in :array t :size #x1)) :category + "VERSION_1_4" :version "1.4") +(defglfun "FogCoordf" fog-coord-f :return "void" :args + ((:name |coord| :type |CoordF| :direction :in)) :category "VERSION_1_4" + :version "1.4") +(defglfun "BlendFuncSeparate" blend-func-separate :return "void" :args + ((:name |sfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |dfactorRGB| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |sfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in) + (:name |dfactorAlpha| :type |BlendFuncSeparateParameterEXT| :direction :in)) + :category "VERSION_1_4" :version "1.4") diff --git a/lib/opengl-version_1_5.lisp b/lib/opengl-version_1_5.lisp dissimilarity index 74% index ef58a53..fdc5ad6 100644 --- a/lib/opengl-version_1_5.lisp +++ b/lib/opengl-version_1_5.lisp @@ -1,180 +1,139 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; version_1_5 - -(defconstant +buffer-size+ #x8764) -(defconstant +buffer-usage+ #x8765) -(defconstant +query-counter-bits+ #x8864) -(defconstant +current-query+ #x8865) -(defconstant +query-result+ #x8866) -(defconstant +query-result-available+ #x8867) -(defconstant +array-buffer+ #x8892) -(defconstant +element-array-buffer+ #x8893) -(defconstant +array-buffer-binding+ #x8894) -(defconstant +element-array-buffer-binding+ #x8895) -(defconstant +vertex-array-buffer-binding+ #x8896) -(defconstant +normal-array-buffer-binding+ #x8897) -(defconstant +color-array-buffer-binding+ #x8898) -(defconstant +index-array-buffer-binding+ #x8899) -(defconstant +texture-coord-array-buffer-binding+ #x889A) -(defconstant +edge-flag-array-buffer-binding+ #x889B) -(defconstant +secondary-color-array-buffer-binding+ #x889C) -(defconstant +fog-coordinate-array-buffer-binding+ #x889D) -(defconstant +weight-array-buffer-binding+ #x889E) -(defconstant +vertex-attrib-array-buffer-binding+ #x889F) -(defconstant +read-only+ #x88B8) -(defconstant +write-only+ #x88B9) -(defconstant +read-write+ #x88BA) -(defconstant +buffer-access+ #x88BB) -(defconstant +buffer-mapped+ #x88BC) -(defconstant +buffer-map-pointer+ #x88BD) -(defconstant +stream-draw+ #x88E0) -(defconstant +stream-read+ #x88E1) -(defconstant +stream-copy+ #x88E2) -(defconstant +static-draw+ #x88E4) -(defconstant +static-read+ #x88E5) -(defconstant +static-copy+ #x88E6) -(defconstant +dynamic-draw+ #x88E8) -(defconstant +dynamic-read+ #x88E9) -(defconstant +dynamic-copy+ #x88EA) -(defconstant +samples-passed+ #x8914) -(defconstant +fog-coord-src+ #x8450) -(defconstant +fog-coord+ #x8451) -(defconstant +current-fog-coord+ #x8453) -(defconstant +fog-coord-array-type+ #x8454) -(defconstant +fog-coord-array-stride+ #x8455) -(defconstant +fog-coord-array-pointer+ #x8456) -(defconstant +fog-coord-array+ #x8457) -(defconstant +fog-coord-array-buffer-binding+ #x889D) -(defconstant +src0-rgb+ #x8580) -(defconstant +src1-rgb+ #x8581) -(defconstant +src2-rgb+ #x8582) -(defconstant +src0-alpha+ #x8588) -(defconstant +src1-alpha+ #x8589) -(defconstant +src2-alpha+ #x858A) -(defglfun - (("GetBufferPointerv" get-buffer-pointerv) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |pname| :type |BufferPointerNameARB| :direction :in) - (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :category ("VERSION_1_5") :dlflags ("notlistable") :version - ("1.5") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("694"))) -(defglfun - (("GetBufferParameteriv" get-buffer-parameter-iv) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |pname| :type |BufferPNameARB| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("VERSION_1_5") :dlflags ("notlistable") :version - ("1.5") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("693"))) -(defglfun - (("UnmapBuffer" unmap-buffer) :args - ((:name |target| :type |BufferTargetARB| :direction :in)) :return ("Boolean") - :category ("VERSION_1_5") :version ("1.5") :extension nil :glxropcode ("?") - :glxflags ("ignore") :glsopcode ("?") :offset ("698"))) -(defglfun - (("MapBuffer" map-buffer) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |access| :type |BufferAccessARB| :direction :in)) - :return ("VoidPointer") :category ("VERSION_1_5") :version ("1.5") :extension - nil :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("697"))) -(defglfun - (("GetBufferSubData" get-buffer-sub-data) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |offset| :type |BufferOffset| :direction :in) - (:name |size| :type |BufferSize| :direction :in) - (:name |data| :type |Void| :direction :out :array t :size size)) - :return ("void") :category ("VERSION_1_5") :dlflags ("notlistable") :version - ("1.5") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("695"))) -(defglfun - (("BufferSubData" buffer-sub-data) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |offset| :type |BufferOffset| :direction :in) - (:name |size| :type |BufferSize| :direction :in) - (:name |data| :type |ConstVoid| :direction :in :array t :size size)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("690"))) -(defglfun - (("BufferData" buffer-data) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |size| :type |BufferSize| :direction :in) - (:name |data| :type |ConstVoid| :direction :in :array t :size size) - (:name |usage| :type |BufferUsageARB| :direction :in)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("689"))) -(defglfun - (("IsBuffer" is-buffer) :args ((:name |buffer| :type |UInt32| :direction :in)) - :return ("Boolean") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("696"))) -(defglfun - (("GenBuffers" gen-buffers) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |buffers| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("692"))) -(defglfun - (("DeleteBuffers" delete-buffers) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |buffers| :type |ConstUInt32| :direction :in :array t :size n)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("691"))) -(defglfun - (("BindBuffer" bind-buffer) :args - ((:name |target| :type |BufferTargetARB| :direction :in) - (:name |buffer| :type |UInt32| :direction :in)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("688"))) -(defglfun - (("GetQueryObjectuiv" get-query-object-uiv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |UInt32| :direction :out :array t :size pname)) - :return ("void") :category ("VERSION_1_5") :dlflags ("notlistable") :version - ("1.5") :extension nil :glxsingle ("166") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("707"))) -(defglfun - (("GetQueryObjectiv" get-query-object-iv) :args - ((:name |id| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("VERSION_1_5") :dlflags ("notlistable") :version - ("1.5") :extension nil :glxsingle ("165") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("706"))) -(defglfun - (("GetQueryiv" get-query-iv) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("VERSION_1_5") :dlflags ("notlistable") :version - ("1.5") :extension nil :glxsingle ("164") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("705"))) -(defglfun - (("EndQuery" end-query) :args ((:name |target| :type |GLenum| :direction :in)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("232") :glxflags ("ignore") :glsopcode ("?") :offset ("704"))) -(defglfun - (("BeginQuery" begin-query) :args - ((:name |target| :type |GLenum| :direction :in) - (:name |id| :type |UInt32| :direction :in)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxropcode ("231") :glxflags ("ignore") :glsopcode ("?") :offset ("703"))) -(defglfun - (("IsQuery" is-query) :args ((:name |id| :type |UInt32| :direction :in)) - :return ("Boolean") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxsingle ("163") :glxflags ("ignore") :glsopcode ("?") :offset ("702"))) -(defglfun - (("DeleteQueries" delete-queries) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |ids| :type |UInt32| :direction :in :array t :size n)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxsingle ("161") :glxflags ("ignore") :glsopcode ("?") :offset ("701"))) -(defglfun - (("GenQueries" gen-queries) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |ids| :type |UInt32| :direction :out :array t :size n)) - :return ("void") :category ("VERSION_1_5") :version ("1.5") :extension nil - :glxsingle ("162") :glxflags ("ignore") :glsopcode ("?") :offset ("700"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; version_1_5 + +(defconstant +buffer-size+ #x8764) +(defconstant +buffer-usage+ #x8765) +(defconstant +query-counter-bits+ #x8864) +(defconstant +current-query+ #x8865) +(defconstant +query-result+ #x8866) +(defconstant +query-result-available+ #x8867) +(defconstant +array-buffer+ #x8892) +(defconstant +element-array-buffer+ #x8893) +(defconstant +array-buffer-binding+ #x8894) +(defconstant +element-array-buffer-binding+ #x8895) +(defconstant +vertex-array-buffer-binding+ #x8896) +(defconstant +normal-array-buffer-binding+ #x8897) +(defconstant +color-array-buffer-binding+ #x8898) +(defconstant +index-array-buffer-binding+ #x8899) +(defconstant +texture-coord-array-buffer-binding+ #x889A) +(defconstant +edge-flag-array-buffer-binding+ #x889B) +(defconstant +secondary-color-array-buffer-binding+ #x889C) +(defconstant +fog-coordinate-array-buffer-binding+ #x889D) +(defconstant +weight-array-buffer-binding+ #x889E) +(defconstant +vertex-attrib-array-buffer-binding+ #x889F) +(defconstant +read-only+ #x88B8) +(defconstant +write-only+ #x88B9) +(defconstant +read-write+ #x88BA) +(defconstant +buffer-access+ #x88BB) +(defconstant +buffer-mapped+ #x88BC) +(defconstant +buffer-map-pointer+ #x88BD) +(defconstant +stream-draw+ #x88E0) +(defconstant +stream-read+ #x88E1) +(defconstant +stream-copy+ #x88E2) +(defconstant +static-draw+ #x88E4) +(defconstant +static-read+ #x88E5) +(defconstant +static-copy+ #x88E6) +(defconstant +dynamic-draw+ #x88E8) +(defconstant +dynamic-read+ #x88E9) +(defconstant +dynamic-copy+ #x88EA) +(defconstant +samples-passed+ #x8914) +(defconstant +fog-coord-src+ #x8450) +(defconstant +fog-coord+ #x8451) +(defconstant +current-fog-coord+ #x8453) +(defconstant +fog-coord-array-type+ #x8454) +(defconstant +fog-coord-array-stride+ #x8455) +(defconstant +fog-coord-array-pointer+ #x8456) +(defconstant +fog-coord-array+ #x8457) +(defconstant +fog-coord-array-buffer-binding+ #x889D) +(defconstant +src0-rgb+ #x8580) +(defconstant +src1-rgb+ #x8581) +(defconstant +src2-rgb+ #x8582) +(defconstant +src0-alpha+ #x8588) +(defconstant +src1-alpha+ #x8589) +(defconstant +src2-alpha+ #x858A) +(defglfun "GetBufferPointerv" get-buffer-pointerv :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |pname| :type |BufferPointerNameARB| :direction :in) + (:name |params| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "VERSION_1_5" :version "1.5") +(defglfun "GetBufferParameteriv" get-buffer-parameter-iv :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |pname| :type |BufferPNameARB| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "VERSION_1_5" :version "1.5") +(defglfun "UnmapBuffer" unmap-buffer :return "Boolean" :args + ((:name |target| :type |BufferTargetARB| :direction :in)) :category + "VERSION_1_5" :version "1.5") +(defglfun "MapBuffer" map-buffer :return "VoidPointer" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |access| :type |BufferAccessARB| :direction :in)) + :category "VERSION_1_5" :version "1.5") +(defglfun "GetBufferSubData" get-buffer-sub-data :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |offset| :type |BufferOffset| :direction :in) + (:name |size| :type |BufferSize| :direction :in) + (:name |data| :type |Void| :direction :out :array t :size size)) + :category "VERSION_1_5" :version "1.5") +(defglfun "BufferSubData" buffer-sub-data :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |offset| :type |BufferOffset| :direction :in) + (:name |size| :type |BufferSize| :direction :in) + (:name |data| :type |ConstVoid| :direction :in :array t :size size)) + :category "VERSION_1_5" :version "1.5") +(defglfun "BufferData" buffer-data :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |size| :type |BufferSize| :direction :in) + (:name |data| :type |ConstVoid| :direction :in :array t :size size) + (:name |usage| :type |BufferUsageARB| :direction :in)) + :category "VERSION_1_5" :version "1.5") +(defglfun "IsBuffer" is-buffer :return "Boolean" :args + ((:name |buffer| :type |UInt32| :direction :in)) :category "VERSION_1_5" + :version "1.5") +(defglfun "GenBuffers" gen-buffers :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |buffers| :type |UInt32| :direction :out :array t :size n)) + :category "VERSION_1_5" :version "1.5") +(defglfun "DeleteBuffers" delete-buffers :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |buffers| :type |ConstUInt32| :direction :in :array t :size n)) + :category "VERSION_1_5" :version "1.5") +(defglfun "BindBuffer" bind-buffer :return "void" :args + ((:name |target| :type |BufferTargetARB| :direction :in) + (:name |buffer| :type |UInt32| :direction :in)) + :category "VERSION_1_5" :version "1.5") +(defglfun "GetQueryObjectuiv" get-query-object-uiv :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |UInt32| :direction :out :array t :size pname)) + :category "VERSION_1_5" :version "1.5") +(defglfun "GetQueryObjectiv" get-query-object-iv :return "void" :args + ((:name |id| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "VERSION_1_5" :version "1.5") +(defglfun "GetQueryiv" get-query-iv :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "VERSION_1_5" :version "1.5") +(defglfun "EndQuery" end-query :return "void" :args + ((:name |target| :type |GLenum| :direction :in)) :category "VERSION_1_5" + :version "1.5") +(defglfun "BeginQuery" begin-query :return "void" :args + ((:name |target| :type |GLenum| :direction :in) + (:name |id| :type |UInt32| :direction :in)) + :category "VERSION_1_5" :version "1.5") +(defglfun "IsQuery" is-query :return "Boolean" :args + ((:name |id| :type |UInt32| :direction :in)) :category "VERSION_1_5" :version + "1.5") +(defglfun "DeleteQueries" delete-queries :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |ids| :type |UInt32| :direction :in :array t :size n)) + :category "VERSION_1_5" :version "1.5") +(defglfun "GenQueries" gen-queries :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |ids| :type |UInt32| :direction :out :array t :size n)) + :category "VERSION_1_5" :version "1.5") diff --git a/lib/opengl-version_2_0.lisp b/lib/opengl-version_2_0.lisp dissimilarity index 90% index b982cca..84e476d 100644 --- a/lib/opengl-version_2_0.lisp +++ b/lib/opengl-version_2_0.lisp @@ -1,776 +1,535 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; version_2_0 - -(defconstant +blend-equation-rgb+ #x8009) -(defconstant +vertex-attrib-array-enabled+ #x8622) -(defconstant +vertex-attrib-array-size+ #x8623) -(defconstant +vertex-attrib-array-stride+ #x8624) -(defconstant +vertex-attrib-array-type+ #x8625) -(defconstant +current-vertex-attrib+ #x8626) -(defconstant +vertex-program-point-size+ #x8642) -(defconstant +vertex-program-two-side+ #x8643) -(defconstant +vertex-attrib-array-pointer+ #x8645) -(defconstant +stencil-back-func+ #x8800) -(defconstant +stencil-back-fail+ #x8801) -(defconstant +stencil-back-pass-depth-fail+ #x8802) -(defconstant +stencil-back-pass-depth-pass+ #x8803) -(defconstant +max-draw-buffers+ #x8824) -(defconstant +draw-buffer0+ #x8825) -(defconstant +draw-buffer1+ #x8826) -(defconstant +draw-buffer2+ #x8827) -(defconstant +draw-buffer3+ #x8828) -(defconstant +draw-buffer4+ #x8829) -(defconstant +draw-buffer5+ #x882A) -(defconstant +draw-buffer6+ #x882B) -(defconstant +draw-buffer7+ #x882C) -(defconstant +draw-buffer8+ #x882D) -(defconstant +draw-buffer9+ #x882E) -(defconstant +draw-buffer10+ #x882F) -(defconstant +draw-buffer11+ #x8830) -(defconstant +draw-buffer12+ #x8831) -(defconstant +draw-buffer13+ #x8832) -(defconstant +draw-buffer14+ #x8833) -(defconstant +draw-buffer15+ #x8834) -(defconstant +blend-equation-alpha+ #x883D) -(defconstant +point-sprite+ #x8861) -(defconstant +coord-replace+ #x8862) -(defconstant +max-vertex-attribs+ #x8869) -(defconstant +vertex-attrib-array-normalized+ #x886A) -(defconstant +max-texture-coords+ #x8871) -(defconstant +max-texture-image-units+ #x8872) -(defconstant +fragment-shader+ #x8B30) -(defconstant +vertex-shader+ #x8B31) -(defconstant +max-fragment-uniform-components+ #x8B49) -(defconstant +max-vertex-uniform-components+ #x8B4A) -(defconstant +max-varying-floats+ #x8B4B) -(defconstant +max-vertex-texture-image-units+ #x8B4C) -(defconstant +max-combined-texture-image-units+ #x8B4D) -(defconstant +shader-type+ #x8B4F) -(defconstant +float-vec2+ #x8B50) -(defconstant +float-vec3+ #x8B51) -(defconstant +float-vec4+ #x8B52) -(defconstant +int-vec2+ #x8B53) -(defconstant +int-vec3+ #x8B54) -(defconstant +int-vec4+ #x8B55) -(defconstant +bool+ #x8B56) -(defconstant +bool-vec2+ #x8B57) -(defconstant +bool-vec3+ #x8B58) -(defconstant +bool-vec4+ #x8B59) -(defconstant +float-mat2+ #x8B5A) -(defconstant +float-mat3+ #x8B5B) -(defconstant +float-mat4+ #x8B5C) -(defconstant +sampler-1d+ #x8B5D) -(defconstant +sampler-2d+ #x8B5E) -(defconstant +sampler-3d+ #x8B5F) -(defconstant +sampler-cube+ #x8B60) -(defconstant +sampler-1d-shadow+ #x8B61) -(defconstant +sampler-2d-shadow+ #x8B62) -(defconstant +delete-status+ #x8B80) -(defconstant +compile-status+ #x8B81) -(defconstant +link-status+ #x8B82) -(defconstant +validate-status+ #x8B83) -(defconstant +info-log-length+ #x8B84) -(defconstant +attached-shaders+ #x8B85) -(defconstant +active-uniforms+ #x8B86) -(defconstant +active-uniform-max-length+ #x8B87) -(defconstant +shader-source-length+ #x8B88) -(defconstant +active-attributes+ #x8B89) -(defconstant +active-attribute-max-length+ #x8B8A) -(defconstant +fragment-shader-derivative-hint+ #x8B8B) -(defconstant +shading-language-version+ #x8B8C) -(defconstant +current-program+ #x8B8D) -(defconstant +point-sprite-coord-origin+ #x8CA0) -(defconstant +lower-left+ #x8CA1) -(defconstant +upper-left+ #x8CA2) -(defconstant +stencil-back-ref+ #x8CA3) -(defconstant +stencil-back-value-mask+ #x8CA4) -(defconstant +stencil-back-writemask+ #x8CA5) -(defglfun - (("VertexAttribPointer" vertex-attrib-pointer) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |size| :type |Int32| :direction :in) - (:name |type| :type |VertexAttribPointerTypeARB| :direction :in) - (:name |normalized| :type |Boolean| :direction :in) - (:name |stride| :type |SizeI| :direction :in) - (:name |pointer| :type |Void| :direction :in :array t :size - (|size| |type| |stride|) :retained t)) - :return ("void") :dlflags ("notlistable") :category ("VERSION_2_0") :version - ("2.0") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags - ("ignore") :offset ("664"))) -(defglfun - (("VertexAttrib4usv" vertex-attrib-4usv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt16| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("657"))) -(defglfun - (("VertexAttrib4uiv" vertex-attrib-4uiv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("658"))) -(defglfun - (("VertexAttrib4ubv" vertex-attrib-4ubv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt8| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("656"))) -(defglfun - (("VertexAttrib4sv" vertex-attrib-4sv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") - :glxropcode ("4192") :glsopcode ("0x0247") :offset ("626"))) -(defglfun - (("VertexAttrib4s" vertex-attrib-4s) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in) - (:name |w| :type |Int16| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib4sv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("625"))) -(defglfun - (("VertexAttrib4iv" vertex-attrib-4iv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("655"))) -(defglfun - (("VertexAttrib4fv" vertex-attrib-4fv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4196") :glsopcode ("0x0248") :offset - ("624"))) -(defglfun - (("VertexAttrib4f" vertex-attrib-4f) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in) - (:name |w| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib4fv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("623"))) -(defglfun - (("VertexAttrib4dv" vertex-attrib-4dv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4200") :glsopcode ("0x0249") :offset - ("622"))) -(defglfun - (("VertexAttrib4d" vertex-attrib-4d) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in) - (:name |w| :type |Float64| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib4dv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("621"))) -(defglfun - (("VertexAttrib4bv" vertex-attrib-4bv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int8| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("654"))) -(defglfun - (("VertexAttrib4Nusv" vertex-attrib-4n-usv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt16| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("662"))) -(defglfun - (("VertexAttrib4Nuiv" vertex-attrib-4n-uiv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt32| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("663"))) -(defglfun - (("VertexAttrib4Nubv" vertex-attrib-4n-ubv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |UInt8| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") - :glxropcode ("4201") :glsopcode ("0x024A") :offset ("628"))) -(defglfun - (("VertexAttrib4Nub" vertex-attrib-4n-ub) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |UInt8| :direction :in) - (:name |y| :type |UInt8| :direction :in) - (:name |z| :type |UInt8| :direction :in) - (:name |w| :type |UInt8| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("627"))) -(defglfun - (("VertexAttrib4Nsv" vertex-attrib-4n-sv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("660"))) -(defglfun - (("VertexAttrib4Niv" vertex-attrib-4n-iv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int32| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("661"))) -(defglfun - (("VertexAttrib4Nbv" vertex-attrib-4n-bv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int8| :direction :in :array t :size #x4)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("659"))) -(defglfun - (("VertexAttrib3sv" vertex-attrib-3sv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4191") :glsopcode ("0x0244") :offset - ("620"))) -(defglfun - (("VertexAttrib3s" vertex-attrib-3s) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in) - (:name |z| :type |Int16| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib3sv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("619"))) -(defglfun - (("VertexAttrib3fv" vertex-attrib-3fv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4195") :glsopcode ("0x0245") :offset - ("618"))) -(defglfun - (("VertexAttrib3f" vertex-attrib-3f) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib3fv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("617"))) -(defglfun - (("VertexAttrib3dv" vertex-attrib-3dv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x3)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4199") :glsopcode ("0x0246") :offset - ("616"))) -(defglfun - (("VertexAttrib3d" vertex-attrib-3d) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib3dv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("615"))) -(defglfun - (("VertexAttrib2sv" vertex-attrib-2sv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4190") :glsopcode ("0x0241") :offset - ("614"))) -(defglfun - (("VertexAttrib2s" vertex-attrib-2s) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in) - (:name |y| :type |Int16| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib2sv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("613"))) -(defglfun - (("VertexAttrib2fv" vertex-attrib-2fv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4194") :glsopcode ("0x0242") :offset - ("612"))) -(defglfun - (("VertexAttrib2f" vertex-attrib-2f) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib2fv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("611"))) -(defglfun - (("VertexAttrib2dv" vertex-attrib-2dv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x2)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4198") :glsopcode ("0x0243") :offset - ("610"))) -(defglfun - (("VertexAttrib2d" vertex-attrib-2d) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib2dv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("609"))) -(defglfun - (("VertexAttrib1sv" vertex-attrib-1sv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Int16| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4189") :glsopcode ("0x023E") :offset - ("608"))) -(defglfun - (("VertexAttrib1s" vertex-attrib-1s) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Int16| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib1sv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("607"))) -(defglfun - (("VertexAttrib1fv" vertex-attrib-1fv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float32| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4193") :glsopcode ("0x023F") :offset - ("606"))) -(defglfun - (("VertexAttrib1f" vertex-attrib-1f) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib1fv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("605"))) -(defglfun - (("VertexAttrib1dv" vertex-attrib-1dv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |v| :type |Float64| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glxropcode ("4197") :glsopcode ("0x0240") :offset - ("604"))) -(defglfun - (("VertexAttrib1d" vertex-attrib-1d) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |x| :type |Float64| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :vectorequiv - ("VertexAttrib1dv") :extension ("soft" "WINSOFT" "NV10") :glsflags ("ignore") - :glxflags ("ignore") :offset ("603"))) -(defglfun - (("ValidateProgram" validate-program) :args - ((:name |program| :type |UInt32| :direction :in)) :return ("void") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix4fv" uniform-matrix-4fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix3fv" uniform-matrix-3fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix2fv" uniform-matrix-2fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform4iv" uniform-4iv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform3iv" uniform-3iv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform2iv" uniform-2iv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform1iv" uniform-1iv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Int32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform4fv" uniform-4fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform3fv" uniform-3fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform2fv" uniform-2fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform1fv" uniform-1fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size count)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform4i" uniform-4i) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in) - (:name |v1| :type |Int32| :direction :in) - (:name |v2| :type |Int32| :direction :in) - (:name |v3| :type |Int32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform3i" uniform-3i) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in) - (:name |v1| :type |Int32| :direction :in) - (:name |v2| :type |Int32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform2i" uniform-2i) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in) - (:name |v1| :type |Int32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform1i" uniform-1i) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Int32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform4f" uniform-4f) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in) - (:name |v1| :type |Float32| :direction :in) - (:name |v2| :type |Float32| :direction :in) - (:name |v3| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform3f" uniform-3f) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in) - (:name |v1| :type |Float32| :direction :in) - (:name |v2| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform2f" uniform-2f) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in) - (:name |v1| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("Uniform1f" uniform-1f) :args - ((:name |location| :type |Int32| :direction :in) - (:name |v0| :type |Float32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UseProgram" use-program) :args - ((:name |program| :type |UInt32| :direction :in)) :return ("void") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("ShaderSource" shader-source) :args - ((:name |shader| :type |UInt32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |string| :type |CharPointer| :direction :in :array t :size count) - (:name |length| :type |Int32| :direction :in :array t :size #x1)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("LinkProgram" link-program) :args - ((:name |program| :type |UInt32| :direction :in)) :return ("void") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("IsShader" is-shader) :args ((:name |shader| :type |UInt32| :direction :in)) - :return ("Boolean") :dlflags ("notlistable") :category ("VERSION_2_0") - :version ("2.0") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("?") - :glsflags ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("IsProgram" is-program) :args - ((:name |program| :type |UInt32| :direction :in)) :return ("Boolean") - :dlflags ("notlistable") :category ("VERSION_2_0") :version ("2.0") - :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1304") :glsflags - ("get") :glsopcode ("0x0236") :offset ("592"))) -(defglfun - (("GetVertexAttribPointerv" get-vertex-attrib-pointerv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPointerPropertyARB| :direction :in) - (:name |pointer| :type |VoidPointer| :direction :out :array t :size #x1)) - :return ("void") :dlflags ("notlistable") :category ("VERSION_2_0") :version - ("2.0") :extension ("soft" "WINSOFT" "NV10") :glxflags ("ignore") :glsflags - ("client" "get") :glsopcode ("0x0235") :offset ("591"))) -(defglfun - (("GetVertexAttribiv" get-vertex-attrib-iv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPropertyARB| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("VERSION_2_0") :version - ("2.0") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1303") - :glsflags ("client" "get") :glsopcode ("0x0234") :offset ("590"))) -(defglfun - (("GetVertexAttribfv" get-vertex-attrib-fv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPropertyARB| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("VERSION_2_0") :version - ("2.0") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1302") - :glsflags ("client" "get") :glsopcode ("0x0233") :offset ("589"))) -(defglfun - (("GetVertexAttribdv" get-vertex-attrib-dv) :args - ((:name |index| :type |UInt32| :direction :in) - (:name |pname| :type |VertexAttribPropertyARB| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :dlflags ("notlistable") :category ("VERSION_2_0") :version - ("2.0") :extension ("soft" "WINSOFT" "NV10") :glxvendorpriv ("1301") - :glsflags ("client" "get") :glsopcode ("0x0232") :offset ("588"))) -(defglfun - (("GetUniformiv" get-uniform-iv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size location)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetUniformfv" get-uniform-fv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |location| :type |Int32| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size location)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetUniformLocation" get-uniform-location) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t)) - :return ("Int32") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetShaderSource" get-shader-source) :args - ((:name |shader| :type |UInt32| :direction :in) - (:name |bufSize| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |source| :type |Char| :direction :out :array t :size length)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetShaderInfoLog" get-shader-info-log) :args - ((:name |shader| :type |UInt32| :direction :in) - (:name |bufSize| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |infoLog| :type |Char| :direction :out :array t :size length)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetShaderiv" get-shader-iv) :args - ((:name |shader| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetProgramInfoLog" get-program-info-log) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |bufSize| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |infoLog| :type |Char| :direction :out :array t :size length)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetProgramiv" get-program-iv) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |pname| :type |GLenum| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size pname)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetAttribLocation" get-attrib-location) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t)) - :return ("Int32") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetAttachedShaders" get-attached-shaders) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |maxCount| :type |SizeI| :direction :in) - (:name |count| :type |SizeI| :direction :out :array t :size #x1) - (:name |obj| :type |UInt32| :direction :out :array t :size count)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetActiveUniform" get-active-uniform) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |bufSize| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |size| :type |Int32| :direction :out :array t :size #x1) - (:name |type| :type |GLenum| :direction :out :array t :size #x1) - (:name |name| :type |Char| :direction :out :array t)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("GetActiveAttrib" get-active-attrib) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |bufSize| :type |SizeI| :direction :in) - (:name |length| :type |SizeI| :direction :out :array t :size #x1) - (:name |size| :type |Int32| :direction :out :array t :size #x1) - (:name |type| :type |GLenum| :direction :out :array t :size #x1) - (:name |name| :type |Char| :direction :out :array t)) - :return ("void") :category ("VERSION_2_0") :dlflags ("notlistable") :version - ("2.0") :extension nil :glxsingle ("?") :glxflags ("ignore") :glsflags - ("get") :glsopcode ("?") :offset ("?"))) -(defglfun - (("EnableVertexAttribArray" enable-vertex-attrib-array) :args - ((:name |index| :type |UInt32| :direction :in)) :return ("void") :dlflags - ("notlistable") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("665"))) -(defglfun - (("DisableVertexAttribArray" disable-vertex-attrib-array) :args - ((:name |index| :type |UInt32| :direction :in)) :return ("void") :dlflags - ("notlistable") :category ("VERSION_2_0") :version ("2.0") :extension - ("soft" "WINSOFT" "NV10") :glsflags ("ignore") :glxflags ("ignore") :offset - ("666"))) -(defglfun - (("DetachShader" detach-shader) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |shader| :type |UInt32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("DeleteShader" delete-shader) :args - ((:name |shader| :type |UInt32| :direction :in)) :return ("void") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("DeleteProgram" delete-program) :args - ((:name |program| :type |UInt32| :direction :in)) :return ("void") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("CreateShader" create-shader) :args - ((:name |type| :type |GLenum| :direction :in)) :return ("UInt32") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("CreateProgram" create-program) :args nil :return ("UInt32") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("CompileShader" compile-shader) :args - ((:name |shader| :type |UInt32| :direction :in)) :return ("void") :category - ("VERSION_2_0") :version ("2.0") :extension nil :glxropcode ("?") :glxflags - ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("BindAttribLocation" bind-attrib-location) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |index| :type |UInt32| :direction :in) - (:name |name| :type |Char| :direction :in :array t)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("AttachShader" attach-shader) :args - ((:name |program| :type |UInt32| :direction :in) - (:name |shader| :type |UInt32| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("StencilMaskSeparate" stencil-mask-separate) :args - ((:name |face| :type |StencilFaceDirection| :direction :in) - (:name |mask| :type |MaskedStencilValue| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("StencilFuncSeparate" stencil-func-separate) :args - ((:name |frontfunc| :type |StencilFunction| :direction :in) - (:name |backfunc| :type |StencilFunction| :direction :in) - (:name |ref| :type |ClampedStencilValue| :direction :in) - (:name |mask| :type |MaskedStencilValue| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("StencilOpSeparate" stencil-op-separate) :args - ((:name |face| :type |StencilFaceDirection| :direction :in) - (:name |sfail| :type |StencilOp| :direction :in) - (:name |dpfail| :type |StencilOp| :direction :in) - (:name |dppass| :type |StencilOp| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("DrawBuffers" draw-buffers) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |bufs| :type |DrawBufferModeATI| :direction :in :array t :size n)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("233") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("BlendEquationSeparate" blend-equation-separate) :args - ((:name |modeRGB| :type |BlendEquationModeEXT| :direction :in) - (:name |modeAlpha| :type |BlendEquationModeEXT| :direction :in)) - :return ("void") :category ("VERSION_2_0") :version ("2.0") :extension nil - :glxropcode ("4228") :glsopcode ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; version_2_0 + +(defconstant +blend-equation-rgb+ #x8009) +(defconstant +vertex-attrib-array-enabled+ #x8622) +(defconstant +vertex-attrib-array-size+ #x8623) +(defconstant +vertex-attrib-array-stride+ #x8624) +(defconstant +vertex-attrib-array-type+ #x8625) +(defconstant +current-vertex-attrib+ #x8626) +(defconstant +vertex-program-point-size+ #x8642) +(defconstant +vertex-program-two-side+ #x8643) +(defconstant +vertex-attrib-array-pointer+ #x8645) +(defconstant +stencil-back-func+ #x8800) +(defconstant +stencil-back-fail+ #x8801) +(defconstant +stencil-back-pass-depth-fail+ #x8802) +(defconstant +stencil-back-pass-depth-pass+ #x8803) +(defconstant +max-draw-buffers+ #x8824) +(defconstant +draw-buffer0+ #x8825) +(defconstant +draw-buffer1+ #x8826) +(defconstant +draw-buffer2+ #x8827) +(defconstant +draw-buffer3+ #x8828) +(defconstant +draw-buffer4+ #x8829) +(defconstant +draw-buffer5+ #x882A) +(defconstant +draw-buffer6+ #x882B) +(defconstant +draw-buffer7+ #x882C) +(defconstant +draw-buffer8+ #x882D) +(defconstant +draw-buffer9+ #x882E) +(defconstant +draw-buffer10+ #x882F) +(defconstant +draw-buffer11+ #x8830) +(defconstant +draw-buffer12+ #x8831) +(defconstant +draw-buffer13+ #x8832) +(defconstant +draw-buffer14+ #x8833) +(defconstant +draw-buffer15+ #x8834) +(defconstant +blend-equation-alpha+ #x883D) +(defconstant +point-sprite+ #x8861) +(defconstant +coord-replace+ #x8862) +(defconstant +max-vertex-attribs+ #x8869) +(defconstant +vertex-attrib-array-normalized+ #x886A) +(defconstant +max-texture-coords+ #x8871) +(defconstant +max-texture-image-units+ #x8872) +(defconstant +fragment-shader+ #x8B30) +(defconstant +vertex-shader+ #x8B31) +(defconstant +max-fragment-uniform-components+ #x8B49) +(defconstant +max-vertex-uniform-components+ #x8B4A) +(defconstant +max-varying-floats+ #x8B4B) +(defconstant +max-vertex-texture-image-units+ #x8B4C) +(defconstant +max-combined-texture-image-units+ #x8B4D) +(defconstant +shader-type+ #x8B4F) +(defconstant +float-vec2+ #x8B50) +(defconstant +float-vec3+ #x8B51) +(defconstant +float-vec4+ #x8B52) +(defconstant +int-vec2+ #x8B53) +(defconstant +int-vec3+ #x8B54) +(defconstant +int-vec4+ #x8B55) +(defconstant +bool+ #x8B56) +(defconstant +bool-vec2+ #x8B57) +(defconstant +bool-vec3+ #x8B58) +(defconstant +bool-vec4+ #x8B59) +(defconstant +float-mat2+ #x8B5A) +(defconstant +float-mat3+ #x8B5B) +(defconstant +float-mat4+ #x8B5C) +(defconstant +sampler-1d+ #x8B5D) +(defconstant +sampler-2d+ #x8B5E) +(defconstant +sampler-3d+ #x8B5F) +(defconstant +sampler-cube+ #x8B60) +(defconstant +sampler-1d-shadow+ #x8B61) +(defconstant +sampler-2d-shadow+ #x8B62) +(defconstant +delete-status+ #x8B80) +(defconstant +compile-status+ #x8B81) +(defconstant +link-status+ #x8B82) +(defconstant +validate-status+ #x8B83) +(defconstant +info-log-length+ #x8B84) +(defconstant +attached-shaders+ #x8B85) +(defconstant +active-uniforms+ #x8B86) +(defconstant +active-uniform-max-length+ #x8B87) +(defconstant +shader-source-length+ #x8B88) +(defconstant +active-attributes+ #x8B89) +(defconstant +active-attribute-max-length+ #x8B8A) +(defconstant +fragment-shader-derivative-hint+ #x8B8B) +(defconstant +shading-language-version+ #x8B8C) +(defconstant +current-program+ #x8B8D) +(defconstant +point-sprite-coord-origin+ #x8CA0) +(defconstant +lower-left+ #x8CA1) +(defconstant +upper-left+ #x8CA2) +(defconstant +stencil-back-ref+ #x8CA3) +(defconstant +stencil-back-value-mask+ #x8CA4) +(defconstant +stencil-back-writemask+ #x8CA5) +(defglfun "VertexAttribPointer" vertex-attrib-pointer :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |size| :type |Int32| :direction :in) + (:name |type| :type |VertexAttribPointerTypeARB| :direction :in) + (:name |normalized| :type |Boolean| :direction :in) + (:name |stride| :type |SizeI| :direction :in) + (:name |pointer| :type |Void| :direction :in :array t :size + (|size| |type| |stride|) :retained t)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4usv" vertex-attrib-4usv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt16| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4uiv" vertex-attrib-4uiv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4ubv" vertex-attrib-4ubv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt8| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4sv" vertex-attrib-4sv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4s" vertex-attrib-4s :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in) + (:name |w| :type |Int16| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4iv" vertex-attrib-4iv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4fv" vertex-attrib-4fv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4f" vertex-attrib-4f :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in) + (:name |w| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4dv" vertex-attrib-4dv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4d" vertex-attrib-4d :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in) + (:name |w| :type |Float64| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4bv" vertex-attrib-4bv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int8| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Nusv" vertex-attrib-4n-usv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt16| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Nuiv" vertex-attrib-4n-uiv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt32| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Nubv" vertex-attrib-4n-ubv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |UInt8| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Nub" vertex-attrib-4n-ub :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |UInt8| :direction :in) + (:name |y| :type |UInt8| :direction :in) + (:name |z| :type |UInt8| :direction :in) + (:name |w| :type |UInt8| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Nsv" vertex-attrib-4n-sv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Niv" vertex-attrib-4n-iv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int32| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib4Nbv" vertex-attrib-4n-bv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int8| :direction :in :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib3sv" vertex-attrib-3sv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x3)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib3s" vertex-attrib-3s :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in) + (:name |z| :type |Int16| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib3fv" vertex-attrib-3fv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x3)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib3f" vertex-attrib-3f :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib3dv" vertex-attrib-3dv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x3)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib3d" vertex-attrib-3d :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib2sv" vertex-attrib-2sv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x2)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib2s" vertex-attrib-2s :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in) + (:name |y| :type |Int16| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib2fv" vertex-attrib-2fv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x2)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib2f" vertex-attrib-2f :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib2dv" vertex-attrib-2dv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x2)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib2d" vertex-attrib-2d :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib1sv" vertex-attrib-1sv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Int16| :direction :in :array t :size #x1)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib1s" vertex-attrib-1s :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Int16| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib1fv" vertex-attrib-1fv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float32| :direction :in :array t :size #x1)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib1f" vertex-attrib-1f :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib1dv" vertex-attrib-1dv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |v| :type |Float64| :direction :in :array t :size #x1)) + :category "VERSION_2_0" :version "2.0") +(defglfun "VertexAttrib1d" vertex-attrib-1d :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |x| :type |Float64| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "ValidateProgram" validate-program :return "void" :args + ((:name |program| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "UniformMatrix4fv" uniform-matrix-4fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "UniformMatrix3fv" uniform-matrix-3fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "UniformMatrix2fv" uniform-matrix-2fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform4iv" uniform-4iv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform3iv" uniform-3iv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform2iv" uniform-2iv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform1iv" uniform-1iv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Int32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform4fv" uniform-4fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform3fv" uniform-3fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform2fv" uniform-2fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform1fv" uniform-1fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform4i" uniform-4i :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in) + (:name |v1| :type |Int32| :direction :in) + (:name |v2| :type |Int32| :direction :in) + (:name |v3| :type |Int32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform3i" uniform-3i :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in) + (:name |v1| :type |Int32| :direction :in) + (:name |v2| :type |Int32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform2i" uniform-2i :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in) + (:name |v1| :type |Int32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform1i" uniform-1i :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Int32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform4f" uniform-4f :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in) + (:name |v1| :type |Float32| :direction :in) + (:name |v2| :type |Float32| :direction :in) + (:name |v3| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform3f" uniform-3f :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in) + (:name |v1| :type |Float32| :direction :in) + (:name |v2| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform2f" uniform-2f :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in) + (:name |v1| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "Uniform1f" uniform-1f :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |v0| :type |Float32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "UseProgram" use-program :return "void" :args + ((:name |program| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "ShaderSource" shader-source :return "void" :args + ((:name |shader| :type |UInt32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |string| :type |CharPointer| :direction :in :array t :size count) + (:name |length| :type |Int32| :direction :in :array t :size #x1)) + :category "VERSION_2_0" :version "2.0") +(defglfun "LinkProgram" link-program :return "void" :args + ((:name |program| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "IsShader" is-shader :return "Boolean" :args + ((:name |shader| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "IsProgram" is-program :return "Boolean" :args + ((:name |program| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "GetVertexAttribPointerv" get-vertex-attrib-pointerv :return "void" + :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPointerPropertyARB| :direction :in) + (:name |pointer| :type |VoidPointer| :direction :out :array t :size #x1)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetVertexAttribiv" get-vertex-attrib-iv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPropertyARB| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetVertexAttribfv" get-vertex-attrib-fv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPropertyARB| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetVertexAttribdv" get-vertex-attrib-dv :return "void" :args + ((:name |index| :type |UInt32| :direction :in) + (:name |pname| :type |VertexAttribPropertyARB| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size #x4)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetUniformiv" get-uniform-iv :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size location)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetUniformfv" get-uniform-fv :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |location| :type |Int32| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size location)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetUniformLocation" get-uniform-location :return "Int32" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetShaderSource" get-shader-source :return "void" :args + ((:name |shader| :type |UInt32| :direction :in) + (:name |bufSize| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |source| :type |Char| :direction :out :array t :size length)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetShaderInfoLog" get-shader-info-log :return "void" :args + ((:name |shader| :type |UInt32| :direction :in) + (:name |bufSize| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |infoLog| :type |Char| :direction :out :array t :size length)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetShaderiv" get-shader-iv :return "void" :args + ((:name |shader| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetProgramInfoLog" get-program-info-log :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |bufSize| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |infoLog| :type |Char| :direction :out :array t :size length)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetProgramiv" get-program-iv :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |pname| :type |GLenum| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size pname)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetAttribLocation" get-attrib-location :return "Int32" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetAttachedShaders" get-attached-shaders :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |maxCount| :type |SizeI| :direction :in) + (:name |count| :type |SizeI| :direction :out :array t :size #x1) + (:name |obj| :type |UInt32| :direction :out :array t :size count)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetActiveUniform" get-active-uniform :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |bufSize| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |size| :type |Int32| :direction :out :array t :size #x1) + (:name |type| :type |GLenum| :direction :out :array t :size #x1) + (:name |name| :type |Char| :direction :out :array t)) + :category "VERSION_2_0" :version "2.0") +(defglfun "GetActiveAttrib" get-active-attrib :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |bufSize| :type |SizeI| :direction :in) + (:name |length| :type |SizeI| :direction :out :array t :size #x1) + (:name |size| :type |Int32| :direction :out :array t :size #x1) + (:name |type| :type |GLenum| :direction :out :array t :size #x1) + (:name |name| :type |Char| :direction :out :array t)) + :category "VERSION_2_0" :version "2.0") +(defglfun "EnableVertexAttribArray" enable-vertex-attrib-array :return "void" + :args ((:name |index| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "DisableVertexAttribArray" disable-vertex-attrib-array :return "void" + :args ((:name |index| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "DetachShader" detach-shader :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |shader| :type |UInt32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "DeleteShader" delete-shader :return "void" :args + ((:name |shader| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "DeleteProgram" delete-program :return "void" :args + ((:name |program| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "CreateShader" create-shader :return "UInt32" :args + ((:name |type| :type |GLenum| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "CreateProgram" create-program :return "UInt32" :args nil :category + "VERSION_2_0" :version "2.0") +(defglfun "CompileShader" compile-shader :return "void" :args + ((:name |shader| :type |UInt32| :direction :in)) :category "VERSION_2_0" + :version "2.0") +(defglfun "BindAttribLocation" bind-attrib-location :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |index| :type |UInt32| :direction :in) + (:name |name| :type |Char| :direction :in :array t)) + :category "VERSION_2_0" :version "2.0") +(defglfun "AttachShader" attach-shader :return "void" :args + ((:name |program| :type |UInt32| :direction :in) + (:name |shader| :type |UInt32| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "StencilMaskSeparate" stencil-mask-separate :return "void" :args + ((:name |face| :type |StencilFaceDirection| :direction :in) + (:name |mask| :type |MaskedStencilValue| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "StencilFuncSeparate" stencil-func-separate :return "void" :args + ((:name |frontfunc| :type |StencilFunction| :direction :in) + (:name |backfunc| :type |StencilFunction| :direction :in) + (:name |ref| :type |ClampedStencilValue| :direction :in) + (:name |mask| :type |MaskedStencilValue| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "StencilOpSeparate" stencil-op-separate :return "void" :args + ((:name |face| :type |StencilFaceDirection| :direction :in) + (:name |sfail| :type |StencilOp| :direction :in) + (:name |dpfail| :type |StencilOp| :direction :in) + (:name |dppass| :type |StencilOp| :direction :in)) + :category "VERSION_2_0" :version "2.0") +(defglfun "DrawBuffers" draw-buffers :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |bufs| :type |DrawBufferModeATI| :direction :in :array t :size n)) + :category "VERSION_2_0" :version "2.0") +(defglfun "BlendEquationSeparate" blend-equation-separate :return "void" :args + ((:name |modeRGB| :type |BlendEquationModeEXT| :direction :in) + (:name |modeAlpha| :type |BlendEquationModeEXT| :direction :in)) + :category "VERSION_2_0" :version "2.0") diff --git a/lib/opengl-version_2_1.lisp b/lib/opengl-version_2_1.lisp dissimilarity index 70% index 1d5b38b..b4e5342 100644 --- a/lib/opengl-version_2_1.lisp +++ b/lib/opengl-version_2_1.lisp @@ -1,77 +1,65 @@ -;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp - -(in-package #:cl-glfw-opengl) - -;;;; version_2_1 - -(defconstant +current-raster-secondary-color+ #x845F) -(defconstant +pixel-pack-buffer+ #x88EB) -(defconstant +pixel-unpack-buffer+ #x88EC) -(defconstant +pixel-pack-buffer-binding+ #x88ED) -(defconstant +pixel-unpack-buffer-binding+ #x88EF) -(defconstant +float-mat2x3+ #x8B65) -(defconstant +float-mat2x4+ #x8B66) -(defconstant +float-mat3x2+ #x8B67) -(defconstant +float-mat3x4+ #x8B68) -(defconstant +float-mat4x2+ #x8B69) -(defconstant +float-mat4x3+ #x8B6A) -(defconstant +srgb+ #x8C40) -(defconstant +srgb8+ #x8C41) -(defconstant +srgb-alpha+ #x8C42) -(defconstant +srgb8-alpha8+ #x8C43) -(defconstant +sluminance-alpha+ #x8C44) -(defconstant +sluminance8-alpha8+ #x8C45) -(defconstant +sluminance+ #x8C46) -(defconstant +sluminance8+ #x8C47) -(defconstant +compressed-srgb+ #x8C48) -(defconstant +compressed-srgb-alpha+ #x8C49) -(defconstant +compressed-sluminance+ #x8C4A) -(defconstant +compressed-sluminance-alpha+ #x8C4B) -(defglfun - (("UniformMatrix4x3fv" uniform-matrix-4x-3fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size #xC)) - :return ("void") :category ("VERSION_2_1") :version ("2.1") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix3x4fv" uniform-matrix-3x-4fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size #xC)) - :return ("void") :category ("VERSION_2_1") :version ("2.1") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix4x2fv" uniform-matrix-4x-2fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size #x8)) - :return ("void") :category ("VERSION_2_1") :version ("2.1") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix2x4fv" uniform-matrix-2x-4fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size #x8)) - :return ("void") :category ("VERSION_2_1") :version ("2.1") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix3x2fv" uniform-matrix-3x-2fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size #x6)) - :return ("void") :category ("VERSION_2_1") :version ("2.1") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) -(defglfun - (("UniformMatrix2x3fv" uniform-matrix-2x-3fv) :args - ((:name |location| :type |Int32| :direction :in) - (:name |count| :type |SizeI| :direction :in) - (:name |transpose| :type |Boolean| :direction :in) - (:name |value| :type |Float32| :direction :in :array t :size #x6)) - :return ("void") :category ("VERSION_2_1") :version ("2.1") :extension nil - :glxropcode ("?") :glxflags ("ignore") :glsopcode ("?") :offset ("?"))) +;;;; This file was automatically generated by /home/bill/programming/cl-glfw/generators/make-bindings-from-spec.lisp + +(in-package #:cl-glfw-opengl) + +;;;; version_2_1 + +(defconstant +current-raster-secondary-color+ #x845F) +(defconstant +pixel-pack-buffer+ #x88EB) +(defconstant +pixel-unpack-buffer+ #x88EC) +(defconstant +pixel-pack-buffer-binding+ #x88ED) +(defconstant +pixel-unpack-buffer-binding+ #x88EF) +(defconstant +float-mat2x3+ #x8B65) +(defconstant +float-mat2x4+ #x8B66) +(defconstant +float-mat3x2+ #x8B67) +(defconstant +float-mat3x4+ #x8B68) +(defconstant +float-mat4x2+ #x8B69) +(defconstant +float-mat4x3+ #x8B6A) +(defconstant +srgb+ #x8C40) +(defconstant +srgb8+ #x8C41) +(defconstant +srgb-alpha+ #x8C42) +(defconstant +srgb8-alpha8+ #x8C43) +(defconstant +sluminance-alpha+ #x8C44) +(defconstant +sluminance8-alpha8+ #x8C45) +(defconstant +sluminance+ #x8C46) +(defconstant +sluminance8+ #x8C47) +(defconstant +compressed-srgb+ #x8C48) +(defconstant +compressed-srgb-alpha+ #x8C49) +(defconstant +compressed-sluminance+ #x8C4A) +(defconstant +compressed-sluminance-alpha+ #x8C4B) +(defglfun "UniformMatrix4x3fv" uniform-matrix-4x-3fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size #xC)) + :category "VERSION_2_1" :version "2.1") +(defglfun "UniformMatrix3x4fv" uniform-matrix-3x-4fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size #xC)) + :category "VERSION_2_1" :version "2.1") +(defglfun "UniformMatrix4x2fv" uniform-matrix-4x-2fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size #x8)) + :category "VERSION_2_1" :version "2.1") +(defglfun "UniformMatrix2x4fv" uniform-matrix-2x-4fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size #x8)) + :category "VERSION_2_1" :version "2.1") +(defglfun "UniformMatrix3x2fv" uniform-matrix-3x-2fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size #x6)) + :category "VERSION_2_1" :version "2.1") +(defglfun "UniformMatrix2x3fv" uniform-matrix-2x-3fv :return "void" :args + ((:name |location| :type |Int32| :direction :in) + (:name |count| :type |SizeI| :direction :in) + (:name |transpose| :type |Boolean| :direction :in) + (:name |value| :type |Float32| :direction :in :array t :size #x6)) + :category "VERSION_2_1" :version "2.1") diff --git a/lib/opengl.lisp b/lib/opengl.lisp index 91d9423..62aead6 100644 --- a/lib/opengl.lisp +++ b/lib/opengl.lisp @@ -2383,2061 +2383,1376 @@ ;;;; {{{ display-list -(defglfun - (("ListBase" list-base) :args ((:name |base| :type |List| :direction :in)) - :return ("void") :category ("display-list") :version ("1.0") :glxropcode - ("3") :glsopcode ("0x0036") :offset ("6"))) -(defglfun - (("GenLists" gen-lists) :args ((:name |range| :type |SizeI| :direction :in)) - :return ("List") :dlflags ("notlistable") :category ("display-list") :version - ("1.0") :glxsingle ("104") :glsopcode ("0x0035") :offset ("5"))) -(defglfun - (("DeleteLists" delete-lists) :args - ((:name |list| :type |List| :direction :in) - (:name |range| :type |SizeI| :direction :in)) - :return ("void") :dlflags ("notlistable") :category ("display-list") :version - ("1.0") :glxsingle ("103") :glsopcode ("0x0034") :wglflags ("batchable") - :offset ("4"))) -(defglfun - (("CallLists" call-lists) :args - ((:name |n| :type |SizeI| :direction :in) - (:name |type| :type |ListNameType| :direction :in) - (:name |lists| :type |Void| :direction :in :array t :size (|n| |type|))) - :return ("void") :category ("display-list") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("2") - :glsopcode ("0x0033") :offset ("3"))) -(defglfun - (("CallList" call-list) :args ((:name |list| :type |List| :direction :in)) - :return ("void") :category ("display-list") :version ("1.0") :glxropcode - ("1") :glsopcode ("0x0032") :offset ("2"))) -(defglfun - (("EndList" end-list) :args nil :return ("void") :dlflags ("notlistable") - :category ("display-list") :version ("1.0") :glxsingle ("102") :glsopcode - ("0x0031") :wglflags ("batchable") :offset ("1"))) -(defglfun - (("NewList" new-list) :args - ((:name |list| :type |List| :direction :in) - (:name |mode| :type |ListMode| :direction :in)) - :return ("void") :dlflags ("notlistable") :category ("display-list") :version - ("1.0") :glxsingle ("101") :glsopcode ("0x0030") :wglflags ("batchable") - :offset ("0"))) +(defglfun "ListBase" list-base :return "void" :args + ((:name |base| :type |List| :direction :in)) :category "display-list" :version + "1.0") +(defglfun "GenLists" gen-lists :return "List" :args + ((:name |range| :type |SizeI| :direction :in)) :category "display-list" + :version "1.0") +(defglfun "DeleteLists" delete-lists :return "void" :args + ((:name |list| :type |List| :direction :in) + (:name |range| :type |SizeI| :direction :in)) + :category "display-list" :version "1.0") +(defglfun "CallLists" call-lists :return "void" :args + ((:name |n| :type |SizeI| :direction :in) + (:name |type| :type |ListNameType| :direction :in) + (:name |lists| :type |Void| :direction :in :array t :size (|n| |type|))) + :category "display-list" :version "1.0") +(defglfun "CallList" call-list :return "void" :args + ((:name |list| :type |List| :direction :in)) :category "display-list" :version + "1.0") +(defglfun "EndList" end-list :return "void" :args nil :category "display-list" + :version "1.0") +(defglfun "NewList" new-list :return "void" :args + ((:name |list| :type |List| :direction :in) + (:name |mode| :type |ListMode| :direction :in)) + :category "display-list" :version "1.0") ;;;; }}} ;;;; {{{ drawing -(defglfun - (("Vertex4sv" vertex-4sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("76") :glsopcode - ("0x007F") :offset ("149"))) -(defglfun - (("Vertex4s" vertex-4s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in) - (:name |w| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex4sv") :version - ("1.0") :offset ("148"))) -(defglfun - (("Vertex4iv" vertex-4iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("75") :glsopcode - ("0x007E") :offset ("147"))) -(defglfun - (("Vertex4i" vertex-4i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in) - (:name |w| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex4iv") :version - ("1.0") :offset ("146"))) -(defglfun - (("Vertex4fv" vertex-4fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("74") :glsopcode - ("0x007D") :offset ("145"))) -(defglfun - (("Vertex4f" vertex-4f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in) - (:name |w| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex4fv") :version - ("1.0") :offset ("144"))) -(defglfun - (("Vertex4dv" vertex-4dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("73") :glsopcode - ("0x007C") :offset ("143"))) -(defglfun - (("Vertex4d" vertex-4d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in) - (:name |w| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex4dv") :version - ("1.0") :offset ("142"))) -(defglfun - (("Vertex3sv" vertex-3sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("72") :glsopcode - ("0x007B") :offset ("141"))) -(defglfun - (("Vertex3s" vertex-3s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex3sv") :version - ("1.0") :offset ("140"))) -(defglfun - (("Vertex3iv" vertex-3iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("71") :glsopcode - ("0x007A") :offset ("139"))) -(defglfun - (("Vertex3i" vertex-3i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex3iv") :version - ("1.0") :offset ("138"))) -(defglfun - (("Vertex3fv" vertex-3fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("70") :glsopcode - ("0x0079") :offset ("137"))) -(defglfun - (("Vertex3f" vertex-3f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex3fv") :version - ("1.0") :offset ("136"))) -(defglfun - (("Vertex3dv" vertex-3dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("69") :glsopcode - ("0x0078") :offset ("135"))) -(defglfun - (("Vertex3d" vertex-3d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex3dv") :version - ("1.0") :offset ("134"))) -(defglfun - (("Vertex2sv" vertex-2sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("68") :glsopcode - ("0x0077") :offset ("133"))) -(defglfun - (("Vertex2s" vertex-2s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex2sv") :version - ("1.0") :offset ("132"))) -(defglfun - (("Vertex2iv" vertex-2iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("67") :glsopcode - ("0x0076") :offset ("131"))) -(defglfun - (("Vertex2i" vertex-2i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex2iv") :version - ("1.0") :offset ("130"))) -(defglfun - (("Vertex2fv" vertex-2fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("66") :glsopcode - ("0x0075") :offset ("129"))) -(defglfun - (("Vertex2f" vertex-2f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex2fv") :version - ("1.0") :offset ("128"))) -(defglfun - (("Vertex2dv" vertex-2dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("65") :glsopcode - ("0x0074") :offset ("127"))) -(defglfun - (("Vertex2d" vertex-2d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Vertex2dv") :version - ("1.0") :offset ("126"))) -(defglfun - (("TexCoord4sv" tex-coord-4sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("64") :glsopcode - ("0x0073") :offset ("125"))) -(defglfun - (("TexCoord4s" tex-coord-4s) :args - ((:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in) - (:name |r| :type |CoordS| :direction :in) - (:name |q| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord4sv") :version - ("1.0") :offset ("124"))) -(defglfun - (("TexCoord4iv" tex-coord-4iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("63") :glsopcode - ("0x0072") :offset ("123"))) -(defglfun - (("TexCoord4i" tex-coord-4i) :args - ((:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in) - (:name |r| :type |CoordI| :direction :in) - (:name |q| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord4iv") :version - ("1.0") :offset ("122"))) -(defglfun - (("TexCoord4fv" tex-coord-4fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("62") :glsopcode - ("0x0071") :offset ("121"))) -(defglfun - (("TexCoord4f" tex-coord-4f) :args - ((:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in) - (:name |r| :type |CoordF| :direction :in) - (:name |q| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord4fv") :version - ("1.0") :offset ("120"))) -(defglfun - (("TexCoord4dv" tex-coord-4dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("61") :glsopcode - ("0x0070") :offset ("119"))) -(defglfun - (("TexCoord4d" tex-coord-4d) :args - ((:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in) - (:name |r| :type |CoordD| :direction :in) - (:name |q| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord4dv") :version - ("1.0") :offset ("118"))) -(defglfun - (("TexCoord3sv" tex-coord-3sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("60") :glsopcode - ("0x006F") :offset ("117"))) -(defglfun - (("TexCoord3s" tex-coord-3s) :args - ((:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in) - (:name |r| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord3sv") :version - ("1.0") :offset ("116"))) -(defglfun - (("TexCoord3iv" tex-coord-3iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("59") :glsopcode - ("0x006E") :offset ("115"))) -(defglfun - (("TexCoord3i" tex-coord-3i) :args - ((:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in) - (:name |r| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord3iv") :version - ("1.0") :offset ("114"))) -(defglfun - (("TexCoord3fv" tex-coord-3fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("58") :glsopcode - ("0x006D") :offset ("113"))) -(defglfun - (("TexCoord3f" tex-coord-3f) :args - ((:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in) - (:name |r| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord3fv") :version - ("1.0") :offset ("112"))) -(defglfun - (("TexCoord3dv" tex-coord-3dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("57") :glsopcode - ("0x006C") :offset ("111"))) -(defglfun - (("TexCoord3d" tex-coord-3d) :args - ((:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in) - (:name |r| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord3dv") :version - ("1.0") :offset ("110"))) -(defglfun - (("TexCoord2sv" tex-coord-2sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("56") :glsopcode - ("0x006B") :offset ("109"))) -(defglfun - (("TexCoord2s" tex-coord-2s) :args - ((:name |s| :type |CoordS| :direction :in) - (:name |t| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord2sv") :version - ("1.0") :offset ("108"))) -(defglfun - (("TexCoord2iv" tex-coord-2iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("55") :glsopcode - ("0x006A") :offset ("107"))) -(defglfun - (("TexCoord2i" tex-coord-2i) :args - ((:name |s| :type |CoordI| :direction :in) - (:name |t| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord2iv") :version - ("1.0") :offset ("106"))) -(defglfun - (("TexCoord2fv" tex-coord-2fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("54") :glsopcode - ("0x0069") :offset ("105"))) -(defglfun - (("TexCoord2f" tex-coord-2f) :args - ((:name |s| :type |CoordF| :direction :in) - (:name |t| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord2fv") :version - ("1.0") :offset ("104"))) -(defglfun - (("TexCoord2dv" tex-coord-2dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("53") :glsopcode - ("0x0068") :offset ("103"))) -(defglfun - (("TexCoord2d" tex-coord-2d) :args - ((:name |s| :type |CoordD| :direction :in) - (:name |t| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord2dv") :version - ("1.0") :offset ("102"))) -(defglfun - (("TexCoord1sv" tex-coord-1sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x1)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("52") :glsopcode - ("0x0067") :offset ("101"))) -(defglfun - (("TexCoord1s" tex-coord-1s) :args ((:name |s| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord1sv") :version - ("1.0") :offset ("100"))) -(defglfun - (("TexCoord1iv" tex-coord-1iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x1)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("51") :glsopcode - ("0x0066") :offset ("99"))) -(defglfun - (("TexCoord1i" tex-coord-1i) :args ((:name |s| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord1iv") :version - ("1.0") :offset ("98"))) -(defglfun - (("TexCoord1fv" tex-coord-1fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x1)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("50") :glsopcode - ("0x0065") :offset ("97"))) -(defglfun - (("TexCoord1f" tex-coord-1f) :args ((:name |s| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord1fv") :version - ("1.0") :offset ("96"))) -(defglfun - (("TexCoord1dv" tex-coord-1dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x1)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("49") :glsopcode - ("0x0064") :offset ("95"))) -(defglfun - (("TexCoord1d" tex-coord-1d) :args ((:name |s| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("TexCoord1dv") :version - ("1.0") :offset ("94"))) -(defglfun - (("Rectsv" rect-sv) :args - ((:name |v1| :type |CoordS| :direction :in :array t :size #x2) - (:name |v2| :type |CoordS| :direction :in :array t :size #x2)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("48") - :glsopcode ("0x0063") :offset ("93"))) -(defglfun - (("Rects" rect-s) :args - ((:name |x1| :type |CoordS| :direction :in) - (:name |y1| :type |CoordS| :direction :in) - (:name |x2| :type |CoordS| :direction :in) - (:name |y2| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Rectsv") :version - ("1.0") :offset ("92"))) -(defglfun - (("Rectiv" rect-iv) :args - ((:name |v1| :type |CoordI| :direction :in :array t :size #x2) - (:name |v2| :type |CoordI| :direction :in :array t :size #x2)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("47") - :glsopcode ("0x0062") :offset ("91"))) -(defglfun - (("Recti" rect-i) :args - ((:name |x1| :type |CoordI| :direction :in) - (:name |y1| :type |CoordI| :direction :in) - (:name |x2| :type |CoordI| :direction :in) - (:name |y2| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Rectiv") :version - ("1.0") :offset ("90"))) -(defglfun - (("Rectfv" rect-fv) :args - ((:name |v1| :type |CoordF| :direction :in :array t :size #x2) - (:name |v2| :type |CoordF| :direction :in :array t :size #x2)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("46") - :glsopcode ("0x0061") :offset ("89"))) -(defglfun - (("Rectf" rect-f) :args - ((:name |x1| :type |CoordF| :direction :in) - (:name |y1| :type |CoordF| :direction :in) - (:name |x2| :type |CoordF| :direction :in) - (:name |y2| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Rectfv") :version - ("1.0") :offset ("88"))) -(defglfun - (("Rectdv" rect-dv) :args - ((:name |v1| :type |CoordD| :direction :in :array t :size #x2) - (:name |v2| :type |CoordD| :direction :in :array t :size #x2)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("45") - :glsopcode ("0x0060") :offset ("87"))) -(defglfun - (("Rectd" rect-d) :args - ((:name |x1| :type |CoordD| :direction :in) - (:name |y1| :type |CoordD| :direction :in) - (:name |x2| :type |CoordD| :direction :in) - (:name |y2| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Rectdv") :version - ("1.0") :offset ("86"))) -(defglfun - (("RasterPos4sv" raster-pos-4sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("44") :glsopcode - ("0x005F") :offset ("85"))) -(defglfun - (("RasterPos4s" raster-pos-4s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in) - (:name |w| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos4sv") :version - ("1.0") :offset ("84"))) -(defglfun - (("RasterPos4iv" raster-pos-4iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("43") :glsopcode - ("0x005E") :offset ("83"))) -(defglfun - (("RasterPos4i" raster-pos-4i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in) - (:name |w| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos4iv") :version - ("1.0") :offset ("82"))) -(defglfun - (("RasterPos4fv" raster-pos-4fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("42") :glsopcode - ("0x005D") :offset ("81"))) -(defglfun - (("RasterPos4f" raster-pos-4f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in) - (:name |w| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos4fv") :version - ("1.0") :offset ("80"))) -(defglfun - (("RasterPos4dv" raster-pos-4dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("41") :glsopcode - ("0x005C") :offset ("79"))) -(defglfun - (("RasterPos4d" raster-pos-4d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in) - (:name |w| :type |CoordD| :direction :in)) - :return ("void") :vectorequiv ("RasterPos4dv") :category ("drawing") :version - ("1.0") :offset ("78"))) -(defglfun - (("RasterPos3sv" raster-pos-3sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("40") :glsopcode - ("0x005B") :offset ("77"))) -(defglfun - (("RasterPos3s" raster-pos-3s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in) - (:name |z| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos3sv") :version - ("1.0") :offset ("76"))) -(defglfun - (("RasterPos3iv" raster-pos-3iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("39") :glsopcode - ("0x005A") :offset ("75"))) -(defglfun - (("RasterPos3i" raster-pos-3i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in) - (:name |z| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos3iv") :version - ("1.0") :offset ("74"))) -(defglfun - (("RasterPos3fv" raster-pos-3fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("38") :glsopcode - ("0x0059") :offset ("73"))) -(defglfun - (("RasterPos3f" raster-pos-3f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in) - (:name |z| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos3fv") :version - ("1.0") :offset ("72"))) -(defglfun - (("RasterPos3dv" raster-pos-3dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("37") :glsopcode - ("0x0058") :offset ("71"))) -(defglfun - (("RasterPos3d" raster-pos-3d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in) - (:name |z| :type |CoordD| :direction :in)) - :return ("void") :vectorequiv ("RasterPos3dv") :category ("drawing") :version - ("1.0") :offset ("70"))) -(defglfun - (("RasterPos2sv" raster-pos-2sv) :args - ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("36") :glsopcode - ("0x0057") :offset ("69"))) -(defglfun - (("RasterPos2s" raster-pos-2s) :args - ((:name |x| :type |CoordS| :direction :in) - (:name |y| :type |CoordS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos2sv") :version - ("1.0") :offset ("68"))) -(defglfun - (("RasterPos2iv" raster-pos-2iv) :args - ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("35") :glsopcode - ("0x0056") :offset ("67"))) -(defglfun - (("RasterPos2i" raster-pos-2i) :args - ((:name |x| :type |CoordI| :direction :in) - (:name |y| :type |CoordI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos2iv") :version - ("1.0") :offset ("66"))) -(defglfun - (("RasterPos2fv" raster-pos-2fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("34") :glsopcode - ("0x0055") :offset ("65"))) -(defglfun - (("RasterPos2f" raster-pos-2f) :args - ((:name |x| :type |CoordF| :direction :in) - (:name |y| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos2fv") :version - ("1.0") :offset ("64"))) -(defglfun - (("RasterPos2dv" raster-pos-2dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("33") :glsopcode - ("0x0054") :offset ("63"))) -(defglfun - (("RasterPos2d" raster-pos-2d) :args - ((:name |x| :type |CoordD| :direction :in) - (:name |y| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("RasterPos2dv") :version - ("1.0") :offset ("62"))) -(defglfun - (("Normal3sv" normal-3sv) :args - ((:name |v| :type |Int16| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("32") :glsopcode - ("0x0053") :offset ("61"))) -(defglfun - (("Normal3s" normal-3s) :args - ((:name |nx| :type |Int16| :direction :in) - (:name |ny| :type |Int16| :direction :in) - (:name |nz| :type |Int16| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Normal3sv") :version - ("1.0") :offset ("60"))) -(defglfun - (("Normal3iv" normal-3iv) :args - ((:name |v| :type |Int32| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("31") :glsopcode - ("0x0052") :offset ("59"))) -(defglfun - (("Normal3i" normal-3i) :args - ((:name |nx| :type |Int32| :direction :in) - (:name |ny| :type |Int32| :direction :in) - (:name |nz| :type |Int32| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Normal3iv") :version - ("1.0") :offset ("58"))) -(defglfun - (("Normal3fv" normal-3fv) :args - ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("30") :glsopcode - ("0x0051") :offset ("57"))) -(defglfun - (("Normal3f" normal-3f) :args - ((:name |nx| :type |CoordF| :direction :in) - (:name |ny| :type |CoordF| :direction :in) - (:name |nz| :type |CoordF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Normal3fv") :version - ("1.0") :offset ("56"))) -(defglfun - (("Normal3dv" normal-3dv) :args - ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("29") :glsopcode - ("0x0050") :offset ("55"))) -(defglfun - (("Normal3d" normal-3d) :args - ((:name |nx| :type |CoordD| :direction :in) - (:name |ny| :type |CoordD| :direction :in) - (:name |nz| :type |CoordD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Normal3dv") :version - ("1.0") :offset ("54"))) -(defglfun - (("Normal3bv" normal-3bv) :args - ((:name |v| :type |Int8| :direction :in :array t :size #x3)) :return ("void") - :category ("drawing") :version ("1.0") :glxropcode ("28") :glsopcode - ("0x004F") :offset ("53"))) -(defglfun - (("Normal3b" normal-3b) :args - ((:name |nx| :type |Int8| :direction :in) - (:name |ny| :type |Int8| :direction :in) - (:name |nz| :type |Int8| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Normal3bv") :version - ("1.0") :offset ("52"))) -(defglfun - (("Indexsv" index-sv) :args - ((:name |c| :type |ColorIndexValueS| :direction :in :array t :size #x1)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("27") - :glsopcode ("0x004E") :offset ("51"))) -(defglfun - (("Indexs" index-s) :args - ((:name |c| :type |ColorIndexValueS| :direction :in)) :return ("void") - :category ("drawing") :vectorequiv ("Indexsv") :version ("1.0") :offset - ("50"))) -(defglfun - (("Indexiv" index-iv) :args - ((:name |c| :type |ColorIndexValueI| :direction :in :array t :size #x1)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("26") - :glsopcode ("0x004D") :offset ("49"))) -(defglfun - (("Indexi" index-i) :args - ((:name |c| :type |ColorIndexValueI| :direction :in)) :return ("void") - :category ("drawing") :vectorequiv ("Indexiv") :version ("1.0") :offset - ("48"))) -(defglfun - (("Indexfv" index-fv) :args - ((:name |c| :type |ColorIndexValueF| :direction :in :array t :size #x1)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("25") - :glsopcode ("0x004C") :offset ("47"))) -(defglfun - (("Indexf" index-f) :args - ((:name |c| :type |ColorIndexValueF| :direction :in)) :return ("void") - :category ("drawing") :vectorequiv ("Indexfv") :version ("1.0") :offset - ("46"))) -(defglfun - (("Indexdv" index-dv) :args - ((:name |c| :type |ColorIndexValueD| :direction :in :array t :size #x1)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("24") - :glsopcode ("0x004B") :offset ("45"))) -(defglfun - (("Indexd" index-d) :args - ((:name |c| :type |ColorIndexValueD| :direction :in)) :return ("void") - :category ("drawing") :vectorequiv ("Indexdv") :version ("1.0") :offset - ("44"))) -(defglfun - (("End" end) :args nil :return ("void") :category ("drawing") :version ("1.0") - :glxropcode ("23") :glsopcode ("0x004A") :offset ("43"))) -(defglfun - (("EdgeFlagv" edge-flagv) :args - ((:name |flag| :type |Boolean| :direction :in :array t :size #x1)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("22") :glsopcode - ("0x0049") :offset ("42"))) -(defglfun - (("EdgeFlag" edge-flag) :args ((:name |flag| :type |Boolean| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("EdgeFlagv") :version - ("1.0") :offset ("41"))) -(defglfun - (("Color4usv" color-4usv) :args - ((:name |v| :type |ColorUS| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("21") :glsopcode - ("0x0048") :offset ("40"))) -(defglfun - (("Color4us" color-4us) :args - ((:name |red| :type |ColorUS| :direction :in) - (:name |green| :type |ColorUS| :direction :in) - (:name |blue| :type |ColorUS| :direction :in) - (:name |alpha| :type |ColorUS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4usv") :version - ("1.0") :offset ("39"))) -(defglfun - (("Color4uiv" color-4uiv) :args - ((:name |v| :type |ColorUI| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("20") :glsopcode - ("0x0047") :offset ("38"))) -(defglfun - (("Color4ui" color-4ui) :args - ((:name |red| :type |ColorUI| :direction :in) - (:name |green| :type |ColorUI| :direction :in) - (:name |blue| :type |ColorUI| :direction :in) - (:name |alpha| :type |ColorUI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4uiv") :version - ("1.0") :offset ("37"))) -(defglfun - (("Color4ubv" color-4ubv) :args - ((:name |v| :type |ColorUB| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("19") :glsopcode - ("0x0046") :offset ("36"))) -(defglfun - (("Color4ub" color-4ub) :args - ((:name |red| :type |ColorUB| :direction :in) - (:name |green| :type |ColorUB| :direction :in) - (:name |blue| :type |ColorUB| :direction :in) - (:name |alpha| :type |ColorUB| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4ubv") :version - ("1.0") :offset ("35"))) -(defglfun - (("Color4sv" color-4sv) :args - ((:name |v| :type |ColorS| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("18") :glsopcode - ("0x0045") :offset ("34"))) -(defglfun - (("Color4s" color-4s) :args - ((:name |red| :type |ColorS| :direction :in) - (:name |green| :type |ColorS| :direction :in) - (:name |blue| :type |ColorS| :direction :in) - (:name |alpha| :type |ColorS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4sv") :version - ("1.0") :offset ("33"))) -(defglfun - (("Color4iv" color-4iv) :args - ((:name |v| :type |ColorI| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("17") :glsopcode - ("0x0044") :offset ("32"))) -(defglfun - (("Color4i" color-4i) :args - ((:name |red| :type |ColorI| :direction :in) - (:name |green| :type |ColorI| :direction :in) - (:name |blue| :type |ColorI| :direction :in) - (:name |alpha| :type |ColorI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4iv") :version - ("1.0") :offset ("31"))) -(defglfun - (("Color4fv" color-4fv) :args - ((:name |v| :type |ColorF| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("16") :glsopcode - ("0x0043") :offset ("30"))) -(defglfun - (("Color4f" color-4f) :args - ((:name |red| :type |ColorF| :direction :in) - (:name |green| :type |ColorF| :direction :in) - (:name |blue| :type |ColorF| :direction :in) - (:name |alpha| :type |ColorF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4fv") :version - ("1.0") :offset ("29"))) -(defglfun - (("Color4dv" color-4dv) :args - ((:name |v| :type |ColorD| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("15") :glsopcode - ("0x0042") :offset ("28"))) -(defglfun - (("Color4d" color-4d) :args - ((:name |red| :type |ColorD| :direction :in) - (:name |green| :type |ColorD| :direction :in) - (:name |blue| :type |ColorD| :direction :in) - (:name |alpha| :type |ColorD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4dv") :version - ("1.0") :offset ("27"))) -(defglfun - (("Color4bv" color-4bv) :args - ((:name |v| :type |ColorB| :direction :in :array t :size #x4)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("14") :glsopcode - ("0x0041") :offset ("26"))) -(defglfun - (("Color4b" color-4b) :args - ((:name |red| :type |ColorB| :direction :in) - (:name |green| :type |ColorB| :direction :in) - (:name |blue| :type |ColorB| :direction :in) - (:name |alpha| :type |ColorB| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color4bv") :version - ("1.0") :offset ("25"))) -(defglfun - (("Color3usv" color-3usv) :args - ((:name |v| :type |ColorUS| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("13") :glsopcode - ("0x0040") :offset ("24"))) -(defglfun - (("Color3us" color-3us) :args - ((:name |red| :type |ColorUS| :direction :in) - (:name |green| :type |ColorUS| :direction :in) - (:name |blue| :type |ColorUS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3usv") :version - ("1.0") :offset ("23"))) -(defglfun - (("Color3uiv" color-3uiv) :args - ((:name |v| :type |ColorUI| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("12") :glsopcode - ("0x003F") :offset ("22"))) -(defglfun - (("Color3ui" color-3ui) :args - ((:name |red| :type |ColorUI| :direction :in) - (:name |green| :type |ColorUI| :direction :in) - (:name |blue| :type |ColorUI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3uiv") :version - ("1.0") :offset ("21"))) -(defglfun - (("Color3ubv" color-3ubv) :args - ((:name |v| :type |ColorUB| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("11") :glsopcode - ("0x003E") :offset ("20"))) -(defglfun - (("Color3ub" color-3ub) :args - ((:name |red| :type |ColorUB| :direction :in) - (:name |green| :type |ColorUB| :direction :in) - (:name |blue| :type |ColorUB| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3ubv") :version - ("1.0") :offset ("19"))) -(defglfun - (("Color3sv" color-3sv) :args - ((:name |v| :type |ColorS| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("10") :glsopcode - ("0x003D") :offset ("18"))) -(defglfun - (("Color3s" color-3s) :args - ((:name |red| :type |ColorS| :direction :in) - (:name |green| :type |ColorS| :direction :in) - (:name |blue| :type |ColorS| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3sv") :version - ("1.0") :offset ("17"))) -(defglfun - (("Color3iv" color-3iv) :args - ((:name |v| :type |ColorI| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("9") :glsopcode - ("0x003C") :offset ("16"))) -(defglfun - (("Color3i" color-3i) :args - ((:name |red| :type |ColorI| :direction :in) - (:name |green| :type |ColorI| :direction :in) - (:name |blue| :type |ColorI| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3iv") :version - ("1.0") :offset ("15"))) -(defglfun - (("Color3fv" color-3fv) :args - ((:name |v| :type |ColorF| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("8") :glsopcode - ("0x003B") :offset ("14"))) -(defglfun - (("Color3f" color-3f) :args - ((:name |red| :type |ColorF| :direction :in) - (:name |green| :type |ColorF| :direction :in) - (:name |blue| :type |ColorF| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3fv") :version - ("1.0") :offset ("13"))) -(defglfun - (("Color3dv" color-3dv) :args - ((:name |v| :type |ColorD| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("7") :glsopcode - ("0x003A") :offset ("12"))) -(defglfun - (("Color3d" color-3d) :args - ((:name |red| :type |ColorD| :direction :in) - (:name |green| :type |ColorD| :direction :in) - (:name |blue| :type |ColorD| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3dv") :version - ("1.0") :offset ("11"))) -(defglfun - (("Color3bv" color-3bv) :args - ((:name |v| :type |ColorB| :direction :in :array t :size #x3)) :return - ("void") :category ("drawing") :version ("1.0") :glxropcode ("6") :glsopcode - ("0x0039") :offset ("10"))) -(defglfun - (("Color3b" color-3b) :args - ((:name |red| :type |ColorB| :direction :in) - (:name |green| :type |ColorB| :direction :in) - (:name |blue| :type |ColorB| :direction :in)) - :return ("void") :category ("drawing") :vectorequiv ("Color3bv") :version - ("1.0") :offset ("9"))) -(defglfun - (("Bitmap" bitmap) :args - ((:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |xorig| :type |CoordF| :direction :in) - (:name |yorig| :type |CoordF| :direction :in) - (:name |xmove| :type |CoordF| :direction :in) - (:name |ymove| :type |CoordF| :direction :in) - (:name |bitmap| :type |UInt8| :direction :in :array t :size - (|width| |height|))) - :return ("void") :category ("drawing") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("5") - :glsflags ("pixel-unpack") :glsopcode ("0x0038") :wglflags - ("client-handcode" "server-handcode") :offset ("8"))) -(defglfun - (("Begin" begin) :args ((:name |mode| :type |BeginMode| :direction :in)) - :return ("void") :category ("drawing") :version ("1.0") :glxropcode ("4") - :glsopcode ("0x0037") :offset ("7"))) +(defglfun "Vertex4sv" vertex-4sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Vertex4s" vertex-4s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in) + (:name |w| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex4iv" vertex-4iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Vertex4i" vertex-4i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in) + (:name |w| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex4fv" vertex-4fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Vertex4f" vertex-4f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in) + (:name |w| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex4dv" vertex-4dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Vertex4d" vertex-4d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in) + (:name |w| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex3sv" vertex-3sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Vertex3s" vertex-3s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex3iv" vertex-3iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Vertex3i" vertex-3i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex3fv" vertex-3fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Vertex3f" vertex-3f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex3dv" vertex-3dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Vertex3d" vertex-3d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex2sv" vertex-2sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "Vertex2s" vertex-2s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex2iv" vertex-2iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "Vertex2i" vertex-2i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex2fv" vertex-2fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "Vertex2f" vertex-2f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Vertex2dv" vertex-2dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "Vertex2d" vertex-2d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord4sv" tex-coord-4sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "TexCoord4s" tex-coord-4s :return "void" :args + ((:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in) + (:name |r| :type |CoordS| :direction :in) + (:name |q| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord4iv" tex-coord-4iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "TexCoord4i" tex-coord-4i :return "void" :args + ((:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in) + (:name |r| :type |CoordI| :direction :in) + (:name |q| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord4fv" tex-coord-4fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "TexCoord4f" tex-coord-4f :return "void" :args + ((:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in) + (:name |r| :type |CoordF| :direction :in) + (:name |q| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord4dv" tex-coord-4dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "TexCoord4d" tex-coord-4d :return "void" :args + ((:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in) + (:name |r| :type |CoordD| :direction :in) + (:name |q| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord3sv" tex-coord-3sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "TexCoord3s" tex-coord-3s :return "void" :args + ((:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in) + (:name |r| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord3iv" tex-coord-3iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "TexCoord3i" tex-coord-3i :return "void" :args + ((:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in) + (:name |r| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord3fv" tex-coord-3fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "TexCoord3f" tex-coord-3f :return "void" :args + ((:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in) + (:name |r| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord3dv" tex-coord-3dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "TexCoord3d" tex-coord-3d :return "void" :args + ((:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in) + (:name |r| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord2sv" tex-coord-2sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "TexCoord2s" tex-coord-2s :return "void" :args + ((:name |s| :type |CoordS| :direction :in) + (:name |t| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord2iv" tex-coord-2iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "TexCoord2i" tex-coord-2i :return "void" :args + ((:name |s| :type |CoordI| :direction :in) + (:name |t| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord2fv" tex-coord-2fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "TexCoord2f" tex-coord-2f :return "void" :args + ((:name |s| :type |CoordF| :direction :in) + (:name |t| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord2dv" tex-coord-2dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "TexCoord2d" tex-coord-2d :return "void" :args + ((:name |s| :type |CoordD| :direction :in) + (:name |t| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "TexCoord1sv" tex-coord-1sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x1)) :category + "drawing" :version "1.0") +(defglfun "TexCoord1s" tex-coord-1s :return "void" :args + ((:name |s| :type |CoordS| :direction :in)) :category "drawing" :version "1.0") +(defglfun "TexCoord1iv" tex-coord-1iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x1)) :category + "drawing" :version "1.0") +(defglfun "TexCoord1i" tex-coord-1i :return "void" :args + ((:name |s| :type |CoordI| :direction :in)) :category "drawing" :version "1.0") +(defglfun "TexCoord1fv" tex-coord-1fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x1)) :category + "drawing" :version "1.0") +(defglfun "TexCoord1f" tex-coord-1f :return "void" :args + ((:name |s| :type |CoordF| :direction :in)) :category "drawing" :version "1.0") +(defglfun "TexCoord1dv" tex-coord-1dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x1)) :category + "drawing" :version "1.0") +(defglfun "TexCoord1d" tex-coord-1d :return "void" :args + ((:name |s| :type |CoordD| :direction :in)) :category "drawing" :version "1.0") +(defglfun "Rectsv" rect-sv :return "void" :args + ((:name |v1| :type |CoordS| :direction :in :array t :size #x2) + (:name |v2| :type |CoordS| :direction :in :array t :size #x2)) + :category "drawing" :version "1.0") +(defglfun "Rects" rect-s :return "void" :args + ((:name |x1| :type |CoordS| :direction :in) + (:name |y1| :type |CoordS| :direction :in) + (:name |x2| :type |CoordS| :direction :in) + (:name |y2| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Rectiv" rect-iv :return "void" :args + ((:name |v1| :type |CoordI| :direction :in :array t :size #x2) + (:name |v2| :type |CoordI| :direction :in :array t :size #x2)) + :category "drawing" :version "1.0") +(defglfun "Recti" rect-i :return "void" :args + ((:name |x1| :type |CoordI| :direction :in) + (:name |y1| :type |CoordI| :direction :in) + (:name |x2| :type |CoordI| :direction :in) + (:name |y2| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Rectfv" rect-fv :return "void" :args + ((:name |v1| :type |CoordF| :direction :in :array t :size #x2) + (:name |v2| :type |CoordF| :direction :in :array t :size #x2)) + :category "drawing" :version "1.0") +(defglfun "Rectf" rect-f :return "void" :args + ((:name |x1| :type |CoordF| :direction :in) + (:name |y1| :type |CoordF| :direction :in) + (:name |x2| :type |CoordF| :direction :in) + (:name |y2| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Rectdv" rect-dv :return "void" :args + ((:name |v1| :type |CoordD| :direction :in :array t :size #x2) + (:name |v2| :type |CoordD| :direction :in :array t :size #x2)) + :category "drawing" :version "1.0") +(defglfun "Rectd" rect-d :return "void" :args + ((:name |x1| :type |CoordD| :direction :in) + (:name |y1| :type |CoordD| :direction :in) + (:name |x2| :type |CoordD| :direction :in) + (:name |y2| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos4sv" raster-pos-4sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "RasterPos4s" raster-pos-4s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in) + (:name |w| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos4iv" raster-pos-4iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "RasterPos4i" raster-pos-4i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in) + (:name |w| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos4fv" raster-pos-4fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "RasterPos4f" raster-pos-4f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in) + (:name |w| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos4dv" raster-pos-4dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "RasterPos4d" raster-pos-4d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in) + (:name |w| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos3sv" raster-pos-3sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "RasterPos3s" raster-pos-3s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in) + (:name |z| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos3iv" raster-pos-3iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "RasterPos3i" raster-pos-3i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in) + (:name |z| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos3fv" raster-pos-3fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "RasterPos3f" raster-pos-3f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in) + (:name |z| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos3dv" raster-pos-3dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "RasterPos3d" raster-pos-3d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in) + (:name |z| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos2sv" raster-pos-2sv :return "void" :args + ((:name |v| :type |CoordS| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "RasterPos2s" raster-pos-2s :return "void" :args + ((:name |x| :type |CoordS| :direction :in) + (:name |y| :type |CoordS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos2iv" raster-pos-2iv :return "void" :args + ((:name |v| :type |CoordI| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "RasterPos2i" raster-pos-2i :return "void" :args + ((:name |x| :type |CoordI| :direction :in) + (:name |y| :type |CoordI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos2fv" raster-pos-2fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "RasterPos2f" raster-pos-2f :return "void" :args + ((:name |x| :type |CoordF| :direction :in) + (:name |y| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "RasterPos2dv" raster-pos-2dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x2)) :category + "drawing" :version "1.0") +(defglfun "RasterPos2d" raster-pos-2d :return "void" :args + ((:name |x| :type |CoordD| :direction :in) + (:name |y| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Normal3sv" normal-3sv :return "void" :args + ((:name |v| :type |Int16| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Normal3s" normal-3s :return "void" :args + ((:name |nx| :type |Int16| :direction :in) + (:name |ny| :type |Int16| :direction :in) + (:name |nz| :type |Int16| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Normal3iv" normal-3iv :return "void" :args + ((:name |v| :type |Int32| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Normal3i" normal-3i :return "void" :args + ((:name |nx| :type |Int32| :direction :in) + (:name |ny| :type |Int32| :direction :in) + (:name |nz| :type |Int32| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Normal3fv" normal-3fv :return "void" :args + ((:name |v| :type |CoordF| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Normal3f" normal-3f :return "void" :args + ((:name |nx| :type |CoordF| :direction :in) + (:name |ny| :type |CoordF| :direction :in) + (:name |nz| :type |CoordF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Normal3dv" normal-3dv :return "void" :args + ((:name |v| :type |CoordD| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Normal3d" normal-3d :return "void" :args + ((:name |nx| :type |CoordD| :direction :in) + (:name |ny| :type |CoordD| :direction :in) + (:name |nz| :type |CoordD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Normal3bv" normal-3bv :return "void" :args + ((:name |v| :type |Int8| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Normal3b" normal-3b :return "void" :args + ((:name |nx| :type |Int8| :direction :in) + (:name |ny| :type |Int8| :direction :in) + (:name |nz| :type |Int8| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Indexsv" index-sv :return "void" :args + ((:name |c| :type |ColorIndexValueS| :direction :in :array t :size #x1)) + :category "drawing" :version "1.0") +(defglfun "Indexs" index-s :return "void" :args + ((:name |c| :type |ColorIndexValueS| :direction :in)) :category "drawing" + :version "1.0") +(defglfun "Indexiv" index-iv :return "void" :args + ((:name |c| :type |ColorIndexValueI| :direction :in :array t :size #x1)) + :category "drawing" :version "1.0") +(defglfun "Indexi" index-i :return "void" :args + ((:name |c| :type |ColorIndexValueI| :direction :in)) :category "drawing" + :version "1.0") +(defglfun "Indexfv" index-fv :return "void" :args + ((:name |c| :type |ColorIndexValueF| :direction :in :array t :size #x1)) + :category "drawing" :version "1.0") +(defglfun "Indexf" index-f :return "void" :args + ((:name |c| :type |ColorIndexValueF| :direction :in)) :category "drawing" + :version "1.0") +(defglfun "Indexdv" index-dv :return "void" :args + ((:name |c| :type |ColorIndexValueD| :direction :in :array t :size #x1)) + :category "drawing" :version "1.0") +(defglfun "Indexd" index-d :return "void" :args + ((:name |c| :type |ColorIndexValueD| :direction :in)) :category "drawing" + :version "1.0") +(defglfun "End" end :return "void" :args nil :category "drawing" :version "1.0") +(defglfun "EdgeFlagv" edge-flagv :return "void" :args + ((:name |flag| :type |Boolean| :direction :in :array t :size #x1)) :category + "drawing" :version "1.0") +(defglfun "EdgeFlag" edge-flag :return "void" :args + ((:name |flag| :type |Boolean| :direction :in)) :category "drawing" :version + "1.0") +(defglfun "Color4usv" color-4usv :return "void" :args + ((:name |v| :type |ColorUS| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4us" color-4us :return "void" :args + ((:name |red| :type |ColorUS| :direction :in) + (:name |green| :type |ColorUS| :direction :in) + (:name |blue| :type |ColorUS| :direction :in) + (:name |alpha| :type |ColorUS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4uiv" color-4uiv :return "void" :args + ((:name |v| :type |ColorUI| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4ui" color-4ui :return "void" :args + ((:name |red| :type |ColorUI| :direction :in) + (:name |green| :type |ColorUI| :direction :in) + (:name |blue| :type |ColorUI| :direction :in) + (:name |alpha| :type |ColorUI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4ubv" color-4ubv :return "void" :args + ((:name |v| :type |ColorUB| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4ub" color-4ub :return "void" :args + ((:name |red| :type |ColorUB| :direction :in) + (:name |green| :type |ColorUB| :direction :in) + (:name |blue| :type |ColorUB| :direction :in) + (:name |alpha| :type |ColorUB| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4sv" color-4sv :return "void" :args + ((:name |v| :type |ColorS| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4s" color-4s :return "void" :args + ((:name |red| :type |ColorS| :direction :in) + (:name |green| :type |ColorS| :direction :in) + (:name |blue| :type |ColorS| :direction :in) + (:name |alpha| :type |ColorS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4iv" color-4iv :return "void" :args + ((:name |v| :type |ColorI| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4i" color-4i :return "void" :args + ((:name |red| :type |ColorI| :direction :in) + (:name |green| :type |ColorI| :direction :in) + (:name |blue| :type |ColorI| :direction :in) + (:name |alpha| :type |ColorI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4fv" color-4fv :return "void" :args + ((:name |v| :type |ColorF| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4f" color-4f :return "void" :args + ((:name |red| :type |ColorF| :direction :in) + (:name |green| :type |ColorF| :direction :in) + (:name |blue| :type |ColorF| :direction :in) + (:name |alpha| :type |ColorF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4dv" color-4dv :return "void" :args + ((:name |v| :type |ColorD| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4d" color-4d :return "void" :args + ((:name |red| :type |ColorD| :direction :in) + (:name |green| :type |ColorD| :direction :in) + (:name |blue| :type |ColorD| :direction :in) + (:name |alpha| :type |ColorD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color4bv" color-4bv :return "void" :args + ((:name |v| :type |ColorB| :direction :in :array t :size #x4)) :category + "drawing" :version "1.0") +(defglfun "Color4b" color-4b :return "void" :args + ((:name |red| :type |ColorB| :direction :in) + (:name |green| :type |ColorB| :direction :in) + (:name |blue| :type |ColorB| :direction :in) + (:name |alpha| :type |ColorB| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3usv" color-3usv :return "void" :args + ((:name |v| :type |ColorUS| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3us" color-3us :return "void" :args + ((:name |red| :type |ColorUS| :direction :in) + (:name |green| :type |ColorUS| :direction :in) + (:name |blue| :type |ColorUS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3uiv" color-3uiv :return "void" :args + ((:name |v| :type |ColorUI| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3ui" color-3ui :return "void" :args + ((:name |red| :type |ColorUI| :direction :in) + (:name |green| :type |ColorUI| :direction :in) + (:name |blue| :type |ColorUI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3ubv" color-3ubv :return "void" :args + ((:name |v| :type |ColorUB| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3ub" color-3ub :return "void" :args + ((:name |red| :type |ColorUB| :direction :in) + (:name |green| :type |ColorUB| :direction :in) + (:name |blue| :type |ColorUB| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3sv" color-3sv :return "void" :args + ((:name |v| :type |ColorS| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3s" color-3s :return "void" :args + ((:name |red| :type |ColorS| :direction :in) + (:name |green| :type |ColorS| :direction :in) + (:name |blue| :type |ColorS| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3iv" color-3iv :return "void" :args + ((:name |v| :type |ColorI| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3i" color-3i :return "void" :args + ((:name |red| :type |ColorI| :direction :in) + (:name |green| :type |ColorI| :direction :in) + (:name |blue| :type |ColorI| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3fv" color-3fv :return "void" :args + ((:name |v| :type |ColorF| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3f" color-3f :return "void" :args + ((:name |red| :type |ColorF| :direction :in) + (:name |green| :type |ColorF| :direction :in) + (:name |blue| :type |ColorF| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3dv" color-3dv :return "void" :args + ((:name |v| :type |ColorD| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3d" color-3d :return "void" :args + ((:name |red| :type |ColorD| :direction :in) + (:name |green| :type |ColorD| :direction :in) + (:name |blue| :type |ColorD| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Color3bv" color-3bv :return "void" :args + ((:name |v| :type |ColorB| :direction :in :array t :size #x3)) :category + "drawing" :version "1.0") +(defglfun "Color3b" color-3b :return "void" :args + ((:name |red| :type |ColorB| :direction :in) + (:name |green| :type |ColorB| :direction :in) + (:name |blue| :type |ColorB| :direction :in)) + :category "drawing" :version "1.0") +(defglfun "Bitmap" bitmap :return "void" :args + ((:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |xorig| :type |CoordF| :direction :in) + (:name |yorig| :type |CoordF| :direction :in) + (:name |xmove| :type |CoordF| :direction :in) + (:name |ymove| :type |CoordF| :direction :in) + (:name |bitmap| :type |UInt8| :direction :in :array t :size + (|width| |height|))) + :category "drawing" :version "1.0") +(defglfun "Begin" begin :return "void" :args + ((:name |mode| :type |BeginMode| :direction :in)) :category "drawing" :version + "1.0") ;;;; }}} ;;;; {{{ drawing-control -(defglfun - (("TexGeniv" tex-gen-iv) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("120") :glsflags ("gl-enum") :glsopcode ("0x00AB") :wglflags ("small-data") - :offset ("193"))) -(defglfun - (("TexGeni" tex-gen-i) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("119") :glsflags ("gl-enum") :glsopcode ("0x00AA") :wglflags ("small-data") - :offset ("192"))) -(defglfun - (("TexGenfv" tex-gen-fv) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("118") :glsflags ("gl-enum") :glsopcode ("0x00A9") :wglflags ("small-data") - :offset ("191"))) -(defglfun - (("TexGenf" tex-gen-f) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("117") :glsflags ("gl-enum") :glsopcode ("0x00A8") :wglflags ("small-data") - :offset ("190"))) -(defglfun - (("TexGendv" tex-gen-dv) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |params| :type |Float64| :direction :in :array t :size (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("116") :glsflags ("gl-enum") :glsopcode ("0x00A7") :wglflags ("small-data") - :offset ("189"))) -(defglfun - (("TexGend" tex-gen-d) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |param| :type |Float64| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("115") :glsflags ("gl-enum") :glsopcode ("0x00A6") :wglflags ("small-data") - :offset ("188"))) -(defglfun - (("TexEnviv" tex-env-iv) :args - ((:name |target| :type |TextureEnvTarget| :direction :in) - (:name |pname| :type |TextureEnvParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("114") :glsflags ("gl-enum") :glsopcode ("0x00A5") :wglflags ("small-data") - :offset ("187"))) -(defglfun - (("TexEnvi" tex-env-i) :args - ((:name |target| :type |TextureEnvTarget| :direction :in) - (:name |pname| :type |TextureEnvParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("113") :glsflags ("gl-enum") :glsopcode ("0x00A4") :wglflags ("small-data") - :offset ("186"))) -(defglfun - (("TexEnvfv" tex-env-fv) :args - ((:name |target| :type |TextureEnvTarget| :direction :in) - (:name |pname| :type |TextureEnvParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("112") :glsflags ("gl-enum") :glsopcode ("0x00A3") :wglflags ("small-data") - :offset ("185"))) -(defglfun - (("TexEnvf" tex-env-f) :args - ((:name |target| :type |TextureEnvTarget| :direction :in) - (:name |pname| :type |TextureEnvParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("111") :glsflags ("gl-enum") :glsopcode ("0x00A2") :wglflags ("small-data") - :offset ("184"))) -(defglfun - (("TexImage2D" tex-image-2d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |TextureComponentCount| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("drawing-control") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode") :version ("1.0") :glxropcode - ("110") :glsflags ("pixel-null" "pixel-unpack") :glsopcode ("0x00A1") - :wglflags ("client-handcode" "server-handcode") :offset ("183"))) -(defglfun - (("TexImage1D" tex-image-1d) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |internalformat| :type |TextureComponentCount| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |border| :type |CheckedInt32| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width|))) - :return ("void") :category ("drawing-control") :dlflags ("handcode") - :glxflags ("client-handcode" "server-handcode") :version ("1.0") :glxropcode - ("109") :glsflags ("pixel-null" "pixel-unpack") :glsopcode ("0x00A0") - :wglflags ("client-handcode" "server-handcode") :offset ("182"))) -(defglfun - (("TexParameteriv" tex-parameter-iv) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |TextureParameterName| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("108") :glsflags ("gl-enum") :glsopcode ("0x009F") :wglflags ("small-data") - :offset ("181"))) -(defglfun - (("TexParameteri" tex-parameter-i) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |TextureParameterName| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("107") :glsflags ("gl-enum") :glsopcode ("0x009E") :wglflags ("small-data") - :offset ("180"))) -(defglfun - (("TexParameterfv" tex-parameter-fv) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |TextureParameterName| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("106") :glsflags ("gl-enum") :glsopcode ("0x009D") :wglflags ("small-data") - :offset ("179"))) -(defglfun - (("TexParameterf" tex-parameter-f) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |TextureParameterName| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("105") :glsflags ("gl-enum") :glsopcode ("0x009C") :wglflags ("small-data") - :offset ("178"))) -(defglfun - (("ShadeModel" shade-model) :args - ((:name |mode| :type |ShadingModel| :direction :in)) :return ("void") - :category ("drawing-control") :version ("1.0") :glxropcode ("104") :glsopcode - ("0x009B") :offset ("177"))) -(defglfun - (("Scissor" scissor) :args - ((:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("103") :glsopcode ("0x009A") :offset ("176"))) -(defglfun - (("PolygonStipple" polygon-stipple) :args - ((:name |mask| :type |UInt8| :direction :in :array t)) :return ("void") - :category ("drawing-control") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("102") - :glsflags ("pixel-unpack") :glsopcode ("0x0099") :wglflags - ("client-handcode" "server-handcode") :offset ("175"))) -(defglfun - (("PolygonMode" polygon-mode) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |mode| :type |PolygonMode| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("101") :glsopcode ("0x0098") :offset ("174"))) -(defglfun - (("PointSize" point-size) :args - ((:name |size| :type |CheckedFloat32| :direction :in)) :return ("void") - :category ("drawing-control") :version ("1.0") :glxropcode ("100") :glsopcode - ("0x0097") :offset ("173"))) -(defglfun - (("Materialiv" material-iv) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("99") :glsopcode ("0x0096") :wglflags ("small-data") :offset ("172"))) -(defglfun - (("Materiali" material-i) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("98") :glsopcode ("0x0095") :wglflags ("small-data") :offset ("171"))) -(defglfun - (("Materialfv" material-fv) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("97") :glsopcode ("0x0094") :wglflags ("small-data") :offset ("170"))) -(defglfun - (("Materialf" material-f) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("96") :glsopcode ("0x0093") :wglflags ("small-data") :offset ("169"))) -(defglfun - (("LineWidth" line-width) :args - ((:name |width| :type |CheckedFloat32| :direction :in)) :return ("void") - :category ("drawing-control") :version ("1.0") :glxropcode ("95") :glsopcode - ("0x0092") :offset ("168"))) -(defglfun - (("LineStipple" line-stipple) :args - ((:name |factor| :type |CheckedInt32| :direction :in) - (:name |pattern| :type |LineStipple| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("94") :glsopcode ("0x0091") :offset ("167"))) -(defglfun - (("LightModeliv" light-model-iv) :args - ((:name |pname| :type |LightModelParameter| :direction :in) - (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("93") :glsflags ("gl-enum") :glsopcode ("0x0090") :wglflags ("small-data") - :offset ("166"))) -(defglfun - (("LightModeli" light-model-i) :args - ((:name |pname| :type |LightModelParameter| :direction :in) - (:name |param| :type |Int32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("92") :glsflags ("gl-enum") :glsopcode ("0x008F") :wglflags ("small-data") - :offset ("165"))) -(defglfun - (("LightModelfv" light-model-fv) :args - ((:name |pname| :type |LightModelParameter| :direction :in) - (:name |params| :type |Float32| :direction :in :array t :size (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("91") :glsflags ("gl-enum") :glsopcode ("0x008E") :wglflags ("small-data") - :offset ("164"))) -(defglfun - (("LightModelf" light-model-f) :args - ((:name |pname| :type |LightModelParameter| :direction :in) - (:name |param| :type |Float32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("90") :glsflags ("gl-enum") :glsopcode ("0x008D") :wglflags ("small-data") - :offset ("163"))) -(defglfun - (("Lightiv" light-iv) :args - ((:name |light| :type |LightName| :direction :in) - (:name |pname| :type |LightParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("89") :glsopcode ("0x008C") :wglflags ("small-data") :offset ("162"))) -(defglfun - (("Lighti" light-i) :args - ((:name |light| :type |LightName| :direction :in) - (:name |pname| :type |LightParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("88") :glsopcode ("0x008B") :wglflags ("small-data") :offset ("161"))) -(defglfun - (("Lightfv" light-fv) :args - ((:name |light| :type |LightName| :direction :in) - (:name |pname| :type |LightParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("87") :glsopcode ("0x008A") :wglflags ("small-data") :offset ("160"))) -(defglfun - (("Lightf" light-f) :args - ((:name |light| :type |LightName| :direction :in) - (:name |pname| :type |LightParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("86") :glsopcode ("0x0089") :wglflags ("small-data") :offset ("159"))) -(defglfun - (("Hint" hint) :args - ((:name |target| :type |HintTarget| :direction :in) - (:name |mode| :type |HintMode| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("85") :glsopcode ("0x0088") :offset ("158"))) -(defglfun - (("FrontFace" front-face) :args - ((:name |mode| :type |FrontFaceDirection| :direction :in)) :return ("void") - :category ("drawing-control") :version ("1.0") :glxropcode ("84") :glsopcode - ("0x0087") :offset ("157"))) -(defglfun - (("Fogiv" fog-iv) :args - ((:name |pname| :type |FogParameter| :direction :in) - (:name |params| :type |CheckedInt32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("83") :glsflags ("gl-enum") :glsopcode ("0x0086") :wglflags ("small-data") - :offset ("156"))) -(defglfun - (("Fogi" fog-i) :args - ((:name |pname| :type |FogParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("82") :glsflags ("gl-enum") :glsopcode ("0x0085") :wglflags ("small-data") - :offset ("155"))) -(defglfun - (("Fogfv" fog-fv) :args - ((:name |pname| :type |FogParameter| :direction :in) - (:name |params| :type |CheckedFloat32| :direction :in :array t :size - (|pname|))) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("81") :glsflags ("gl-enum") :glsopcode ("0x0084") :wglflags ("small-data") - :offset ("154"))) -(defglfun - (("Fogf" fog-f) :args - ((:name |pname| :type |FogParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("80") :glsflags ("gl-enum") :glsopcode ("0x0083") :wglflags ("small-data") - :offset ("153"))) -(defglfun - (("CullFace" cull-face) :args - ((:name |mode| :type |CullFaceMode| :direction :in)) :return ("void") - :category ("drawing-control") :version ("1.0") :glxropcode ("79") :glsopcode - ("0x0082") :offset ("152"))) -(defglfun - (("ColorMaterial" color-material) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |mode| :type |ColorMaterialParameter| :direction :in)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("78") :glsopcode ("0x0081") :offset ("151"))) -(defglfun - (("ClipPlane" clip-plane) :args - ((:name |plane| :type |ClipPlaneName| :direction :in) - (:name |equation| :type |Float64| :direction :in :array t :size #x4)) - :return ("void") :category ("drawing-control") :version ("1.0") :glxropcode - ("77") :glsopcode ("0x0080") :offset ("150"))) +(defglfun "TexGeniv" tex-gen-iv :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexGeni" tex-gen-i :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "TexGenfv" tex-gen-fv :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexGenf" tex-gen-f :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "TexGendv" tex-gen-dv :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |params| :type |Float64| :direction :in :array t :size (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexGend" tex-gen-d :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |param| :type |Float64| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "TexEnviv" tex-env-iv :return "void" :args + ((:name |target| :type |TextureEnvTarget| :direction :in) + (:name |pname| :type |TextureEnvParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexEnvi" tex-env-i :return "void" :args + ((:name |target| :type |TextureEnvTarget| :direction :in) + (:name |pname| :type |TextureEnvParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "TexEnvfv" tex-env-fv :return "void" :args + ((:name |target| :type |TextureEnvTarget| :direction :in) + (:name |pname| :type |TextureEnvParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexEnvf" tex-env-f :return "void" :args + ((:name |target| :type |TextureEnvTarget| :direction :in) + (:name |pname| :type |TextureEnvParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "TexImage2D" tex-image-2d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |TextureComponentCount| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height|))) + :category "drawing-control" :version "1.0") +(defglfun "TexImage1D" tex-image-1d :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |internalformat| :type |TextureComponentCount| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |border| :type |CheckedInt32| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width|))) + :category "drawing-control" :version "1.0") +(defglfun "TexParameteriv" tex-parameter-iv :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |TextureParameterName| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexParameteri" tex-parameter-i :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |TextureParameterName| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "TexParameterfv" tex-parameter-fv :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |TextureParameterName| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "TexParameterf" tex-parameter-f :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |TextureParameterName| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "ShadeModel" shade-model :return "void" :args + ((:name |mode| :type |ShadingModel| :direction :in)) :category + "drawing-control" :version "1.0") +(defglfun "Scissor" scissor :return "void" :args + ((:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "PolygonStipple" polygon-stipple :return "void" :args + ((:name |mask| :type |UInt8| :direction :in :array t)) :category + "drawing-control" :version "1.0") +(defglfun "PolygonMode" polygon-mode :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |mode| :type |PolygonMode| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "PointSize" point-size :return "void" :args + ((:name |size| :type |CheckedFloat32| :direction :in)) :category + "drawing-control" :version "1.0") +(defglfun "Materialiv" material-iv :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "Materiali" material-i :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "Materialfv" material-fv :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "Materialf" material-f :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "LineWidth" line-width :return "void" :args + ((:name |width| :type |CheckedFloat32| :direction :in)) :category + "drawing-control" :version "1.0") +(defglfun "LineStipple" line-stipple :return "void" :args + ((:name |factor| :type |CheckedInt32| :direction :in) + (:name |pattern| :type |LineStipple| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "LightModeliv" light-model-iv :return "void" :args + ((:name |pname| :type |LightModelParameter| :direction :in) + (:name |params| :type |Int32| :direction :in :array t :size (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "LightModeli" light-model-i :return "void" :args + ((:name |pname| :type |LightModelParameter| :direction :in) + (:name |param| :type |Int32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "LightModelfv" light-model-fv :return "void" :args + ((:name |pname| :type |LightModelParameter| :direction :in) + (:name |params| :type |Float32| :direction :in :array t :size (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "LightModelf" light-model-f :return "void" :args + ((:name |pname| :type |LightModelParameter| :direction :in) + (:name |param| :type |Float32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "Lightiv" light-iv :return "void" :args + ((:name |light| :type |LightName| :direction :in) + (:name |pname| :type |LightParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "Lighti" light-i :return "void" :args + ((:name |light| :type |LightName| :direction :in) + (:name |pname| :type |LightParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "Lightfv" light-fv :return "void" :args + ((:name |light| :type |LightName| :direction :in) + (:name |pname| :type |LightParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "Lightf" light-f :return "void" :args + ((:name |light| :type |LightName| :direction :in) + (:name |pname| :type |LightParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "Hint" hint :return "void" :args + ((:name |target| :type |HintTarget| :direction :in) + (:name |mode| :type |HintMode| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "FrontFace" front-face :return "void" :args + ((:name |mode| :type |FrontFaceDirection| :direction :in)) :category + "drawing-control" :version "1.0") +(defglfun "Fogiv" fog-iv :return "void" :args + ((:name |pname| :type |FogParameter| :direction :in) + (:name |params| :type |CheckedInt32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "Fogi" fog-i :return "void" :args + ((:name |pname| :type |FogParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "Fogfv" fog-fv :return "void" :args + ((:name |pname| :type |FogParameter| :direction :in) + (:name |params| :type |CheckedFloat32| :direction :in :array t :size + (|pname|))) + :category "drawing-control" :version "1.0") +(defglfun "Fogf" fog-f :return "void" :args + ((:name |pname| :type |FogParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "CullFace" cull-face :return "void" :args + ((:name |mode| :type |CullFaceMode| :direction :in)) :category + "drawing-control" :version "1.0") +(defglfun "ColorMaterial" color-material :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |mode| :type |ColorMaterialParameter| :direction :in)) + :category "drawing-control" :version "1.0") +(defglfun "ClipPlane" clip-plane :return "void" :args + ((:name |plane| :type |ClipPlaneName| :direction :in) + (:name |equation| :type |Float64| :direction :in :array t :size #x4)) + :category "drawing-control" :version "1.0") ;;;; }}} ;;;; {{{ feedback -(defglfun - (("PushName" push-name) :args - ((:name |name| :type |SelectName| :direction :in)) :return ("void") :category - ("feedback") :version ("1.0") :glxropcode ("125") :glsopcode ("0x00B3") - :offset ("201"))) -(defglfun - (("PopName" pop-name) :args nil :return ("void") :category ("feedback") - :version ("1.0") :glxropcode ("124") :glsopcode ("0x00B2") :offset ("200"))) -(defglfun - (("PassThrough" pass-through) :args - ((:name |token| :type |FeedbackElement| :direction :in)) :return ("void") - :category ("feedback") :version ("1.0") :glxropcode ("123") :glsopcode - ("0x00B1") :offset ("199"))) -(defglfun - (("LoadName" load-name) :args - ((:name |name| :type |SelectName| :direction :in)) :return ("void") :category - ("feedback") :version ("1.0") :glxropcode ("122") :glsopcode ("0x00B0") - :offset ("198"))) -(defglfun - (("InitNames" init-names) :args nil :return ("void") :category ("feedback") - :version ("1.0") :glxropcode ("121") :glsopcode ("0x00AF") :offset ("197"))) -(defglfun - (("RenderMode" render-mode) :args - ((:name |mode| :type |RenderingMode| :direction :in)) :return ("Int32") - :category ("feedback") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxsingle ("107") - :glsopcode ("0x00AE") :wglflags ("client-handcode" "server-handcode") :offset - ("196"))) -(defglfun - (("SelectBuffer" select-buffer) :args - ((:name |size| :type |SizeI| :direction :in) - (:name |buffer| :type |SelectName| :direction :out :array t :size size - :retained t)) - :return ("void") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :category ("feedback") :version ("1.0") - :glxsingle ("106") :glsflags ("client") :glsopcode ("0x00AD") :wglflags - ("client-handcode" "server-handcode" "batchable") :offset ("195"))) -(defglfun - (("FeedbackBuffer" feedback-buffer) :args - ((:name |size| :type |SizeI| :direction :in) - (:name |type| :type |FeedbackType| :direction :in) - (:name |buffer| :type |FeedbackElement| :direction :out :array t :size size - :retained t)) - :return ("void") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :category ("feedback") :version ("1.0") - :glxsingle ("105") :glsflags ("client") :glsopcode ("0x00AC") :wglflags - ("client-handcode" "server-handcode" "batchable") :offset ("194"))) +(defglfun "PushName" push-name :return "void" :args + ((:name |name| :type |SelectName| :direction :in)) :category "feedback" + :version "1.0") +(defglfun "PopName" pop-name :return "void" :args nil :category "feedback" + :version "1.0") +(defglfun "PassThrough" pass-through :return "void" :args + ((:name |token| :type |FeedbackElement| :direction :in)) :category "feedback" + :version "1.0") +(defglfun "LoadName" load-name :return "void" :args + ((:name |name| :type |SelectName| :direction :in)) :category "feedback" + :version "1.0") +(defglfun "InitNames" init-names :return "void" :args nil :category "feedback" + :version "1.0") +(defglfun "RenderMode" render-mode :return "Int32" :args + ((:name |mode| :type |RenderingMode| :direction :in)) :category "feedback" + :version "1.0") +(defglfun "SelectBuffer" select-buffer :return "void" :args + ((:name |size| :type |SizeI| :direction :in) + (:name |buffer| :type |SelectName| :direction :out :array t :size size + :retained t)) + :category "feedback" :version "1.0") +(defglfun "FeedbackBuffer" feedback-buffer :return "void" :args + ((:name |size| :type |SizeI| :direction :in) + (:name |type| :type |FeedbackType| :direction :in) + (:name |buffer| :type |FeedbackElement| :direction :out :array t :size size + :retained t)) + :category "feedback" :version "1.0") ;;;; }}} ;;;; {{{ framebuf -(defglfun - (("IndexMask" index-mask) :args - ((:name |mask| :type |MaskedColorIndexValueI| :direction :in)) :return - ("void") :category ("framebuf") :version ("1.0") :glxropcode ("136") - :glsopcode ("0x00BE") :offset ("212"))) -(defglfun - (("DepthMask" depth-mask) :args - ((:name |flag| :type |Boolean| :direction :in)) :return ("void") :category - ("framebuf") :version ("1.0") :glxropcode ("135") :glsopcode ("0x00BD") - :offset ("211"))) -(defglfun - (("ColorMask" color-mask) :args - ((:name |red| :type |Boolean| :direction :in) - (:name |green| :type |Boolean| :direction :in) - (:name |blue| :type |Boolean| :direction :in) - (:name |alpha| :type |Boolean| :direction :in)) - :return ("void") :category ("framebuf") :version ("1.0") :glxropcode ("134") - :glsopcode ("0x00BC") :offset ("210"))) -(defglfun - (("StencilMask" stencil-mask) :args - ((:name |mask| :type |MaskedStencilValue| :direction :in)) :return ("void") - :category ("framebuf") :version ("1.0") :glxropcode ("133") :glsopcode - ("0x00BB") :offset ("209"))) -(defglfun - (("ClearDepth" clear-depth) :args - ((:name |depth| :type |ClampedFloat64| :direction :in)) :return ("void") - :category ("framebuf") :version ("1.0") :glxropcode ("132") :glsopcode - ("0x00BA") :offset ("208"))) -(defglfun - (("ClearStencil" clear-stencil) :args - ((:name |s| :type |StencilValue| :direction :in)) :return ("void") :category - ("framebuf") :version ("1.0") :glxropcode ("131") :glsopcode ("0x00B9") - :offset ("207"))) -(defglfun - (("ClearColor" clear-color) :args - ((:name |red| :type |ClampedColorF| :direction :in) - (:name |green| :type |ClampedColorF| :direction :in) - (:name |blue| :type |ClampedColorF| :direction :in) - (:name |alpha| :type |ClampedColorF| :direction :in)) - :return ("void") :category ("framebuf") :version ("1.0") :glxropcode ("130") - :glsopcode ("0x00B8") :offset ("206"))) -(defglfun - (("ClearIndex" clear-index) :args - ((:name |c| :type |MaskedColorIndexValueF| :direction :in)) :return ("void") - :category ("framebuf") :version ("1.0") :glxropcode ("129") :glsopcode - ("0x00B7") :offset ("205"))) -(defglfun - (("ClearAccum" clear-accum) :args - ((:name |red| :type |Float32| :direction :in) - (:name |green| :type |Float32| :direction :in) - (:name |blue| :type |Float32| :direction :in) - (:name |alpha| :type |Float32| :direction :in)) - :return ("void") :category ("framebuf") :version ("1.0") :glxropcode ("128") - :glsopcode ("0x00B6") :offset ("204"))) -(defglfun - (("Clear" clear) :args ((:name |mask| :type |ClearBufferMask| :direction :in)) - :return ("void") :category ("framebuf") :version ("1.0") :glxropcode ("127") - :glsopcode ("0x00B5") :offset ("203"))) -(defglfun - (("DrawBuffer" draw-buffer) :args - ((:name |mode| :type |DrawBufferMode| :direction :in)) :return ("void") - :category ("framebuf") :version ("1.0") :glxropcode ("126") :glsopcode - ("0x00B4") :offset ("202"))) +(defglfun "IndexMask" index-mask :return "void" :args + ((:name |mask| :type |MaskedColorIndexValueI| :direction :in)) :category + "framebuf" :version "1.0") +(defglfun "DepthMask" depth-mask :return "void" :args + ((:name |flag| :type |Boolean| :direction :in)) :category "framebuf" :version + "1.0") +(defglfun "ColorMask" color-mask :return "void" :args + ((:name |red| :type |Boolean| :direction :in) + (:name |green| :type |Boolean| :direction :in) + (:name |blue| :type |Boolean| :direction :in) + (:name |alpha| :type |Boolean| :direction :in)) + :category "framebuf" :version "1.0") +(defglfun "StencilMask" stencil-mask :return "void" :args + ((:name |mask| :type |MaskedStencilValue| :direction :in)) :category + "framebuf" :version "1.0") +(defglfun "ClearDepth" clear-depth :return "void" :args + ((:name |depth| :type |ClampedFloat64| :direction :in)) :category "framebuf" + :version "1.0") +(defglfun "ClearStencil" clear-stencil :return "void" :args + ((:name |s| :type |StencilValue| :direction :in)) :category "framebuf" + :version "1.0") +(defglfun "ClearColor" clear-color :return "void" :args + ((:name |red| :type |ClampedColorF| :direction :in) + (:name |green| :type |ClampedColorF| :direction :in) + (:name |blue| :type |ClampedColorF| :direction :in) + (:name |alpha| :type |ClampedColorF| :direction :in)) + :category "framebuf" :version "1.0") +(defglfun "ClearIndex" clear-index :return "void" :args + ((:name |c| :type |MaskedColorIndexValueF| :direction :in)) :category + "framebuf" :version "1.0") +(defglfun "ClearAccum" clear-accum :return "void" :args + ((:name |red| :type |Float32| :direction :in) + (:name |green| :type |Float32| :direction :in) + (:name |blue| :type |Float32| :direction :in) + (:name |alpha| :type |Float32| :direction :in)) + :category "framebuf" :version "1.0") +(defglfun "Clear" clear :return "void" :args + ((:name |mask| :type |ClearBufferMask| :direction :in)) :category "framebuf" + :version "1.0") +(defglfun "DrawBuffer" draw-buffer :return "void" :args + ((:name |mode| :type |DrawBufferMode| :direction :in)) :category "framebuf" + :version "1.0") ;;;; }}} ;;;; {{{ misc -(defglfun - (("PushAttrib" push-attrib) :args - ((:name |mask| :type |AttribMask| :direction :in)) :return ("void") :category - ("misc") :version ("1.0") :glxropcode ("142") :glsopcode ("0x00C5") :offset - ("219"))) -(defglfun - (("PopAttrib" pop-attrib) :args nil :return ("void") :category ("misc") - :version ("1.0") :glxropcode ("141") :glsopcode ("0x00C4") :offset ("218"))) -(defglfun - (("Flush" flush) :args nil :return ("void") :dlflags ("notlistable") :glxflags - ("client-handcode" "client-intercept" "server-handcode") :category ("misc") - :version ("1.0") :glxsingle ("142") :glsopcode ("0x00C3") :offset ("217"))) -(defglfun - (("Finish" finish) :args nil :return ("void") :dlflags ("notlistable") - :glxflags ("client-handcode" "server-handcode") :category ("misc") :version - ("1.0") :glxsingle ("108") :glsopcode ("0x00C2") :offset ("216"))) -(defglfun - (("Enable" enable) :args ((:name |cap| :type |EnableCap| :direction :in)) - :return ("void") :category ("misc") :version ("1.0") :dlflags ("handcode") - :glxflags ("client-handcode" "client-intercept") :glxropcode ("139") - :glsflags ("client") :glsopcode ("0x00C1") :offset ("215"))) -(defglfun - (("Disable" disable) :args ((:name |cap| :type |EnableCap| :direction :in)) - :return ("void") :category ("misc") :version ("1.0") :dlflags ("handcode") - :glxflags ("client-handcode" "client-intercept") :glxropcode ("138") - :glsflags ("client") :glsopcode ("0x00C0") :offset ("214"))) -(defglfun - (("Accum" accum) :args - ((:name |op| :type |AccumOp| :direction :in) - (:name |value| :type |CoordF| :direction :in)) - :return ("void") :category ("misc") :version ("1.0") :glxropcode ("137") - :glsopcode ("0x00BF") :offset ("213"))) +(defglfun "PushAttrib" push-attrib :return "void" :args + ((:name |mask| :type |AttribMask| :direction :in)) :category "misc" :version + "1.0") +(defglfun "PopAttrib" pop-attrib :return "void" :args nil :category "misc" + :version "1.0") +(defglfun "Flush" flush :return "void" :args nil :category "misc" :version + "1.0") +(defglfun "Finish" finish :return "void" :args nil :category "misc" :version + "1.0") +(defglfun "Enable" enable :return "void" :args + ((:name |cap| :type |EnableCap| :direction :in)) :category "misc" :version + "1.0") +(defglfun "Disable" disable :return "void" :args + ((:name |cap| :type |EnableCap| :direction :in)) :category "misc" :version + "1.0") +(defglfun "Accum" accum :return "void" :args + ((:name |op| :type |AccumOp| :direction :in) + (:name |value| :type |CoordF| :direction :in)) + :category "misc" :version "1.0") ;;;; }}} ;;;; {{{ modeling -(defglfun - (("EvalPoint2" eval-point-2) :args - ((:name |i| :type |CheckedInt32| :direction :in) - (:name |j| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("158") - :glsopcode ("0x00D5") :offset ("239"))) -(defglfun - (("EvalMesh2" eval-mesh-2) :args - ((:name |mode| :type |MeshMode2| :direction :in) - (:name |i1| :type |CheckedInt32| :direction :in) - (:name |i2| :type |CheckedInt32| :direction :in) - (:name |j1| :type |CheckedInt32| :direction :in) - (:name |j2| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("157") - :glsopcode ("0x00D4") :offset ("238"))) -(defglfun - (("EvalPoint1" eval-point-1) :args ((:name |i| :type |Int32| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("156") - :glsopcode ("0x00D3") :offset ("237"))) -(defglfun - (("EvalMesh1" eval-mesh-1) :args - ((:name |mode| :type |MeshMode1| :direction :in) - (:name |i1| :type |CheckedInt32| :direction :in) - (:name |i2| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("155") - :glsopcode ("0x00D2") :offset ("236"))) -(defglfun - (("EvalCoord2fv" eval-coord-2fv) :args - ((:name |u| :type |CoordF| :direction :in :array t :size #x2)) :return - ("void") :category ("modeling") :version ("1.0") :glxropcode ("154") - :glsopcode ("0x00D1") :offset ("235"))) -(defglfun - (("EvalCoord2f" eval-coord-2f) :args - ((:name |u| :type |CoordF| :direction :in) - (:name |v| :type |CoordF| :direction :in)) - :return ("void") :category ("modeling") :vectorequiv ("EvalCoord2fv") - :version ("1.0") :offset ("234"))) -(defglfun - (("EvalCoord2dv" eval-coord-2dv) :args - ((:name |u| :type |CoordD| :direction :in :array t :size #x2)) :return - ("void") :category ("modeling") :version ("1.0") :glxropcode ("153") - :glsopcode ("0x00D0") :offset ("233"))) -(defglfun - (("EvalCoord2d" eval-coord-2d) :args - ((:name |u| :type |CoordD| :direction :in) - (:name |v| :type |CoordD| :direction :in)) - :return ("void") :category ("modeling") :vectorequiv ("EvalCoord2dv") - :version ("1.0") :offset ("232"))) -(defglfun - (("EvalCoord1fv" eval-coord-1fv) :args - ((:name |u| :type |CoordF| :direction :in :array t :size #x1)) :return - ("void") :category ("modeling") :version ("1.0") :glxropcode ("152") - :glsopcode ("0x00CF") :offset ("231"))) -(defglfun - (("EvalCoord1f" eval-coord-1f) :args - ((:name |u| :type |CoordF| :direction :in)) :return ("void") :category - ("modeling") :vectorequiv ("EvalCoord1fv") :version ("1.0") :offset ("230"))) -(defglfun - (("EvalCoord1dv" eval-coord-1dv) :args - ((:name |u| :type |CoordD| :direction :in :array t :size #x1)) :return - ("void") :category ("modeling") :version ("1.0") :glxropcode ("151") - :glsopcode ("0x00CE") :offset ("229"))) -(defglfun - (("EvalCoord1d" eval-coord-1d) :args - ((:name |u| :type |CoordD| :direction :in)) :return ("void") :category - ("modeling") :vectorequiv ("EvalCoord1dv") :version ("1.0") :offset ("228"))) -(defglfun - (("MapGrid2f" map-grid-2f) :args - ((:name |un| :type |Int32| :direction :in) - (:name |u1| :type |CoordF| :direction :in) - (:name |u2| :type |CoordF| :direction :in) - (:name |vn| :type |Int32| :direction :in) - (:name |v1| :type |CoordF| :direction :in) - (:name |v2| :type |CoordF| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("150") - :glsopcode ("0x00CD") :offset ("227"))) -(defglfun - (("MapGrid2d" map-grid-2d) :args - ((:name |un| :type |Int32| :direction :in) - (:name |u1| :type |CoordD| :direction :in) - (:name |u2| :type |CoordD| :direction :in) - (:name |vn| :type |Int32| :direction :in) - (:name |v1| :type |CoordD| :direction :in) - (:name |v2| :type |CoordD| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("149") - :glsopcode ("0x00CC") :offset ("226"))) -(defglfun - (("MapGrid1f" map-grid-1f) :args - ((:name |un| :type |Int32| :direction :in) - (:name |u1| :type |CoordF| :direction :in) - (:name |u2| :type |CoordF| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("148") - :glsopcode ("0x00CB") :offset ("225"))) -(defglfun - (("MapGrid1d" map-grid-1d) :args - ((:name |un| :type |Int32| :direction :in) - (:name |u1| :type |CoordD| :direction :in) - (:name |u2| :type |CoordD| :direction :in)) - :return ("void") :category ("modeling") :version ("1.0") :glxropcode ("147") - :glsopcode ("0x00CA") :offset ("224"))) -(defglfun - (("Map2f" map-2f) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |u1| :type |CoordF| :direction :in) - (:name |u2| :type |CoordF| :direction :in) - (:name |ustride| :type |Int32| :direction :in) - (:name |uorder| :type |CheckedInt32| :direction :in) - (:name |v1| :type |CoordF| :direction :in) - (:name |v2| :type |CoordF| :direction :in) - (:name |vstride| :type |Int32| :direction :in) - (:name |vorder| :type |CheckedInt32| :direction :in) - (:name |points| :type |CoordF| :direction :in :array t :size - (|target| |ustride| |uorder| |vstride| |vorder|))) - :return ("void") :category ("modeling") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("146") - :glsflags ("capture-handcode") :glsopcode ("0x00C9") :wglflags - ("client-handcode" "server-handcode") :offset ("223"))) -(defglfun - (("Map2d" map-2d) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |u1| :type |CoordD| :direction :in) - (:name |u2| :type |CoordD| :direction :in) - (:name |ustride| :type |Int32| :direction :in) - (:name |uorder| :type |CheckedInt32| :direction :in) - (:name |v1| :type |CoordD| :direction :in) - (:name |v2| :type |CoordD| :direction :in) - (:name |vstride| :type |Int32| :direction :in) - (:name |vorder| :type |CheckedInt32| :direction :in) - (:name |points| :type |CoordD| :direction :in :array t :size - (|target| |ustride| |uorder| |vstride| |vorder|))) - :return ("void") :category ("modeling") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("145") - :glsflags ("capture-handcode") :glsopcode ("0x00C8") :wglflags - ("client-handcode" "server-handcode") :offset ("222"))) -(defglfun - (("Map1f" map-1f) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |u1| :type |CoordF| :direction :in) - (:name |u2| :type |CoordF| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |order| :type |CheckedInt32| :direction :in) - (:name |points| :type |CoordF| :direction :in :array t :size - (|target| |stride| |order|))) - :return ("void") :category ("modeling") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("144") - :glsflags ("capture-handcode") :glsopcode ("0x00C7") :wglflags - ("client-handcode" "server-handcode") :offset ("221"))) -(defglfun - (("Map1d" map-1d) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |u1| :type |CoordD| :direction :in) - (:name |u2| :type |CoordD| :direction :in) - (:name |stride| :type |Int32| :direction :in) - (:name |order| :type |CheckedInt32| :direction :in) - (:name |points| :type |CoordD| :direction :in :array t :size - (|target| |stride| |order|))) - :return ("void") :category ("modeling") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("143") - :glsflags ("capture-handcode") :glsopcode ("0x00C6") :wglflags - ("client-handcode" "server-handcode") :offset ("220"))) +(defglfun "EvalPoint2" eval-point-2 :return "void" :args + ((:name |i| :type |CheckedInt32| :direction :in) + (:name |j| :type |CheckedInt32| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "EvalMesh2" eval-mesh-2 :return "void" :args + ((:name |mode| :type |MeshMode2| :direction :in) + (:name |i1| :type |CheckedInt32| :direction :in) + (:name |i2| :type |CheckedInt32| :direction :in) + (:name |j1| :type |CheckedInt32| :direction :in) + (:name |j2| :type |CheckedInt32| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "EvalPoint1" eval-point-1 :return "void" :args + ((:name |i| :type |Int32| :direction :in)) :category "modeling" :version "1.0") +(defglfun "EvalMesh1" eval-mesh-1 :return "void" :args + ((:name |mode| :type |MeshMode1| :direction :in) + (:name |i1| :type |CheckedInt32| :direction :in) + (:name |i2| :type |CheckedInt32| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "EvalCoord2fv" eval-coord-2fv :return "void" :args + ((:name |u| :type |CoordF| :direction :in :array t :size #x2)) :category + "modeling" :version "1.0") +(defglfun "EvalCoord2f" eval-coord-2f :return "void" :args + ((:name |u| :type |CoordF| :direction :in) + (:name |v| :type |CoordF| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "EvalCoord2dv" eval-coord-2dv :return "void" :args + ((:name |u| :type |CoordD| :direction :in :array t :size #x2)) :category + "modeling" :version "1.0") +(defglfun "EvalCoord2d" eval-coord-2d :return "void" :args + ((:name |u| :type |CoordD| :direction :in) + (:name |v| :type |CoordD| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "EvalCoord1fv" eval-coord-1fv :return "void" :args + ((:name |u| :type |CoordF| :direction :in :array t :size #x1)) :category + "modeling" :version "1.0") +(defglfun "EvalCoord1f" eval-coord-1f :return "void" :args + ((:name |u| :type |CoordF| :direction :in)) :category "modeling" :version + "1.0") +(defglfun "EvalCoord1dv" eval-coord-1dv :return "void" :args + ((:name |u| :type |CoordD| :direction :in :array t :size #x1)) :category + "modeling" :version "1.0") +(defglfun "EvalCoord1d" eval-coord-1d :return "void" :args + ((:name |u| :type |CoordD| :direction :in)) :category "modeling" :version + "1.0") +(defglfun "MapGrid2f" map-grid-2f :return "void" :args + ((:name |un| :type |Int32| :direction :in) + (:name |u1| :type |CoordF| :direction :in) + (:name |u2| :type |CoordF| :direction :in) + (:name |vn| :type |Int32| :direction :in) + (:name |v1| :type |CoordF| :direction :in) + (:name |v2| :type |CoordF| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "MapGrid2d" map-grid-2d :return "void" :args + ((:name |un| :type |Int32| :direction :in) + (:name |u1| :type |CoordD| :direction :in) + (:name |u2| :type |CoordD| :direction :in) + (:name |vn| :type |Int32| :direction :in) + (:name |v1| :type |CoordD| :direction :in) + (:name |v2| :type |CoordD| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "MapGrid1f" map-grid-1f :return "void" :args + ((:name |un| :type |Int32| :direction :in) + (:name |u1| :type |CoordF| :direction :in) + (:name |u2| :type |CoordF| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "MapGrid1d" map-grid-1d :return "void" :args + ((:name |un| :type |Int32| :direction :in) + (:name |u1| :type |CoordD| :direction :in) + (:name |u2| :type |CoordD| :direction :in)) + :category "modeling" :version "1.0") +(defglfun "Map2f" map-2f :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |u1| :type |CoordF| :direction :in) + (:name |u2| :type |CoordF| :direction :in) + (:name |ustride| :type |Int32| :direction :in) + (:name |uorder| :type |CheckedInt32| :direction :in) + (:name |v1| :type |CoordF| :direction :in) + (:name |v2| :type |CoordF| :direction :in) + (:name |vstride| :type |Int32| :direction :in) + (:name |vorder| :type |CheckedInt32| :direction :in) + (:name |points| :type |CoordF| :direction :in :array t :size + (|target| |ustride| |uorder| |vstride| |vorder|))) + :category "modeling" :version "1.0") +(defglfun "Map2d" map-2d :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |u1| :type |CoordD| :direction :in) + (:name |u2| :type |CoordD| :direction :in) + (:name |ustride| :type |Int32| :direction :in) + (:name |uorder| :type |CheckedInt32| :direction :in) + (:name |v1| :type |CoordD| :direction :in) + (:name |v2| :type |CoordD| :direction :in) + (:name |vstride| :type |Int32| :direction :in) + (:name |vorder| :type |CheckedInt32| :direction :in) + (:name |points| :type |CoordD| :direction :in :array t :size + (|target| |ustride| |uorder| |vstride| |vorder|))) + :category "modeling" :version "1.0") +(defglfun "Map1f" map-1f :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |u1| :type |CoordF| :direction :in) + (:name |u2| :type |CoordF| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |order| :type |CheckedInt32| :direction :in) + (:name |points| :type |CoordF| :direction :in :array t :size + (|target| |stride| |order|))) + :category "modeling" :version "1.0") +(defglfun "Map1d" map-1d :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |u1| :type |CoordD| :direction :in) + (:name |u2| :type |CoordD| :direction :in) + (:name |stride| :type |Int32| :direction :in) + (:name |order| :type |CheckedInt32| :direction :in) + (:name |points| :type |CoordD| :direction :in :array t :size + (|target| |stride| |order|))) + :category "modeling" :version "1.0") ;;;; }}} ;;;; {{{ pixel-op -(defglfun - (("DepthFunc" depth-func) :args - ((:name |func| :type |DepthFunction| :direction :in)) :return ("void") - :category ("pixel-op") :version ("1.0") :glxropcode ("164") :glsopcode - ("0x00DB") :offset ("245"))) -(defglfun - (("StencilOp" stencil-op) :args - ((:name |fail| :type |StencilOp| :direction :in) - (:name |zfail| :type |StencilOp| :direction :in) - (:name |zpass| :type |StencilOp| :direction :in)) - :return ("void") :category ("pixel-op") :version ("1.0") :glxropcode ("163") - :glsopcode ("0x00DA") :offset ("244"))) -(defglfun - (("StencilFunc" stencil-func) :args - ((:name |func| :type |StencilFunction| :direction :in) - (:name |ref| :type |ClampedStencilValue| :direction :in) - (:name |mask| :type |MaskedStencilValue| :direction :in)) - :return ("void") :category ("pixel-op") :version ("1.0") :glxropcode ("162") - :glsopcode ("0x00D9") :offset ("243"))) -(defglfun - (("LogicOp" logic-op) :args ((:name |opcode| :type |LogicOp| :direction :in)) - :return ("void") :category ("pixel-op") :version ("1.0") :glxropcode ("161") - :glsopcode ("0x00D8") :offset ("242"))) -(defglfun - (("BlendFunc" blend-func) :args - ((:name |sfactor| :type |BlendingFactorSrc| :direction :in) - (:name |dfactor| :type |BlendingFactorDest| :direction :in)) - :return ("void") :category ("pixel-op") :version ("1.0") :glxropcode ("160") - :glsopcode ("0x00D7") :offset ("241"))) -(defglfun - (("AlphaFunc" alpha-func) :args - ((:name |func| :type |AlphaFunction| :direction :in) - (:name |ref| :type |ClampedFloat32| :direction :in)) - :return ("void") :category ("pixel-op") :version ("1.0") :glxropcode ("159") - :glsopcode ("0x00D6") :offset ("240"))) +(defglfun "DepthFunc" depth-func :return "void" :args + ((:name |func| :type |DepthFunction| :direction :in)) :category "pixel-op" + :version "1.0") +(defglfun "StencilOp" stencil-op :return "void" :args + ((:name |fail| :type |StencilOp| :direction :in) + (:name |zfail| :type |StencilOp| :direction :in) + (:name |zpass| :type |StencilOp| :direction :in)) + :category "pixel-op" :version "1.0") +(defglfun "StencilFunc" stencil-func :return "void" :args + ((:name |func| :type |StencilFunction| :direction :in) + (:name |ref| :type |ClampedStencilValue| :direction :in) + (:name |mask| :type |MaskedStencilValue| :direction :in)) + :category "pixel-op" :version "1.0") +(defglfun "LogicOp" logic-op :return "void" :args + ((:name |opcode| :type |LogicOp| :direction :in)) :category "pixel-op" + :version "1.0") +(defglfun "BlendFunc" blend-func :return "void" :args + ((:name |sfactor| :type |BlendingFactorSrc| :direction :in) + (:name |dfactor| :type |BlendingFactorDest| :direction :in)) + :category "pixel-op" :version "1.0") +(defglfun "AlphaFunc" alpha-func :return "void" :args + ((:name |func| :type |AlphaFunction| :direction :in) + (:name |ref| :type |ClampedFloat32| :direction :in)) + :category "pixel-op" :version "1.0") ;;;; }}} ;;;; {{{ pixel-rw -(defglfun - (("DrawPixels" draw-pixels) :args - ((:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :in :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("pixel-rw") :dlflags ("handcode") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxropcode ("173") - :glsflags ("pixel-unpack") :glsopcode ("0x00E7") :wglflags - ("client-handcode" "server-handcode") :offset ("257"))) -(defglfun - (("ReadPixels" read-pixels) :args - ((:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :out :array t :size - (|format| |type| |width| |height|))) - :return ("void") :category ("pixel-rw") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxsingle ("111") - :glsflags ("get" "pixel-pack") :glsopcode ("0x00E6") :wglflags - ("client-handcode" "server-handcode") :offset ("256"))) -(defglfun - (("CopyPixels" copy-pixels) :args - ((:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in) - (:name |type| :type |PixelCopyType| :direction :in)) - :return ("void") :category ("pixel-rw") :version ("1.0") :glxropcode ("172") - :glsopcode ("0x00E5") :offset ("255"))) -(defglfun - (("ReadBuffer" read-buffer) :args - ((:name |mode| :type |ReadBufferMode| :direction :in)) :return ("void") - :category ("pixel-rw") :version ("1.0") :glxropcode ("171") :glsopcode - ("0x00E4") :offset ("254"))) -(defglfun - (("PixelMapusv" pixel-map-usv) :args - ((:name |map| :type |PixelMap| :direction :in) - (:name |mapsize| :type |CheckedInt32| :direction :in) - (:name |values| :type |UInt16| :direction :in :array t :size mapsize)) - :return ("void") :category ("pixel-rw") :glxflags ("client-handcode") - :version ("1.0") :glxropcode ("170") :glsopcode ("0x00E3") :offset ("253"))) -(defglfun - (("PixelMapuiv" pixel-map-uiv) :args - ((:name |map| :type |PixelMap| :direction :in) - (:name |mapsize| :type |CheckedInt32| :direction :in) - (:name |values| :type |UInt32| :direction :in :array t :size mapsize)) - :return ("void") :category ("pixel-rw") :glxflags ("client-handcode") - :version ("1.0") :glxropcode ("169") :glsopcode ("0x00E2") :offset ("252"))) -(defglfun - (("PixelMapfv" pixel-map-fv) :args - ((:name |map| :type |PixelMap| :direction :in) - (:name |mapsize| :type |CheckedInt32| :direction :in) - (:name |values| :type |Float32| :direction :in :array t :size mapsize)) - :return ("void") :category ("pixel-rw") :glxflags ("client-handcode") - :version ("1.0") :glxropcode ("168") :glsopcode ("0x00E1") :offset ("251"))) -(defglfun - (("PixelStorei" pixel-store-i) :args - ((:name |pname| :type |PixelStoreParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :dlflags ("notlistable") :glxflags ("client-handcode") - :category ("pixel-rw") :version ("1.0") :glxsingle ("110") :glsflags - ("client" "gl-enum") :glsopcode ("0x00E0") :wglflags ("batchable") :offset - ("250"))) -(defglfun - (("PixelStoref" pixel-store-f) :args - ((:name |pname| :type |PixelStoreParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :dlflags ("notlistable") :glxflags ("client-handcode") - :category ("pixel-rw") :version ("1.0") :glxsingle ("109") :glsflags - ("client" "gl-enum") :glsopcode ("0x00DF") :wglflags ("batchable") :offset - ("249"))) -(defglfun - (("PixelTransferi" pixel-transfer-i) :args - ((:name |pname| :type |PixelTransferParameter| :direction :in) - (:name |param| :type |CheckedInt32| :direction :in)) - :return ("void") :category ("pixel-rw") :version ("1.0") :glxropcode ("167") - :glsflags ("gl-enum") :glsopcode ("0x00DE") :offset ("248"))) -(defglfun - (("PixelTransferf" pixel-transfer-f) :args - ((:name |pname| :type |PixelTransferParameter| :direction :in) - (:name |param| :type |CheckedFloat32| :direction :in)) - :return ("void") :category ("pixel-rw") :version ("1.0") :glxropcode ("166") - :glsflags ("gl-enum") :glsopcode ("0x00DD") :offset ("247"))) -(defglfun - (("PixelZoom" pixel-zoom) :args - ((:name |xfactor| :type |Float32| :direction :in) - (:name |yfactor| :type |Float32| :direction :in)) - :return ("void") :category ("pixel-rw") :version ("1.0") :glxropcode ("165") - :glsopcode ("0x00DC") :offset ("246"))) +(defglfun "DrawPixels" draw-pixels :return "void" :args + ((:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :in :array t :size + (|format| |type| |width| |height|))) + :category "pixel-rw" :version "1.0") +(defglfun "ReadPixels" read-pixels :return "void" :args + ((:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :out :array t :size + (|format| |type| |width| |height|))) + :category "pixel-rw" :version "1.0") +(defglfun "CopyPixels" copy-pixels :return "void" :args + ((:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in) + (:name |type| :type |PixelCopyType| :direction :in)) + :category "pixel-rw" :version "1.0") +(defglfun "ReadBuffer" read-buffer :return "void" :args + ((:name |mode| :type |ReadBufferMode| :direction :in)) :category "pixel-rw" + :version "1.0") +(defglfun "PixelMapusv" pixel-map-usv :return "void" :args + ((:name |map| :type |PixelMap| :direction :in) + (:name |mapsize| :type |CheckedInt32| :direction :in) + (:name |values| :type |UInt16| :direction :in :array t :size mapsize)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelMapuiv" pixel-map-uiv :return "void" :args + ((:name |map| :type |PixelMap| :direction :in) + (:name |mapsize| :type |CheckedInt32| :direction :in) + (:name |values| :type |UInt32| :direction :in :array t :size mapsize)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelMapfv" pixel-map-fv :return "void" :args + ((:name |map| :type |PixelMap| :direction :in) + (:name |mapsize| :type |CheckedInt32| :direction :in) + (:name |values| :type |Float32| :direction :in :array t :size mapsize)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelStorei" pixel-store-i :return "void" :args + ((:name |pname| :type |PixelStoreParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelStoref" pixel-store-f :return "void" :args + ((:name |pname| :type |PixelStoreParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelTransferi" pixel-transfer-i :return "void" :args + ((:name |pname| :type |PixelTransferParameter| :direction :in) + (:name |param| :type |CheckedInt32| :direction :in)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelTransferf" pixel-transfer-f :return "void" :args + ((:name |pname| :type |PixelTransferParameter| :direction :in) + (:name |param| :type |CheckedFloat32| :direction :in)) + :category "pixel-rw" :version "1.0") +(defglfun "PixelZoom" pixel-zoom :return "void" :args + ((:name |xfactor| :type |Float32| :direction :in) + (:name |yfactor| :type |Float32| :direction :in)) + :category "pixel-rw" :version "1.0") ;;;; }}} ;;;; {{{ state-req -(defglfun - (("IsList" is-list) :args ((:name |list| :type |List| :direction :in)) :return - ("Boolean") :category ("state-req") :dlflags ("notlistable") :version ("1.0") - :glxsingle ("141") :glsflags ("get") :glsopcode ("0x0105") :offset ("287"))) -(defglfun - (("IsEnabled" is-enabled) :args - ((:name |cap| :type |EnableCap| :direction :in)) :return ("Boolean") - :category ("state-req") :dlflags ("notlistable") :version ("1.0") :glxflags - ("client-handcode" "client-intercept") :glxsingle ("140") :glsflags - ("client" "get") :glsopcode ("0x0104") :offset ("286"))) -(defglfun - (("GetTexLevelParameteriv" get-tex-level-parameter-iv) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |pname| :type |GetTextureParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("139") :glsflags ("get") :glsopcode ("0x0103") :wglflags - ("small-data") :offset ("285"))) -(defglfun - (("GetTexLevelParameterfv" get-tex-level-parameter-fv) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |pname| :type |GetTextureParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("138") :glsflags ("get") :glsopcode ("0x0102") :wglflags - ("small-data") :offset ("284"))) -(defglfun - (("GetTexParameteriv" get-tex-parameter-iv) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |GetTextureParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("137") :glsflags ("get") :glsopcode ("0x0101") :wglflags - ("small-data") :offset ("283"))) -(defglfun - (("GetTexParameterfv" get-tex-parameter-fv) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |pname| :type |GetTextureParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("136") :glsflags ("get") :glsopcode ("0x0100") :wglflags - ("small-data") :offset ("282"))) -(defglfun - (("GetTexImage" get-tex-image) :args - ((:name |target| :type |TextureTarget| :direction :in) - (:name |level| :type |CheckedInt32| :direction :in) - (:name |format| :type |PixelFormat| :direction :in) - (:name |type| :type |PixelType| :direction :in) - (:name |pixels| :type |Void| :direction :out :array t :size - (|target| |level| |format| |type|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxsingle ("135") - :glsflags ("get" "pixel-pack") :glsopcode ("0x00FF") :wglflags - ("client-handcode" "server-handcode") :offset ("281"))) -(defglfun - (("GetTexGeniv" get-tex-gen-iv) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("134") :glsflags ("get") :glsopcode ("0x00FE") :wglflags - ("small-data") :offset ("280"))) -(defglfun - (("GetTexGenfv" get-tex-gen-fv) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("133") :glsflags ("get") :glsopcode ("0x00FD") :wglflags - ("small-data") :offset ("279"))) -(defglfun - (("GetTexGendv" get-tex-gen-dv) :args - ((:name |coord| :type |TextureCoordName| :direction :in) - (:name |pname| :type |TextureGenParameter| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("132") :glsflags ("get") :glsopcode ("0x00FC") :wglflags - ("small-data") :offset ("278"))) -(defglfun - (("GetTexEnviv" get-tex-env-iv) :args - ((:name |target| :type |TextureEnvTarget| :direction :in) - (:name |pname| :type |TextureEnvParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("131") :glsflags ("get") :glsopcode ("0x00FB") :wglflags - ("small-data") :offset ("277"))) -(defglfun - (("GetTexEnvfv" get-tex-env-fv) :args - ((:name |target| :type |TextureEnvTarget| :direction :in) - (:name |pname| :type |TextureEnvParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("130") :glsflags ("get") :glsopcode ("0x00FA") :wglflags - ("small-data") :offset ("276"))) -(defglfun - (("GetString" get-string) :args - ((:name |name| :type |StringName| :direction :in)) :return ("String") - :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxsingle ("129") - :glsflags ("get") :glsopcode ("0x00F9") :wglflags - ("client-handcode" "server-handcode") :offset ("275"))) -(defglfun - (("GetPolygonStipple" get-polygon-stipple) :args - ((:name |mask| :type |UInt8| :direction :out :array t)) :return ("void") - :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode" "server-handcode") :version ("1.0") :glxsingle ("128") - :glsflags ("get" "pixel-pack") :glsopcode ("0x00F8") :wglflags - ("client-handcode" "server-handcode") :offset ("274"))) -(defglfun - (("GetPixelMapusv" get-pixel-map-usv) :args - ((:name |map| :type |PixelMap| :direction :in) - (:name |values| :type |UInt16| :direction :out :array t :size (|map|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("127") :glsflags ("get") :glsopcode ("0x00F7") :offset - ("273"))) -(defglfun - (("GetPixelMapuiv" get-pixel-map-uiv) :args - ((:name |map| :type |PixelMap| :direction :in) - (:name |values| :type |UInt32| :direction :out :array t :size (|map|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("126") :glsflags ("get") :glsopcode ("0x00F6") :offset - ("272"))) -(defglfun - (("GetPixelMapfv" get-pixel-map-fv) :args - ((:name |map| :type |PixelMap| :direction :in) - (:name |values| :type |Float32| :direction :out :array t :size (|map|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("125") :glsflags ("get") :glsopcode ("0x00F5") :offset - ("271"))) -(defglfun - (("GetMaterialiv" get-material-iv) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("124") :glsflags ("get") :glsopcode ("0x00F4") :wglflags - ("small-data") :offset ("270"))) -(defglfun - (("GetMaterialfv" get-material-fv) :args - ((:name |face| :type |MaterialFace| :direction :in) - (:name |pname| :type |MaterialParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("123") :glsflags ("get") :glsopcode ("0x00F3") :wglflags - ("small-data") :offset ("269"))) -(defglfun - (("GetMapiv" get-map-iv) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |query| :type |GetMapQuery| :direction :in) - (:name |v| :type |Int32| :direction :out :array t :size (|target| |query|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("122") :glsflags ("get") :glsopcode ("0x00F2") :offset - ("268"))) -(defglfun - (("GetMapfv" get-map-fv) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |query| :type |GetMapQuery| :direction :in) - (:name |v| :type |Float32| :direction :out :array t :size - (|target| |query|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("121") :glsflags ("get") :glsopcode ("0x00F1") :offset - ("267"))) -(defglfun - (("GetMapdv" get-map-dv) :args - ((:name |target| :type |MapTarget| :direction :in) - (:name |query| :type |GetMapQuery| :direction :in) - (:name |v| :type |Float64| :direction :out :array t :size - (|target| |query|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("120") :glsflags ("get") :glsopcode ("0x00F0") :offset - ("266"))) -(defglfun - (("GetLightiv" get-light-iv) :args - ((:name |light| :type |LightName| :direction :in) - (:name |pname| :type |LightParameter| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("119") :glsflags ("get") :glsopcode ("0x00EF") :wglflags - ("small-data") :offset ("265"))) -(defglfun - (("GetLightfv" get-light-fv) :args - ((:name |light| :type |LightName| :direction :in) - (:name |pname| :type |LightParameter| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("118") :glsflags ("get") :glsopcode ("0x00EE") :wglflags - ("small-data") :offset ("264"))) -(defglfun - (("GetIntegerv" get-integerv) :args - ((:name |pname| :type |GetPName| :direction :in) - (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode") :version ("1.0") :glxsingle ("117") :glsflags - ("client" "get") :glsopcode ("0x00ED") :wglflags ("small-data") :offset - ("263"))) -(defglfun - (("GetFloatv" get-floatv) :args - ((:name |pname| :type |GetPName| :direction :in) - (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode") :version ("1.0") :glxsingle ("116") :glsflags - ("client" "get") :glsopcode ("0x00EC") :wglflags ("small-data") :offset - ("262"))) -(defglfun - (("GetError" get-error) :args nil :return ("ErrorCode") :category - ("state-req") :dlflags ("notlistable") :glxflags ("client-handcode") :version - ("1.0") :glxsingle ("115") :glsflags ("get") :glsopcode ("0x00EB") :offset - ("261"))) -(defglfun - (("GetDoublev" get-doublev) :args - ((:name |pname| :type |GetPName| :direction :in) - (:name |params| :type |Float64| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode") :version ("1.0") :glxsingle ("114") :glsflags - ("client" "get") :glsopcode ("0x00EA") :wglflags ("small-data") :offset - ("260"))) -(defglfun - (("GetClipPlane" get-clip-plane) :args - ((:name |plane| :type |ClipPlaneName| :direction :in) - (:name |equation| :type |Float64| :direction :out :array t :size #x4)) - :return ("void") :category ("state-req") :dlflags ("notlistable") :version - ("1.0") :glxsingle ("113") :glxflags ("client-handcode" "server-handcode") - :glsflags ("get") :glsopcode ("0x00E9") :offset ("259"))) -(defglfun - (("GetBooleanv" get-booleanv) :args - ((:name |pname| :type |GetPName| :direction :in) - (:name |params| :type |Boolean| :direction :out :array t :size (|pname|))) - :return ("void") :category ("state-req") :dlflags ("notlistable") :glxflags - ("client-handcode") :version ("1.0") :glxsingle ("112") :glsflags - ("client" "get") :glsopcode ("0x00E8") :wglflags ("small-data") :offset - ("258"))) +(defglfun "IsList" is-list :return "Boolean" :args + ((:name |list| :type |List| :direction :in)) :category "state-req" :version + "1.0") +(defglfun "IsEnabled" is-enabled :return "Boolean" :args + ((:name |cap| :type |EnableCap| :direction :in)) :category "state-req" + :version "1.0") +(defglfun "GetTexLevelParameteriv" get-tex-level-parameter-iv :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |pname| :type |GetTextureParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexLevelParameterfv" get-tex-level-parameter-fv :return "void" + :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |pname| :type |GetTextureParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexParameteriv" get-tex-parameter-iv :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |GetTextureParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexParameterfv" get-tex-parameter-fv :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |pname| :type |GetTextureParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexImage" get-tex-image :return "void" :args + ((:name |target| :type |TextureTarget| :direction :in) + (:name |level| :type |CheckedInt32| :direction :in) + (:name |format| :type |PixelFormat| :direction :in) + (:name |type| :type |PixelType| :direction :in) + (:name |pixels| :type |Void| :direction :out :array t :size + (|target| |level| |format| |type|))) + :category "state-req" :version "1.0") +(defglfun "GetTexGeniv" get-tex-gen-iv :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexGenfv" get-tex-gen-fv :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexGendv" get-tex-gen-dv :return "void" :args + ((:name |coord| :type |TextureCoordName| :direction :in) + (:name |pname| :type |TextureGenParameter| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexEnviv" get-tex-env-iv :return "void" :args + ((:name |target| :type |TextureEnvTarget| :direction :in) + (:name |pname| :type |TextureEnvParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetTexEnvfv" get-tex-env-fv :return "void" :args + ((:name |target| :type |TextureEnvTarget| :direction :in) + (:name |pname| :type |TextureEnvParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetString" get-string :return "String" :args + ((:name |name| :type |StringName| :direction :in)) :category "state-req" + :version "1.0") +(defglfun "GetPolygonStipple" get-polygon-stipple :return "void" :args + ((:name |mask| :type |UInt8| :direction :out :array t)) :category "state-req" + :version "1.0") +(defglfun "GetPixelMapusv" get-pixel-map-usv :return "void" :args + ((:name |map| :type |PixelMap| :direction :in) + (:name |values| :type |UInt16| :direction :out :array t :size (|map|))) + :category "state-req" :version "1.0") +(defglfun "GetPixelMapuiv" get-pixel-map-uiv :return "void" :args + ((:name |map| :type |PixelMap| :direction :in) + (:name |values| :type |UInt32| :direction :out :array t :size (|map|))) + :category "state-req" :version "1.0") +(defglfun "GetPixelMapfv" get-pixel-map-fv :return "void" :args + ((:name |map| :type |PixelMap| :direction :in) + (:name |values| :type |Float32| :direction :out :array t :size (|map|))) + :category "state-req" :version "1.0") +(defglfun "GetMaterialiv" get-material-iv :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetMaterialfv" get-material-fv :return "void" :args + ((:name |face| :type |MaterialFace| :direction :in) + (:name |pname| :type |MaterialParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetMapiv" get-map-iv :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |query| :type |GetMapQuery| :direction :in) + (:name |v| :type |Int32| :direction :out :array t :size (|target| |query|))) + :category "state-req" :version "1.0") +(defglfun "GetMapfv" get-map-fv :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |query| :type |GetMapQuery| :direction :in) + (:name |v| :type |Float32| :direction :out :array t :size + (|target| |query|))) + :category "state-req" :version "1.0") +(defglfun "GetMapdv" get-map-dv :return "void" :args + ((:name |target| :type |MapTarget| :direction :in) + (:name |query| :type |GetMapQuery| :direction :in) + (:name |v| :type |Float64| :direction :out :array t :size + (|target| |query|))) + :category "state-req" :version "1.0") +(defglfun "GetLightiv" get-light-iv :return "void" :args + ((:name |light| :type |LightName| :direction :in) + (:name |pname| :type |LightParameter| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetLightfv" get-light-fv :return "void" :args + ((:name |light| :type |LightName| :direction :in) + (:name |pname| :type |LightParameter| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetIntegerv" get-integerv :return "void" :args + ((:name |pname| :type |GetPName| :direction :in) + (:name |params| :type |Int32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetFloatv" get-floatv :return "void" :args + ((:name |pname| :type |GetPName| :direction :in) + (:name |params| :type |Float32| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetError" get-error :return "ErrorCode" :args nil :category + "state-req" :version "1.0") +(defglfun "GetDoublev" get-doublev :return "void" :args + ((:name |pname| :type |GetPName| :direction :in) + (:name |params| :type |Float64| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") +(defglfun "GetClipPlane" get-clip-plane :return "void" :args + ((:name |plane| :type |ClipPlaneName| :direction :in) + (:name |equation| :type |Float64| :direction :out :array t :size #x4)) + :category "state-req" :version "1.0") +(defglfun "GetBooleanv" get-booleanv :return "void" :args + ((:name |pname| :type |GetPName| :direction :in) + (:name |params| :type |Boolean| :direction :out :array t :size (|pname|))) + :category "state-req" :version "1.0") ;;;; }}} ;;;; {{{ xform -(defglfun - (("Viewport" viewport) :args - ((:name |x| :type |WinCoord| :direction :in) - (:name |y| :type |WinCoord| :direction :in) - (:name |width| :type |SizeI| :direction :in) - (:name |height| :type |SizeI| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("191") - :glsopcode ("0x0117") :offset ("305"))) -(defglfun - (("Translatef" translate-f) :args - ((:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("190") - :glsopcode ("0x0116") :offset ("304"))) -(defglfun - (("Translated" translate-d) :args - ((:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("189") - :glsopcode ("0x0115") :offset ("303"))) -(defglfun - (("Scalef" scale-f) :args - ((:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("188") - :glsopcode ("0x0114") :offset ("302"))) -(defglfun - (("Scaled" scale-d) :args - ((:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("187") - :glsopcode ("0x0113") :offset ("301"))) -(defglfun - (("Rotatef" rotate-f) :args - ((:name |angle| :type |Float32| :direction :in) - (:name |x| :type |Float32| :direction :in) - (:name |y| :type |Float32| :direction :in) - (:name |z| :type |Float32| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("186") - :glsopcode ("0x0112") :offset ("300"))) -(defglfun - (("Rotated" rotate-d) :args - ((:name |angle| :type |Float64| :direction :in) - (:name |x| :type |Float64| :direction :in) - (:name |y| :type |Float64| :direction :in) - (:name |z| :type |Float64| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("185") - :glsopcode ("0x0111") :offset ("299"))) -(defglfun - (("PushMatrix" push-matrix) :args nil :return ("void") :category ("xform") - :version ("1.0") :glxropcode ("184") :glsopcode ("0x0110") :offset ("298"))) -(defglfun - (("PopMatrix" pop-matrix) :args nil :return ("void") :category ("xform") - :version ("1.0") :glxropcode ("183") :glsopcode ("0x010F") :offset ("297"))) -(defglfun - (("Ortho" ortho) :args - ((:name |left| :type |Float64| :direction :in) - (:name |right| :type |Float64| :direction :in) - (:name |bottom| :type |Float64| :direction :in) - (:name |top| :type |Float64| :direction :in) - (:name |zNear| :type |Float64| :direction :in) - (:name |zFar| :type |Float64| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("182") - :glsopcode ("0x010E") :offset ("296"))) -(defglfun - (("MultMatrixd" mult-matrix-d) :args - ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :return - ("void") :category ("xform") :version ("1.0") :glxropcode ("181") :glsflags - ("matrix") :glsopcode ("0x010D") :offset ("295"))) -(defglfun - (("MultMatrixf" mult-matrix-f) :args - ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :return - ("void") :category ("xform") :version ("1.0") :glxropcode ("180") :glsflags - ("matrix") :glsopcode ("0x010C") :offset ("294"))) -(defglfun - (("MatrixMode" matrix-mode) :args - ((:name |mode| :type |MatrixMode| :direction :in)) :return ("void") :category - ("xform") :version ("1.0") :glxropcode ("179") :glsopcode ("0x010B") :offset - ("293"))) -(defglfun - (("LoadMatrixd" load-matrix-d) :args - ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :return - ("void") :category ("xform") :version ("1.0") :glxropcode ("178") :glsflags - ("matrix") :glsopcode ("0x010A") :offset ("292"))) -(defglfun - (("LoadMatrixf" load-matrix-f) :args - ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :return - ("void") :category ("xform") :version ("1.0") :glxropcode ("177") :glsflags - ("matrix") :glsopcode ("0x0109") :offset ("291"))) -(defglfun - (("LoadIdentity" load-identity) :args nil :return ("void") :category ("xform") - :version ("1.0") :glxropcode ("176") :glsopcode ("0x0108") :offset ("290"))) -(defglfun - (("Frustum" frustum) :args - ((:name |left| :type |Float64| :direction :in) - (:name |right| :type |Float64| :direction :in) - (:name |bottom| :type |Float64| :direction :in) - (:name |top| :type |Float64| :direction :in) - (:name |zNear| :type |Float64| :direction :in) - (:name |zFar| :type |Float64| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("175") - :glsopcode ("0x0107") :offset ("289"))) -(defglfun - (("DepthRange" depth-range) :args - ((:name |near| :type |ClampedFloat64| :direction :in) - (:name |far| :type |ClampedFloat64| :direction :in)) - :return ("void") :category ("xform") :version ("1.0") :glxropcode ("174") - :glsopcode ("0x0106") :offset ("288"))) +(defglfun "Viewport" viewport :return "void" :args + ((:name |x| :type |WinCoord| :direction :in) + (:name |y| :type |WinCoord| :direction :in) + (:name |width| :type |SizeI| :direction :in) + (:name |height| :type |SizeI| :direction :in)) + :category "xform" :version "1.0") +(defglfun "Translatef" translate-f :return "void" :args + ((:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "xform" :version "1.0") +(defglfun "Translated" translate-d :return "void" :args + ((:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "xform" :version "1.0") +(defglfun "Scalef" scale-f :return "void" :args + ((:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "xform" :version "1.0") +(defglfun "Scaled" scale-d :return "void" :args + ((:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "xform" :version "1.0") +(defglfun "Rotatef" rotate-f :return "void" :args + ((:name |angle| :type |Float32| :direction :in) + (:name |x| :type |Float32| :direction :in) + (:name |y| :type |Float32| :direction :in) + (:name |z| :type |Float32| :direction :in)) + :category "xform" :version "1.0") +(defglfun "Rotated" rotate-d :return "void" :args + ((:name |angle| :type |Float64| :direction :in) + (:name |x| :type |Float64| :direction :in) + (:name |y| :type |Float64| :direction :in) + (:name |z| :type |Float64| :direction :in)) + :category "xform" :version "1.0") +(defglfun "PushMatrix" push-matrix :return "void" :args nil :category "xform" + :version "1.0") +(defglfun "PopMatrix" pop-matrix :return "void" :args nil :category "xform" + :version "1.0") +(defglfun "Ortho" ortho :return "void" :args + ((:name |left| :type |Float64| :direction :in) + (:name |right| :type |Float64| :direction :in) + (:name |bottom| :type |Float64| :direction :in) + (:name |top| :type |Float64| :direction :in) + (:name |zNear| :type |Float64| :direction :in) + (:name |zFar| :type |Float64| :direction :in)) + :category "xform" :version "1.0") +(defglfun "MultMatrixd" mult-matrix-d :return "void" :args + ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :category + "xform" :version "1.0") +(defglfun "MultMatrixf" mult-matrix-f :return "void" :args + ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :category + "xform" :version "1.0") +(defglfun "MatrixMode" matrix-mode :return "void" :args + ((:name |mode| :type |MatrixMode| :direction :in)) :category "xform" :version + "1.0") +(defglfun "LoadMatrixd" load-matrix-d :return "void" :args + ((:name |m| :type |Float64| :direction :in :array t :size #x10)) :category + "xform" :version "1.0") +(defglfun "LoadMatrixf" load-matrix-f :return "void" :args + ((:name |m| :type |Float32| :direction :in :array t :size #x10)) :category + "xform" :version "1.0") +(defglfun "LoadIdentity" load-identity :return "void" :args nil :category + "xform" :version "1.0") +(defglfun "Frustum" frustum :return "void" :args + ((:name |left| :type |Float64| :direction :in) + (:name |right| :type |Float64| :direction :in) + (:name |bottom| :type |Float64| :direction :in) + (:name |top| :type |Float64| :direction :in) + (:name |zNear| :type |Float64| :direction :in) + (:name |zFar| :type |Float64| :direction :in)) + :category "xform" :version "1.0") +(defglfun "DepthRange" depth-range :return "void" :args + ((:name |near| :type |ClampedFloat64| :direction :in) + (:name |far| :type |ClampedFloat64| :direction :in)) + :category "xform" :version "1.0") ;;;; }}} diff --git a/lib/scaffolding.lisp b/lib/scaffolding.lisp index a05cef9..1a4c95e 100644 --- a/lib/scaffolding.lisp +++ b/lib/scaffolding.lisp @@ -5,10 +5,11 @@ (defparameter *type-map* nil) -(defun c-name-of (func-spec) (first (first func-spec))) -(defun lisp-name-of (func-spec) (second (first func-spec))) -(defun freturn-of (func-spec) (first (getf (rest func-spec) :return))) -(defun args-of (func-spec) (getf (rest func-spec) :args)) +(defun c-name-of (func-spec) (first func-spec)) +(defun lisp-name-of (func-spec) (second func-spec)) +(defun freturn-of (func-spec) (getf (cddr func-spec) :return)) +(defun args-of (func-spec) (getf (cddr func-spec) :args)) +(defun category-of (func-spec) (getf (cddr func-spec) :category)) (defun deconstant (symbol) (if (not (constantp symbol)) @@ -140,10 +141,10 @@ ,@(mapcar #'final-arg-name (args-of func-spec)))))) (gl-function-definition func-spec)))) -(defmacro defglfun (func-spec) +(defmacro defglfun (&rest func-spec) (wrapped-gl-function-definition func-spec)) -(defmacro defglextfun (func-spec) +(defmacro defglextfun (&rest func-spec) #+win32 (wrapped-win32-gl-function-definition func-spec) #-win32 (wrapped-gl-function-definition func-spec)) -- 2.11.4.GIT