Automatic Scoping of Variables in Parallel Regions of an OpenMP Program