1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <mach.h>
include <imset.h>
include <fset.h>
# DSMAP -- Map the display, i.e., open the display device as an imagefile.
pointer procedure dsmap (frame, mode, color, chan)
int frame
int mode
int color
int chan[ARB]
pointer ds
char device[SZ_FNAME]
int imstati(), fstati(), envgets(), imdopen()
extern imdopen()
pointer imdmap()
errchk imdmap
begin
if (envgets ("stdimage", device, SZ_FNAME) == 0)
call error (1, "variable `stdimage' not defined in environment")
ds = imdmap (device, mode, imdopen)
chan[1] = fstati (imstati (ds, IM_PIXFD), F_CHANNEL)
chan[2] = color
return (ds)
end
|
