--- OpenCL/OpenCL.pm	2012/04/19 19:36:24	1.38
+++ OpenCL/OpenCL.pm	2012/04/19 22:33:27	1.40
@@ -262,7 +262,7 @@
      float2 z = m;
      float2 c = (float2)(sin (time * 0.05005), cos (time * 0.06001));
 
-     for (int i = 0; i < 100 && dot (z, z) < 4.f; ++i)
+     for (int i = 0; i < 25 && dot (z, z) < 4.f; ++i)
        z = (float2)(z.x * z.x - z.y * z.y, 2.f * z.x * z.y) + c;
 
      float3 colour = (float3)(z.x, z.y, z.x * z.y);
@@ -290,7 +290,7 @@
       $queue->enqueue_release_gl_objects ([$tex]);
 
       # wait
-      $queue->flush;
+      $queue->finish;
 
       # now draw the texture, the defaults should be all right
       glTexParameterf GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST;