https://gcc.gnu.org/bugzilla/show_bug.cgi?id=92836
--- Comment #7 from Tobias Burnus <burnus at gcc dot gnu.org> --- (In reply to Jerry DeLisle from comment #3) > character(len=27) :: c > Fortran runtime error: Fortran runtime error: End of recordEnd of record This error I get because 27 characters are not enough — Otherwise, it works here. (In reply to Tobias Burnus from comment #6) > This part looks a bit fishy. Shouldn't this be "if (TRYLOCK (...))"? Without > "!" – or do I miss something crucial? > https://www.kernel.org/doc/htmldocs/kernel-locking/API-mutex-trylock.html In any case, with '!' removed, it seems to deadlock (running the c-length fixed version of Jerry's code w/ the 'while' + 'end while' lines commented out). Hence, it is either wrong in a more complicated way – or (likely) I simply misunderstand how it is supposed to work – or both.