github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-26 12:12:12 +00:00
Code Issues Releases Wiki Activity

Use 4-digit years in COMLAP; MAKLAP.

Browse Source
This commit is contained in:
Adam Sampson
2018-07-27 17:43:18 +01:00
committed by Adam Sampson
parent aadfbe890a
commit 9f9779c2b8
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/comlap/maklap.80 → src/comlap/maklap.81
View File

@@ -552,7 +552,7 @@
(PRINC '| |)
(PRINC (CADDR TEM))
(PRINC '|, |)
(PRINC (+ 1900. (CAR TEM)))
(PRINC (CAR TEM))
(COND ((SETQ TEM (STATUS DAYTIME))
(PRINC '|, AT |)
(SETQ II (CAR TEM))