home *** CD-ROM | disk | FTP | other *** search
/ Encyclopedia of Graphics File Formats Companion / GFF_CD.ISO / software / unix / saoimage / sao1_07.tar / vms / ntohl.c < prev    next >
Text File  |  1989-11-10  |  306b  |  20 lines
  1. /* NTOHL -- [MACHDEP] Convert a long integer in net format to host format.
  2.  */
  3. ntohl (lword)
  4. long    lword;
  5. {
  6.     register char *ip, *op;
  7.     static    long hostw, netw;
  8.  
  9.     netw = lword;
  10.     ip = (char *)&netw;
  11.     op = (char *)&hostw + 4;
  12.  
  13.     *--op = *ip++;
  14.     *--op = *ip++;
  15.     *--op = *ip++;
  16.     *--op = *ip++;
  17.  
  18.     return (hostw);
  19. }
  20.