home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fish 'n' More 1
/
FishNMoreVol1.bin
/
more
/
code_examples
/
librar
/
sfile2lh.c
< prev
next >
Wrap
Text File
|
1989-02-08
|
443b
|
21 lines
/*--------------------------------------*/
/* */
/* SFILE2LHEX(X) */
/* */
/* Reads and returns a number from a */
/* file. The argument is the file desc- */
/* riptor. */
/* */
/*--------------------------------------*/
# include "stdio.h"
long sfile2lhex(fd)
FILE *fd;
{
int c,d;
long r;
c=scram(getc(fd));
d=scram(getc(fd));
r=(256*c)+d;
return(r);
}