On Sun, Dec 11, 2011 at 11:11:28AM +0100, Thomas Koenig wrote:
> @@ -1330,16 +1345,38 @@ gfc_code_walker (gfc_code **c, walk_code_fn_t code
>             WALK_SUBEXPR (co->ext.dt->extra_comma);
>             break;
>  
> -         case EXEC_OMP_DO:
> +           in_omp_workshare = true;
> +
> +           break;
> +

What is the above hunk?  Looks like unreachable code:

        break;
        in_omp_workshare = true;
        break;

Other than that looks good to me.


        Jakub

Reply via email to