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
|