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
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
% bytecomp.sl -*- SLang -*-
%
% !! WARNING: It is not a good idea to invoke this file directly.
% Instead load it via preparse.sl. This may be performed
% in batch mode as:
%
% jed -batch -n -l preparse
%
%
!if (is_defined ("Preprocess_Only"))
{
variable Preprocess_Only = 0;
}
define jed_byte_compile_file (f)
{
variable file;
file = expand_jedlib_file(f);
if (strlen (file))
{
flush (strcat ("Processing ", file));
byte_compile_file (file, Preprocess_Only);
}
else flush (strcat (f, " not found"));
}
!if (is_defined ("__load__bytecomp__only__"))
{
$0 = _stkdepth ();
% list of file to byte compile:
#ifdef UNIX VMS
"mail.sl";
"iso-latin.sl";
"dispesc.sl";
#endif
#ifdef UNIX
"rmail.sl";
"sendmail.sl";
"mailalias.sl";
"mime.sl";
#endif
#ifdef MSDOS OS2
"dos437.sl"; "dos850.sl"; "brief.sl";
#endif
#ifdef XWINDOWS MOUSE
"mouse.sl";
#endif
#ifdef HAS_LINE_ATTR
"folding.sl";
#endif
if (is_defined ("KILL_ARRAY_SIZE"))
{
"yankpop.sl";
"register.sl";
}
"wmark.sl";
"occur.sl";
"javamode.sl";
"modehook.sl";
"nroff.sl";
"html.sl";
"idl.sl";
"shmode.sl";
"mousex.sl";
"abbrev.sl";
"abbrmisc.sl";
"dabbrev.sl";
"mutekeys.sl";
"bookmark.sl";
"replace.sl";
"srchmisc.sl";
"tex.sl";
"bibtex.sl";
"latex.sl";
"latex209.sl";
"ltx-math.sl";
"binary.sl";
"isearch.sl";
"rot13.sl";
"tabs.sl";
"untab.sl";
"jedhelp.sl";
"ctags.sl";
"compile.sl";
"menu.sl";
"dired.sl";
"util.sl";
"syntax.sl";
"tmisc.sl";
"cmisc.sl";
"misc.sl";
"help.sl";
"cal.sl";
"man.sl";
"fortran.sl";
"dcl.sl";
"shell.sl";
"most.sl";
"info.sl";
"ispell.sl";
"sort.sl";
"regexp.sl";
"wordstar.sl";
"buf.sl";
"emacsmsc.sl";
"cmode.sl";
"slmode.sl";
"search.sl";
"linux.sl";
"mini.sl";
"edt.sl";
"emacs.sl";
"site.sl";
$0 = _stkdepth () - $0;
loop ($0)
{
jed_byte_compile_file (());
}
if (BATCH) exit_jed();
};
|
