blob: 2c4a5d28696d9b2a0031b1357fdb6ccd92b135a1 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <gescape.h>
# GIM_INITMAPPINGS -- Initialize the Gterm widget raster mappings.
procedure gim_initmappings (gp)
pointer gp #I graphics descriptor
begin
call gescape (gp, GIM_INITMAPPINGS, 0, GIM_INITMAPPINGS_LEN)
end
|
