campo-sirio/gfm/dfscanf.c
luca ac8ecb0b9f Patch level :2.0 aga 370
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :sistemate le librerie gfm (allineate a partners version)


git-svn-id: svn://10.65.10.50/trunk@10750 c028cbd2-c16b-5b4b-a496-9718f37d4682
2003-01-17 12:20:25 +00:00

65 lines
1.2 KiB
C
Executable File

/* int FileScanDecimal(fFile, sFmt, arg,)
*
* ARGUMENT
* FILE *fFile;
* char *sFmt;
* (?) arg;
*
* DESCRIPTION
* Scans arguments, which may include DEC structures,
* from a string, according
* to the format string sFmt. The function converts the DEC's to strings
* and calls scanf.
*
* SIDE EFFECTS
* None.
*
* RETURNS
* The number of fields scanned, the return from scanf.
*
* POSSIBLE ERRORS
* GM_NULLPOINTER
* GM_NULLSTRING
* GM_INVALIDID
* GM_CNVRW
* GM_CNVRE
* GM_NAN
* GM_EOF
*
* AUTHOR
* Jared Levy
* Copyright (C) 1987-1990 Greenleaf Software Inc. All rights reserved.
*
* MODIFICATIONS
*
*
*/
#include <stdio.h>
#include "gm.h"
#include "gmsystem.h"
int FileScanDecimal(fFile,sFmt, ELLIPSES)
FILE *fFile;
char *sFmt;
{
int i;
char **pOutVal;
_MacStart(GM_DFSCANF);
pOutVal=&sFmt;
i=_ScanfAux(3, (char *) fFile, sFmt,
pOutVal[1], pOutVal[2], pOutVal[3], pOutVal[4], pOutVal[5],
pOutVal[6], pOutVal[7], pOutVal[8], pOutVal[9], pOutVal[10]
#ifndef _LDATA
,pOutVal[11], pOutVal[12], pOutVal[13], pOutVal[14], pOutVal[15],
pOutVal[16], pOutVal[17], pOutVal[18], pOutVal[19], pOutVal[20]
#endif
);
_MacRet(i);
}