paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 16:27:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Dotted filenames for package opencl

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-03-06 14:57:55 +01:00
parent 4537f34c82
commit 7f592bb331
5 changed files with 24 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/opencl/namespaced/OpenCLApi.Cl.pp Normal file
View File

@ -0,0 +1,3 @@
unit OpenCLApi.Cl;
{$DEFINE FPC_DOTTEDUNITS}
{$i cl.pp}

3
packages/opencl/namespaced/OpenCLApi.Cl_gl.pp Normal file
View File

@ -0,0 +1,3 @@
unit OpenCLApi.Cl_gl;
{$DEFINE FPC_DOTTEDUNITS}
{$i cl_gl.pp}

4
packages/opencl/namespaces.lst Normal file
View File

@ -0,0 +1,4 @@
src/cl.pp=namespaced/OpenCLApi.Cl.pp
{s*:src/}=namespaced/
{i+:src/}
src/cl_gl.pp=namespaced/OpenCLApi.Cl_gl.pp

7
packages/opencl/src/cl.pp
View File

@ -33,12 +33,19 @@
// CL_MEM_FLAGS CL_MEM_FLAGS_INFO
// CL_IMAGE_FORMAT CL_IMAGE_FORMAT_INFO
{$IFNDEF FPC_DOTTEDUNITS}
unit cl;
{$ENDIF FPC_DOTTEDUNITS}
interface
{$IFDEF FPC_DOTTEDUNITS}
uses
System.CTypes;
{$ELSE FPC_DOTTEDUNITS}
uses
ctypes;
{$ENDIF FPC_DOTTEDUNITS}
{$MACRO ON}

7
packages/opencl/src/cl_gl.pp
View File

@ -23,12 +23,19 @@
// ported to FPC by Dmitry 'skalogryz' Boyarintsev: 28th apr 2009
{$IFNDEF FPC_DOTTEDUNITS}
unit cl_gl;
{$ENDIF FPC_DOTTEDUNITS}
interface
{$IFDEF FPC_DOTTEDUNITS}
uses
OpenCLApi.Cl, Api.OpenGL.Gl, System.CTypes;
{$ELSE FPC_DOTTEDUNITS}
uses
cl, gl, ctypes;
{$ENDIF FPC_DOTTEDUNITS}
// NOTE: Make sure that appropriate GL header file is included separately