Move pancake status to clCreateProgram