blob: b595793cea8fb2462917464f98165531721cd57e (
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 <gio.h>
# GGETR -- Get the real value of an device parameter from the graphcap entry
# for the device. Zero is returned if the device does not have the
# named parameter.
real procedure ggetr (gp, cap)
pointer gp # graphics descriptor
char cap[ARB] # name of device capability
real ttygetr()
begin
return (ttygetr (GP_TTY(gp), cap))
end
|