?? rfi.c
字號:
#ifndef lintstatic char *sccsid = " @(#)rfi.c 4.1 (ULTRIX) 7/17/90";#endif lint/************************************************************************ * * * Copyright (c) 1986 by * * Digital Equipment Corporation, Maynard, MA * * All rights reserved. * * * * This software is furnished under a license and may be used and * * copied only in accordance with the terms of such license and * * with the inclusion of the above copyright notice. This * * software or any other copies thereof may not be provided or * * otherwise made available to any other person. No title to and * * ownership of the software is hereby transferred. * * * * This software is derived from software received from the * * University of California, Berkeley, and from Bell * * Laboratories. Use, duplication, or disclosure is subject to * * restrictions under license agreements with University of * * California and with AT&T. * * * * The information in this software is subject to change without * * notice and should not be construed as a commitment by Digital * * Equipment Corporation. * * * * Digital assumes no responsibility for the use or reliability * * of its software on equipment which is not supplied by Digital. * * * ************************************************************************//************************************************************************** Modification History** David Metsky 10-Jan-86** 001 Added from BSD 4.3 version as part of upgrade.** Based on: rfi.c 5.1 6/7/85**************************************************************************//* * internal (character array) i/o: read formatted, sequential and direct */#include "fio.h"extern int rd_ed(),rd_ned();extern int z_getc(),z_rnew(),z_tab();LOCALc_rfi(){ reading = YES; doed=rd_ed; doned=rd_ned; getn=z_getc; doend = donewrec = z_rnew; dorevert = z_rnew; dotab = z_tab;}s_rsfi(a) icilist *a;{ int n; c_rfi(); if( n = c_si(a) ) return (n); if(pars_f()) err(errflag,F_ERFMT,"rsfio") fmt_bg(); return( OK );}s_rdfi(a) icilist *a;{ int n; c_rfi(); if( n = c_di(a) ) return (n); if(pars_f()) err(errflag,F_ERFMT,"rdfio") fmt_bg(); return( OK );}e_rsfi(){ int n; n = en_fio(); fmtbuf = NULL; return(n);}e_rdfi(){ return(e_rsfi());}
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -