ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/OpenCL/OpenCL.xs
(Generate patch)

Comparing OpenCL/OpenCL.xs (file contents):
Revision 1.66 by root, Fri May 4 14:46:02 2012 UTC vs.
Revision 1.67 by root, Fri May 4 14:49:42 2012 UTC

… …
2811 2811
2812void 2812void
2813arg_info (OpenCL::Kernel self, cl_uint idx, cl_kernel_arg_info name) 2813arg_info (OpenCL::Kernel self, cl_uint idx, cl_kernel_arg_info name)
2814 PPCODE: 2814 PPCODE:
2815 size_t size; 2815 size_t size;
2816 NEED_SUCCESS (GetKernelArgInfo, (self, name, 0, 0, &size)); 2816 NEED_SUCCESS (GetKernelArgInfo, (self, idx, name, 0, 0, &size));
2817 SV *sv = sv_2mortal (newSV (size)); 2817 SV *sv = sv_2mortal (newSV (size));
2818 SvUPGRADE (sv, SVt_PV); 2818 SvUPGRADE (sv, SVt_PV);
2819 SvPOK_only (sv); 2819 SvPOK_only (sv);
2820 SvCUR_set (sv, size); 2820 SvCUR_set (sv, size);
2821 NEED_SUCCESS (GetKernelArgInfo, (self, name, size, SvPVX (sv), 0)); 2821 NEED_SUCCESS (GetKernelArgInfo, (self, idx, name, size, SvPVX (sv), 0));
2822 XPUSHs (sv); 2822 XPUSHs (sv);
2823 2823
2824#BEGIN:kernel_arg 2824#BEGIN:kernel_arg
2825 2825
2826#END:kernel_arg 2826#END:kernel_arg

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines