home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 2: Collection B / 17Bit_Collection_B.iso / files / 1345.dms / in.adf / clibs / UNIX / getw.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-12-06  |  519 b   |  27 lines
  1. /*
  2.   (c) 1990 S.Hawtin.
  3.   Permission is granted to copy this file provided
  4.    1) It is not used for commercial gain
  5.    2) This notice is included in all copies
  6.    3) Altered copies are marked as such
  7.  
  8.   No liability is accepted for the contents of the file.
  9.  
  10.   getw.c    within        Public Domain UNIX.lib
  11.  
  12. */
  13.  
  14. #include <types.h>
  15. #include <stdio.h>
  16.  
  17. unsigned int
  18. getw(fptr)
  19.     FILE *fptr;
  20.    {/* Get a word from a file */
  21.     unsigned int res;
  22.  
  23.     res = fgetc(fptr);
  24.     res = (res<<8) + fgetc(fptr);
  25.     return(res);
  26.     }
  27.