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

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

# IMBLN1 -- Get the length of the axes of a one dimensional subraster.
# Must be called immediately after the get or put call that created the
# buffer.

procedure imbln1 (imdes, nx)

pointer	imdes
int	nx
pointer	bdes

begin
	# Get pointer to most recently used buffer descriptor.
	bdes = IM_LASTBDES(imdes)

	nx = abs (BD_VE(bdes,1) - BD_VS(bdes,1)) + 1
end