* fix clinfo.pp for 64 Bit targets, patch by Thaddy de Koning, resolves #28405

git-svn-id: trunk@31219 -

packages/opencl/examples/clinfo.pp

@@ -1,6 +1,6 @@
 {$mode objfpc}
 uses
-  cl;
+  ctypes, cl;
 
 const
   device_str_info : array[1..5] of record id : dword; name : pchar end =
@@ -20,7 +20,7 @@ var
   deviceids : pcl_device_id;
   i,j,k : Integer;
   buf : array[0..99999] of char;
-  bufwritten : LongWord;
+  bufwritten : csize_t;
 
 
 begin