aboutsummaryrefslogtreecommitdiff
path: root/sys/imio/imflush.x
blob: 32cd2bc793378d8077d9d5228a37cf0841a64acc (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.

include	<imhdr.h>
include	<imio.h>

# IMFLUSH -- Flush the output buffer.  The output buffer may contain
# pixels of any datatype.  The entry point of the datatype specific
# flush procedure is saved in the image descriptor by IMPGS?.

procedure imflush (imdes)

pointer	imdes

begin
	if (IM_PFD(imdes) != NULL && IM_FLUSH(imdes) == YES) {
	    call zcall1 (IM_FLUSHEPA(imdes), imdes)
	    call flush (IM_PFD(imdes))
	}
end