#include"libioP.h"#include"stdio.h"#include<errno.h>intpclose(fp)FILE*fp;{#if 0 /* Does not actually test that stream was created by popen(). Instead, it depends on the filebuf::sys_close() virtual to Do The Right Thing. */ if (fp is not a proc_file) return -1;#endifreturn_IO_fclose(fp);}