aboutsummaryrefslogtreecommitdiff
path: root/pkg/utilities/nttools/stxtools/od/odsetn.x
blob: 3abf97f74c34eca657e0c074e71bc72176d4b3b0 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
include <imhdr.h>
include "od.h"

#---------------------------------------------------------------------------
.help od_set_len Jun93 source
.ih
NAME
od_set_len -- Set the length of data.
.ih
DESCRIPTION
This sets how much data is read/written from the OD file.  For images,
the dimensionality is changed.	For tables, it just changes how much
is read/written; nothing is physically changed about the table.
.endhelp
#---------------------------------------------------------------------------
procedure od_set_len (od, len)

pointer	od			# I: OD descriptor.
int	len			# I: New length.

begin
	OD_LEN(od) = len
	if (OD_TYPE(od) == OD_IMAGE) {
	    IM_LEN(OD_FD(od),1) = len
	}
end
#---------------------------------------------------------------------------
# End of od_set_len
#---------------------------------------------------------------------------