1
0
mirror of https://github.com/PDP-10/its.git synced 2026-02-23 15:52:10 +00:00

Fix Y2K problem in SCNV.

The RFDATE system call can now return years after 1999.  Truncate to
the last two digits.
This commit is contained in:
Lars Brinkhoff
2018-06-03 18:46:00 +02:00
parent 655d8b94c5
commit 97dd956012

View File

@@ -863,6 +863,8 @@ INFN1: PUSHJ P,INWD ;FILE PPN
MOVEI C,"-
PUSHJ P,DTXCHR
LDB A,[331000,,FILEDA]
IDIVI A,100.
MOVEI A,(B)
PUSHJ P,DTXP2
MOVEI C,40
PUSHJ P,DTXCHR