All OpenCL Info: Add output separators

SunSerega · May 1, 2024 · e308448 · e308448
1 parent d775aaf
commit e308448
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Samples/OpenCLABC/All OpenCL info.pas b/Samples/OpenCLABC/All OpenCL info.pas
@@ -6,8 +6,10 @@
   Println(pl.Properties);
   foreach var dvc in CLDevice.GetAllFor(pl, clDeviceType.DEVICE_TYPE_ALL) do
   begin
+    Println('~'*70);
     Println(dvc);
     Println(dvc.Properties);
   end;
+  Println('='*90);
 end;