564 	int			bufferlen, readcount ;  in host_read_d2s()  local
575 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in host_read_d2s()
578 			endswap_double_array (ubuf.dbuf, readcount) ;  in host_read_d2s()
580 		convert (ubuf.dbuf, readcount, ptr + total, scale) ;  in host_read_d2s()
581 		total += readcount ;  in host_read_d2s()
582 		len -= readcount ;  in host_read_d2s()
583 		if (readcount < bufferlen)  in host_read_d2s()
594 	int			bufferlen, readcount ;  in host_read_d2i()  local
605 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in host_read_d2i()
610 		convert (ubuf.dbuf, readcount, ptr + total, scale) ;  in host_read_d2i()
611 		total += readcount ;  in host_read_d2i()
612 		len -= readcount ;  in host_read_d2i()
613 		if (readcount < bufferlen)  in host_read_d2i()
623 	int			bufferlen, readcount ;  in host_read_d2f()  local
631 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in host_read_d2f()
634 			endswap_double_array (ubuf.dbuf, readcount) ;  in host_read_d2f()
636 		d2f_array (ubuf.dbuf, readcount, ptr + total) ;  in host_read_d2f()
637 		total += readcount ;  in host_read_d2f()
638 		len -= readcount ;  in host_read_d2f()
639 		if (readcount < bufferlen)  in host_read_d2f()
649 	sf_count_t	readcount, total = 0 ;  in host_read_d()  local
651 	readcount = psf_fread (ptr, sizeof (double), len, psf) ;  in host_read_d()
654 		return readcount ;  in host_read_d()
657 	if (readcount < SENSIBLE_LEN)  in host_read_d()
658 	{	endswap_double_array (ptr, readcount) ;  in host_read_d()
659 		return readcount ;  in host_read_d()
804 	int			bufferlen, readcount ;  in replace_read_d2s()  local
814 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in replace_read_d2s()
821 		d2s_array (ubuf.dbuf, readcount, ptr + total, scale) ;  in replace_read_d2s()
822 		total += readcount ;  in replace_read_d2s()
823 		if (readcount < bufferlen)  in replace_read_d2s()
825 		len -= readcount ;  in replace_read_d2s()
834 	int			bufferlen, readcount ;  in replace_read_d2i()  local
844 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in replace_read_d2i()
851 		d2i_array (ubuf.dbuf, readcount, ptr + total, scale) ;  in replace_read_d2i()
852 		total += readcount ;  in replace_read_d2i()
853 		if (readcount < bufferlen)  in replace_read_d2i()
855 		len -= readcount ;  in replace_read_d2i()
864 	int			bufferlen, readcount ;  in replace_read_d2f()  local
872 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in replace_read_d2f()
881 		total += readcount ;  in replace_read_d2f()
882 		if (readcount < bufferlen)  in replace_read_d2f()
884 		len -= readcount ;  in replace_read_d2f()
893 	int			bufferlen, readcount ;  in replace_read_d()  local
902 		readcount = psf_fread (ubuf.dbuf, sizeof (double), bufferlen, psf) ;  in replace_read_d()
905 			endswap_double_array (ubuf.dbuf, readcount) ;  in replace_read_d()
907 		d2bd_read (ubuf.dbuf, readcount) ;  in replace_read_d()
909 		memcpy (ptr + total, ubuf.dbuf, readcount * sizeof (double)) ;  in replace_read_d()
911 		total += readcount ;  in replace_read_d()
912 		if (readcount < bufferlen)  in replace_read_d()
914 		len -= readcount ;  in replace_read_d()