aboutsummaryrefslogtreecommitdiff
path: root/sys/gio/gim/gimenmap.x
blob: 02e9af3b0c9b3c2eca0d963a2d4ccd6a011a38ec (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	<gescape.h>

# GIM_ENABLEMAPPING -- Enable a previously defined mapping.  Enabling a 
# mapping does not automatically refresh the destination unless the refresh
# flag is set (refresh=YES).

procedure gim_enablemapping (gp, mapping, refresh)

pointer	gp			#I graphics descriptor
int	mapping			#I mapping to be defined or edited
int	refresh			#I refresh flag

short	gim[GIM_ENABLEMAPPING_LEN]

begin
	gim[GIM_ENABLEMAPPING_MP] = mapping
	gim[GIM_ENABLEMAPPING_FL] = refresh
	call gescape (gp, GIM_ENABLEMAPPING, gim, GIM_ENABLEMAPPING_LEN)
end