kernel void

          do_proc (__global char *pA, short b,

                         __global short *pB)

          {

                char            x[100];

                __private char  *px = x;

                int             id = (int)get_global_id(0);

                short           f;

                f = pB[id] + b; // is allowed

                px[1] = pA[1];  // error. px cannot be written.

                pB[id] = b;   // error. pB cannot be written

          }