blob: 60f2cf2e11a370100197086cfc78a58455009465 (
plain)
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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
/* Configuration containing EVERYTHING */
/* At CWI, this implies stdwin, audio, Amoeba and the NASA Panel Library */
#define USE_AUDIO
#define USE_AMOEBA
#define USE_PANEL
static int use_stdwin;
/*ARGSUSED*/
void
initargs(p_argc, p_argv)
int *p_argc;
char ***p_argv;
{
extern char *getenv();
char *display;
/* Assume we have to initialize stdwin if either of the following
conditions holds:
- the environment variable $DISPLAY is set
- there is an argument "-display" somewhere
*/
display = getenv("DISPLAY");
if (display != 0)
use_stdwin = 1;
else {
int i;
/* Scan through the arguments looking for "-display" */
for (i = 1; i < *p_argc; i++) {
if (strcmp((*p_argv)[i], "-display") == 0) {
use_stdwin = 1;
break;
}
}
}
if (use_stdwin)
winitargs(p_argc, p_argv);
}
void
initcalls()
{
inittime();
initmath();
initposix();
#ifdef USE_AUDIO
initaudio();
#endif
#ifdef USE_AMOEBA
initamoeba();
#endif
initgl();
#ifdef USE_PANEL
initpanel();
#endif
if (use_stdwin)
initstdwin();
}
void
donecalls()
{
if (use_stdwin)
wdone();
#ifdef USE_AUDIO
asa_done();
#endif
}
#ifndef PYTHONPATH
#define PYTHONPATH ".:/usr/local/lib/python"
#endif
extern char *getenv();
char *
getpythonpath()
{
char *path = getenv("PYTHONPATH");
if (path == 0)
path = PYTHONPATH;
return path;
}
|