summaryrefslogtreecommitdiff
path: root/info/digests/tex-implementors/message.05
blob: cd0acb0f4025d04109d31095c44b79f1bfec2d7d (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
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
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441

Subject: correction to TeX 2.92; Metafont 1.4

Date:	  30 May 88				Message No:	005

To:	  TeX implementors and distributors

From:	  Barbara Beeton

Subject:  small error in TeX 2.92; Metafont 1.4


An error was present in the listing of differences between TeX.WEB 2.92
and 2.9 as reported in message 4.  The same error was present in the
TeX.WEB file at SCORE, but has now been fixed.

If you are working from the difference list provided in message 4, the
following lines should be ignored:

**** FILE TX:<TEX82.NEW>TEX-2-92.WEB.1, 31-621 (464580)
@d check_byte_range(#)==begin if (#<bc)or<(#>ec) then abort@+end
@d current_character_being_worked_on==k+bc-fmem_ptr
**** FILE TX:<TEX82.NEW>TEX-2-9.WEB.1, 31-621 (464024)
@d check_byte_range(#)==begin if (#<bc)or(#>ec) then abort@+end
@d current_character_being_worked_on==k+bc-fmem_ptr
***************

Thanks to Nelson Beebe and Ken Yap for spotting this.


The rest of this message will consist of the additions to MF84.BUG, a
comparison of the MF.WEB files for version 1.4 and 1.3, and changes to
the errata list since 23 Dec 87.

########################################################################

Additions to MF84.BUG

540. Typo suppresses an error detection (Chris Thompson, 2May88)
@x module 963
 if txy mod unity=0 then if tyy mod unity=0 then
@y
 if txx mod unity=0 then if tyy mod unity=0 then
@z

541. get_x_token can lose a scanned declared variable (Chris Thompson, 4May88)
@x module 1011
if equiv(x)=null then new_root(x);
@y
@z
@x module 1011
done:scan_declared_variable:=h;
@y
done: if eq_type(x)<>tag_token then clear_symbol(x,false);
if equiv(x)=null then new_root(x);
scan_declared_variable:=h;
@z

542. (I sincerely hope that there won't be any more)


########################################################################

Differences between MF.WEB for 1.4 and for 1.3

;COMPARISON OF PS:<1SCRATCH>MF.WEB.1 AND PS:<TEX.MF>MF.WEB.1
;OPTIONS ARE    /E /3

**** FILE PS:<1SCRATCH>MF.WEB.1, 1-15 (870)
% Version 1.4 corrected scan_declared_variable timing (May 1988).
% A few "harmless" optimizations have been made since then.

% A reward of $20.48 will be paid to the first finder of any remaining bug.
% (This amount will double again in 1989.)

% Although considerable effort has been expended to make the METAFONT program
**** FILE PS:<TEX.MF>MF.WEB.1, 1-15 (870)
% A few "harmless" optimizations have been made since then.

% A reward of $10.24 will be paid to the first finder of any remaining bug.
% (This amount will double again in 1988.)

% Although considerable effort has been expended to make the METAFONT program
***************

**** FILE PS:<1SCRATCH>MF.WEB.1, 2-81 (7574)
@d banner=='This is METAFONT, Version 1.4' {printed when \MF\ starts}

@ Different \PASCAL s have slightly different conventions, and the present
**** FILE PS:<TEX.MF>MF.WEB.1, 1-146 (7508)
@d banner=='This is METAFONT, Version 1.3' {printed when \MF\ starts}

@ Different \PASCAL s have slightly different conventions, and the present
***************

**** FILE PS:<1SCRATCH>MF.WEB.1, 43-1162 (768090)
 if txx mod unity=0 then if tyy mod unity=0 then
  @<Scale the edges, shift them, and |return|@>;
**** FILE PS:<TEX.MF>MF.WEB.1, 1-18695 (768065)
 if txy mod unity=0 then if tyy mod unity=0 then
  @<Scale the edges, shift them, and |return|@>;
***************

**** FILE PS:<1SCRATCH>MF.WEB.1, 44-399 (798211)
h:=get_avail; info(h):=x; t:=h;@/
**** FILE PS:<TEX.MF>MF.WEB.1, 1-19495 (798187)
if equiv(x)=null then new_root(x);
h:=get_avail; info(h):=x; t:=h;@/
***************

**** FILE PS:<1SCRATCH>MF.WEB.1, 44-407 (798526)
done: if eq_type(x)<>tag_token then clear_symbol(x,false);
if equiv(x)=null then new_root(x);
scan_declared_variable:=h;
end;
**** FILE PS:<TEX.MF>MF.WEB.1, 1-19504 (798538)
done:scan_declared_variable:=h;
end;
***************


########################################################################

Extracts from ERRATA.TeX (differences as compared with previous version)

;COMPARISON OF TX:<TEX82.NEW>ERRATA.TEX.2 AND TX:<TEX82.DOC>ERRATA.TEX.3
;OPTIONS ARE    /3

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 2-3 (1510)
\bugonpage A159, line 22 (2/15/88)

\ninepoint\noindent
`|\nolimits|' if the normal |\displaylimits|
convention has been overridden; a Rad\cutpar

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 2-2 (1508)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 2-15 (1845)
\bugonpage A326, line 12 (12/12/87)

\ninepoint\noindent
its natural width. The |\hbox| version also invokes |\everymath|.

\bugonpage A359, lines 35--38 (5/24/88)

\ninepoint\noindent
|\def\updownarrow{\delimiter"326C33F } \def\arrowvert{\delimiter"033C000 }|%
 \par\noindent
|\def\Updownarrow{\delimiter"326D377 } \def\Arrowvert{\delimiter"033D000 }  |%
 \par\noindent
|\def\vert{\delimiter"026A30C }        \def\Vert{\delimiter"026B30D }     |%
 \par\noindent
|\def\backslash{\delimiter"026E30F }   \def\bracevert{\delimiter"033E000 }|

\bugonpage A364, line 35 (5/24/88)

\ninepoint\noindent
|\def\fmtname{plain}\def\fmtversion{2.92} % identifies the current format|

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 2-8 (1690)
\bugonpage A326, line 12 (9/20/87)

\ninepoint\noindent
its natural width. The |\hbox| version also invokes |\everymath|.

***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 2-59 (3566)
\bugonpage A458, left column, line 19 (2/15/88)

\eightpoint\indent
|\|\| ( $\Vert$ ), {\it146--147}, {\it171}, $\underline{361}$, 435, 438.

\bugonpage A462, left column, line 7 (10/9/87)
\eightpoint\indent\qquad 152, 178, $\underline{360}$.

\bugonpage A463, left column (4/17/88)

\eightpoint\indent
\hbox to0pt{\hss\lower1pt\hbox{*}}|\day|, 273, 349, {\it406}.

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 2-36 (2846)
\bugonpage A462, left column, line 7 (10/9/87)

\eightpoint\indent\qquad 152, 178, $\underline{360}$.

***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 2-81 (4195)
\bugonpage A480, right column (2/15/88)

\eightpoint\indent|\vdots| ( $\vdots$ ), {\it177}, $\underline{359}$.

\bugonpage A481, right column (7/3/87)

\eightpoint|\z@|, $\underline{347}$, 348.\par

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 2-48 (3201)
\bugonpage A481, right column (7/3/87)

|\z@|, $\underline{347}$, 348.\par

***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-6 (4592)
\bugonpage B2, line 32 (4/30/88)

\ninepoint\noindent\hskip10pt
{\bf define} $\\{banner}\equiv\hbox{\tt\char'23}$%
{\tt This\]is\]TeX,\]Version\]2.92\char'23}\quad

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-6 (3471)
\bugonpage B2, line 32 (12/23/87)

\ninepoint\noindent\hskip10pt
{\bf define} $\\{banner}\equiv\hbox{\tt\char'23}$%
{\tt This\]is\]TeX,\]Version\]2.9\char'23}\quad

***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-19 (4943)
\bugonpage B108, new line after line 8 (5/24/88)

\ninepoint\noindent\kern20pt
$d$: \\{integer};\quad
$\{\,$number of characters in incomplete current string$\,\}$

\bugonage B108, lines 31--33 (5/24/88)

\ninepoint\noindent\kern10pt
$\\{str\_room}(l)$; $d\gets\\{cur\_length};\par\noindent\kern10pt
{\bf while} $\\{pool\_ptr}>\\{str\_start}[\\{str\_ptr}]$ {\bf do}
 \par\noindent\kern20pt
{\bf begin} \\{decr}(\\{pool\_ptr});
 $\\{str\_pool}[\\{pool\_ptr}+l]\gets\\{str\_pool}[\\{pool\_ptr}]$;
 \par\noindent\kern20pt
{\bf end};\quad$\{\,$move current string up to make room for another$\,\}$
\par\noindent\kern10pt
{\bf for} $k\gets j$ {\bf to} $j+l-1$ {\bf do} $\\{append\_char}(\\{buffer}[k])$;
\par\noindent\kern10pt
$\\{text}(p)\gets\\{make\_string}$; $\\{pool\_ptr}\gets\\{pool\_ptr}+d$;

\bugonpage B115, line 12 (4/28/88)

\ninepoint\noindent\hskip10pt
$\\{group\_code}=0\to\\{max\_group\_code}$;\quad
 $\{\,$\\{save\_level} for a level boundary$\,\}$

\bugonpage B141, line 19 (4/28/88)

\ninepoint\noindent
\\{par\_token}: \\{halfword};\quad
 $\{\,$token representing `|\par|'$\,\}$

\bugonpage B150, line 24 (4/28/88)

\tenpoint\noindent{\bf 358.\quad}%
The present point in the program is reached only when the \\{expand}
routine has inserted\cutpar

\bugonpage B151, mini-index (4/28/88)

\eightpoint\noindent
Delete the entry for `\\{no\_expand}'; replace it by:
\indent\\{expand}: {\bf procedure}, \S366.

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-19 (3822)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-91 (7266)
\indent\\{eq\_define}: {\bf procedure}, \S227.\par
$\\{relax}=0$, \S207.\par

\bugonpage B162, lines 12--14 (4/30/88)

\ninepoint\noindent\hskip10pt
{\bf repeat} $\\{link}(\\{temp\_head})\gets\\{null}$;\par\noindent\hskip20pt
{\bf if\/} $(\\{info}(r)>\\{match\_token}+127)\lor
 (\\{info}(r)<\\{match\_token})$ {\bf then}
 $s\gets\\{null}$\par\noindent\hskip20pt
{\bf else begin} $\\{match\_chr}\gets\\{info}(r)-\\{match\_token}$; \
 $s\gets\\{link}(r)$; \ $r\gets s$; \ $p\gets\\{temp\_head}$; \
 $m\gets 0$;

\bugonpage B181, line 31 (4/28/88)

\ninepoint\noindent
[Change `$x$ units per sp' to `$x$ sp per unit'! This change also
should be made on line~1 of page B183 and line $-8$ of page B590.]

\bugonpage B224, second-last line (4/28/87)

\ninepoint\noindent
\\{done}: {\bf if} \\{file\_opened} {\bf then} \\{b\_close}(\\{tfm\_file});\par
\noindent\hskip10pt $\\{read\_font\_info}\gets g$;

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-44 (4674)
\\{eq\_define}: {\bf procedure}, \S227.\par
$\\{relax}=0$, \S207.\par
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-204 (11136)
\bugonpage B285, line 21 (4/28/88)

\noindent\tenpoint
is subsidiary to the \\{nucleus} field of some noad; the dot is replaced by
`|_|' or `|^|' or `|/|' or `|\|' if $p$ is\cutpar

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-134 (7695)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-232 (12036)
\bugonpage B387, line 2 (5/24/88)

\tenpoint\noindent
is quite short. In the following code we set \\{hc}$[\\{hn}+2]$ to the
impossible value 128, in order to\cutpar

\bugonpage B387, line 8 (5/24/88)

\ninepoint\noindent\kern10pt
$\\{hc}[0]\gets127$; $\\{hc}[\\{hn}+1]\gets127$;
 $\\{hc}[\\{hn}+2]\gets128$;\quad$\{\,$insert delimiters$\,\}$

\bugonpage B390, lines 17--18 (5/24/88)

\ninepoint\noindent\kern10pt
$\langle\,$Enter as many hyphenation exceptions as are listed, until coming
 to a right brace; then {\bf return\eightrm\kern.5em961}$\,\rangle$;
\smallskip[The same change applies to lines 20--21, and
to page~582.]

\bugonpage B396, new line after line 34 (5/24/88)

\ninepoint\noindent\kern10pt
$\\{trie\_link}(\\{trie\_size})\gets0$;
$\\{trie\_back}(0)\gets\\{trie\_size}$;\quad
$\{\,$wrap around$\,\}$

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-156 (8407)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-266 (13062)
\bugonpage B397, lines 15--17 (5/24/88)

\ninepoint\noindent\kern10pt
{\bf begin} $c\gets\\{trie\_c}[p]$;\par\noindent\kern10pt
{\bf if} $c<\\{trie\_min}$ {\bf then} $\\{trie\_min}\gets c$;\par\noindent\kern10pt
{\bf if} $\\{trie\_min}=0$ {\bf then} $z\gets\\{trie\_link}(\\{trie\_size})$\par
\noindent\kern10pt
{\bf else} $z\gets\\{trie\_link}(\\{trie\_min}-1)$;\quad
$\{\,$get the first conceivably good hole$\,\}$

\bugonpage B400, lines 3--4 (5/24/88)

\ninepoint\noindent
$\langle\,$Enter all of the patterns into a linked trie, until coming
 to a right brace{\eightrm\kern.5em961}$\,\rangle\equiv$
\smallskip[The same change applies to page B399, lines 29--30, and
to page~582.]

\bugonpage B402, line 10 (5/24/88)

\ninepoint\noindent\kern10pt
$r\gets\\{trie\_size}$;\quad
$\{\,$finally, we will zero out the holes$\,\}$

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-162 (8584)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-310 (14406)
\bugonpage B552, left column (4/28/88)

\eightpoint[Insert `358' into \\{expand}.]

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-181 (9073)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-320 (14633)
\eightpoint[Delete the entry for \\{low\_mem\_max}.]

\bugonpage B562, left column (4/28/88)

\eightpoint[Remove `358' from \\{no\_expand}.]

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 3-187 (9212)
[Delete the entry for \\{low\_mem\_max}.]

***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 3-335 (15000)
\bugonpage B568, left column (4/28/88)

\eightpoint[Move `269' from \\{save\_index} to \\{save\_level}.]

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 4-1 (9477)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 4-15 (15448)
\bugonpage C164, line 10 (4/27/88)

\ninepoint\indent
\quad $y_{\$c}=\\{top}\,y_{\$l}$; \ $y_{\$d}=y_{\$r}$; \
 $x_{\$c}=x_{\$l}-\\{left\_jut}$; \ $x_{\$d}=x_{\$r}+\\{right\_jut}$;

\bugonpage C175, line 23 (1/11/88)

\ninepoint\noindent
expand into a sequence of tokens. \
(The language {\eightrm{SIMULA67}} demonstrated that it is\cutpar

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 4-15 (9816)
***************

**** FILE TX:<TEX82.NEW>ERRATA.TEX.2, 4-33 (15982)
\bugonpage C337, line 11 (4/28/88)

\ninepoint
An online ``menu'' of the available test routines will be typed at your
terminal\cutpar

\bugonpage C356, left column (1/11/88)

\eightpoint
SIMULA67 language, 175.

\bugonpage C358, right column (2/15/88)

\eightpoint\indent\hbox to0pt{\hss\lower1pt\hbox{*}}%
|yoffset|, 212, $\underline{220}$, 315, 324.

**** FILE TX:<TEX82.DOC>ERRATA.TEX.3, 5-1 (9998)
***************


########################################################################

[ end of message 005 ]
-------