--- OpenCL/gengetinfo	2012/05/05 13:30:07	1.17
+++ OpenCL/gengetinfo	2012/05/05 13:56:00	1.18
@@ -39,7 +39,7 @@
    Program         => ['cl_program', 'OpenCL::Program', 'program'],
    CommandQueue    => ['cl_command_queue', 'OpenCL::Queue', 'queue'],
    cl_context_properties => ['cl_context_properties', 'newSVuv ((UV)value [i])', 'property_int'],
-   cl_program_binary_type => ['cl_program_binary_type', 'newSVuv (UV)value [i])', 'binary_type'],
+   cl_program_binary_type => ['cl_program_binary_type', 'newSVuv ((UV)value [i])', 'binary_type'],
 );
 
 {