Searched refs:close_share (Results 1 – 7 of 7) sorted by relevance
144 extern int close_share (gfc_unit *);145 internal_proto(close_share);
87 if (close_share (u) < 0) in st_close()
1878 close_share (gfc_unit *u __attribute__ ((unused))) in close_share() function
1132 * io/unix.h (close_share): New prototype.1133 * io/unix.c (open_share, close_share): New functions to handle SHARE.1135 * io/close.c (st_close): Call close_share.