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

include	"clpset.h"

# CLGPSETI -- Get the int value of a pset parameter.

int procedure clgpseti (pp, parname)

pointer	pp			# pset descriptor
char	parname[ARB]		# parameter name

pointer	clpset_parname()
int	clgeti()

begin
	return (clgeti (PARNAME(pp,parname)))
end