/* $Header: /cvsup/minix/src/lib/ack/libp/popen.c,v 1.1 2005/10/10 15:27:47 beng Exp $ *//* * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. * *          This product is part of the Amsterdam Compiler Kit. * * Permission to use, sell, duplicate or disclose this software must be * obtained in writing. Requests for such permissions may be sent to * *      Dr. Andrew S. Tanenbaum *      Wiskundig Seminarium *      Vrije Universiteit *      Postbox 7161 *      1007 MC Amsterdam *      The Netherlands * *//* Author: J.W. Stevenson */#include	<pc_file.h>#include	<pc_err.h>extern		_cls();extern		_trp();extern int	_open();/* procedure popen(var f:text; s:string); */popen(f,s) struct file *f; char *s; {	_cls(f);	/* initializes _curfil */	f->ptr = f->bufadr;	f->flags = TXTBIT|MAGIC;	f->fname = s;	f->size = 1;	f->count = 0;	f->buflen = PC_BUFLEN;	if ((f->ufd = _open(s,0)) < 0)		_trp(ERESET);}