… | |
… | |
2770 | CODE: |
2770 | CODE: |
2771 | RETVAL = PTR2IV (self->ptr); |
2771 | RETVAL = PTR2IV (self->ptr); |
2772 | OUTPUT: |
2772 | OUTPUT: |
2773 | RETVAL |
2773 | RETVAL |
2774 | |
2774 | |
|
|
2775 | void |
|
|
2776 | set (OpenCL::Mapped self, size_t offset, SV *data) |
|
|
2777 | CODE: |
|
|
2778 | STRLEN len; |
|
|
2779 | const char *ptr = SvPVbyte (data, len); |
|
|
2780 | |
|
|
2781 | if (offset < 0 || offset + len > self->cb) |
|
|
2782 | croak ("OpenCL::Mapped::set out of bound condition detected"); |
|
|
2783 | |
|
|
2784 | memcpy (offset + (char *)self->ptr, ptr, len); |
|
|
2785 | |
2775 | MODULE = OpenCL PACKAGE = OpenCL::MappedBuffer |
2786 | MODULE = OpenCL PACKAGE = OpenCL::MappedBuffer |
2776 | |
2787 | |
2777 | MODULE = OpenCL PACKAGE = OpenCL::MappedImage |
2788 | MODULE = OpenCL PACKAGE = OpenCL::MappedImage |
2778 | |
2789 | |
2779 | IV |
2790 | IV |