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

Comparing OpenCL/typemap (file contents):
Revision 1.14 by root, Fri May 4 14:29:35 2012 UTC vs.
Revision 1.17 by root, Sat May 5 02:45:38 2012 UTC

38cl_program_info T_UV 38cl_program_info T_UV
39cl_program_build_info T_UV 39cl_program_build_info T_UV
40cl_build_status T_IV 40cl_build_status T_IV
41cl_kernel_info T_UV 41cl_kernel_info T_UV
42cl_kernel_work_group_info T_UV 42cl_kernel_work_group_info T_UV
43cl_kernel_arg_info T_UV
44cl_kernel_arg_address_qualifier T_UV
45cl_kernel_arg_access_qualifier T_UV
46cl_kernel_arg_type_qualifier T_UV
43cl_command_type T_UV 47cl_command_type T_UV
44cl_mem_migration_flags T_UV 48cl_mem_migration_flags T_UV
45 49
46cl_context_properties * context_properties 50cl_context_properties * context_properties
47 51
72OpenCL::Event clobj 76OpenCL::Event clobj
73OpenCL::UserEvent clobj_ni 77OpenCL::UserEvent clobj_ni
74 78
75OpenCL::Mapped mapped 79OpenCL::Mapped mapped
76 80
77FUTURE future
78
79INPUT 81INPUT
80 82
81future
82 if (SvOK ($arg))
83 croak (\"$pname argument '$var' is reserved for future extensions, it must be missing or undef in this implementation, in call\");
84
85context_properties 83context_properties
86 $var = SvCONTEXTPROPERTIES (${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]}, \"$var\", $arg, 0, 0) 84 $var = SvCONTEXTPROPERTIES (cv, \"$var\", $arg, 0, 0)
87 85
88clobj 86clobj
89 $var = ($type)SvCLOBJ (${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]}, \"$var\", $arg, \"${ntype}\") 87 $var = ($type)SvCLOBJ (cv, \"$var\", $arg, \"${ntype}\")
90 88
91clobj_ni 89clobj_ni
92 $var = ($type)SvCLOBJ_ni (${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]}, \"$var\", $arg, stash_${(my $x = $ntype) =~ s/OpenCL:://; \lc $x}) 90 $var = ($type)SvCLOBJ_ni (cv, \"$var\", $arg, stash_${(my $x = $ntype) =~ s/OpenCL:://; \lc $x})
93 91
94clobj_ornull 92clobj_ornull
95 $var = SvOK ($arg) ? ($type)SvCLOBJ (${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]}, \"$var\", $arg, \"${\substr $ntype, 0, -7}\") : 0 93 $var = SvOK ($arg) ? ($type)SvCLOBJ (cv, \"$var\", $arg, \"${\substr $ntype, 0, -7}\") : 0
96 94
97mapped 95mapped
98 $var = SvMAPPED ($arg); 96 $var = SvMAPPED ($arg);
99 97

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines