使用 Fortran (CLFORTRAN) 在 OpenCL 中将两个选项作为参数传递

Question

当我的主机程序是 C 语言时，我可以传递两个选项作为 OpenCL 函数的参数。例如，我可以通过两个 clCreateBuffer 函数的标志如下：

clCreateBuffer(context, CL_MEM_READ_ONLY | CL_MEM_COPY_HOST_PTR,
                            sizeof(main_data), main_data, &err)

但是，当我尝试在用 Fortran 编写的主机程序中执行相同操作时：

main_data=clCreateBuffer(context, CL_MEM_READ_ONLY | CL_MEM_COPY_HOST_PTR, &
                               sizeof(main_data), C_NULL_PTR, err)

我收到一个错误：

 &     |CL_MEM_COPY_HOST_PTR, size_in_bytes,C_NULL_PTR,ierr)        
       1
Error: Syntax error in argument list at (1)

我已经使用 CLFORTRAN 成功编译了一些其他程序，但是每当我尝试传递两个标志，如 CL_MEM_READ_ONLY | CL_MEM_COPY_HOST_PTR 时，我都会收到上述错误。

Answer 1

C 按位或 | 不能在 Fortran 中使用。你必须使用 +。 ior() 函数也可能有效，但我会使用 +*。它之所以有效，是因为常量的值通常以这样一种方式设计，即它们只有一个 1 位并且每次都在不同的位置。

*如果您确实使用了 +，您不能添加相同的标志两次，它的标志将被错误计算。

Passing two options as arguments in OpenCL with Fortran (CLFORTRAN)