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
34
35
36
37
38
|
# CCP common. A common is necessary since there is no graphics descriptor
# in the argument list of the kernel procedures. The kernel data structures
# are designed along the lines of FIO: a small common is used to hold the time
# critical data elements, and an auxiliary dynamically allocated descriptor is
# used for everything else.
pointer g_cc # kernel graphics descriptor
pointer g_tty # graphcap descriptor
int g_nframes # number of frames written
int g_maxframes # max frames per device metafile
int g_ndraw # no draw instr. in current frame
int g_in # input file
real g_xres # x resolution of plotter
real g_yres # y resolution of plotter
real g_max_x # maximum x drawn, in plotter units
real g_xndcto_p # x(pltr) = GKI*g_xndcto_p; final scale
real g_yndcto_p # y(pltr) = GKI*g_yndcto_p; final scale
real g_xtask_scale # x scale determined from task params
real g_ytask_scale # y scale determined from task params
real g_xdefault_scale # x scale from graphcap or compile-time
real g_ydefault_scale # y scale from graphcap or compile-time
int g_ltype # line type
real g_dashlen # length of dash in dashed line, p_units
real g_gaplen # width of gap in dash/dot line, p_units
real g_plwsep # polyline width separation for ntracing
int g_txquality # text quality parameter
bool g_ltover # user override of line-type generator
bool g_lwover # user override of line width simulation
bool g_lcover # user override of line color generator
char g_lwtype # line width mode parameter
char g_device[SZ_GDEVICE] # force output to named device
common /ccpcom/ g_cc, g_tty, g_nframes, g_maxframes, g_ndraw,
g_in, g_xres, g_yres, g_max_x, g_xndcto_p, g_yndcto_p,
g_xtask_scale, g_ytask_scale,
g_xdefault_scale, g_ydefault_scale,
g_ltype, g_dashlen, g_gaplen, g_plwsep, g_txquality,
g_ltover, g_lwover, g_lcover, g_lwtype, g_device
|
