* Must dup() file descriptor so we can fclose(stream), otherwise the fclose()
* would close Tcl's file descriptor
*/
* Must dup() file descriptor so we can fclose(stream), otherwise the fclose()
* would close Tcl's file descriptor
*/
Tcl_AppendResult(interp,
"dup() failed for file descriptor associated with \"",
argv[1], "\": ", strerror(errno), (char *) NULL);
Tcl_AppendResult(interp,
"dup() failed for file descriptor associated with \"",
argv[1], "\": ", strerror(errno), (char *) NULL);