[Info-vax] K-mutex

[Pierre]

> /* release resource */
>
>         status = sys$deq( resource.prev_sub.lksb.lockid, 0,0, LCK$M_DEQALL );
>         check(status);
>
>         status = sys$deq( resource.prev_sub.lksb.lockid, 0,0,0 );
>         check(status);

I think I did no retrieve the last version of the test program.
of course, those lines should read:

/* release resource */

        status = sys$deq( resource.master.lksb.lockid, 0,0, LCK
$M_DEQALL );
        check(status);

        status = sys$deq( resource.master.lksb.lockid, 0,0,0 );
        check(status);