aboutsummaryrefslogtreecommitdiff
path: root/noao/digiphot/photcal/mctable/mctmaxrow.x
blob: 25d21067a385eebb16c5be874fa12f1c0eaef8e9 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
include	"../lib/mctable.h"


# MCT_MAXROW - Return the maximum number of rows of the table.

int procedure mct_maxrow (table)

pointer	table			# table descriptor

begin
	# Check pointer and magic number.
	if (table == NULL)
	    call error (0, "mct_mxrow: Null table pointer")
	if (MCT_MAGIC (table) != MAGIC)
	    call error (0, "mct_mxrow: Bad magic number")

	# Return max number of rows.
	return (MCT_MAXROW (table))
end