4 Nov
2026
4 Nov
'26
12:03 p.m.
(* --- Toolbox of file system *) PROCEDURE *List(name: ARRAY OF CHAR; time, date, size: LONGINT; VAR cont: BOOLEAN); BEGIN INC(count); IF size # MIN(LONGINT) THEN (* changed lines start *) Texts.WriteDate(W, time, date);Texts.WriteString(W, 9X); Texts.WriteInt(W, size, 6); Texts.WriteString(W, 9X); INC(total, size) END; Texts.WriteString(W, name); (* changed lines end *) Texts.WriteLn(W) END List; re: Texts.WriteInt(W, size, 6) The integer value used has been "5" but with Kernel.Mod being over 100K this value must be increased to "6" decimal places to accomodate the larger kernel source code file size integer.
8
Age (days ago)
8
Last active (days ago)
0 comments
1 participants
participants (1)
-
None