aboutsummaryrefslogtreecommitdiff
path: root/sys/gio/gim/gimdsmap.x
blob: a16184130a7afe00cf1fa94df7a668457ead9ba5 (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_DISABLEMAPPING -- Disable a previously defined mapping.  Disabling a
# mapping does not automatically erase the mapping unless the erase flag
# is set.

procedure gim_disablemapping (gp, mapping, erase)

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

short	gim[GIM_DISABLEMAPPING_LEN]

begin
	gim[GIM_DISABLEMAPPING_MP] = mapping
	gim[GIM_DISABLEMAPPING_FL] = erase
	call gescape (gp, GIM_DISABLEMAPPING, gim, GIM_DISABLEMAPPING_LEN)
end