R02-01 SCRs are:

21518.0 - C library function time()returns incorrect date after 1999

21824.0 - CXR and LISTER display incorrect date after 31/12/1999


================================================================================
================================================================================


Software Problem:
----------------
The C library function time() will return an incorrect
value after 1999.

This will be evident when using functions such as
gmtime() and ctime() which use the time() value as input.



Software Resolution:
-------------------
Apply the following object patch to the LIBE.OBJ library.



Object Patch:
------------
*LOAD PATCH
*TASK PATCH
*START
>OBJECT LIBE.OBJ,LIBE.NEW,LIB
>LCASE ON
>GET time
>BIAS 0:P
>VERIFY 106,CAB0,FFBA
>VAR %V1
>VAR %V2
>EXPAND P,18
>RANGE 106,PATCH,%V1
>RANGE PATCH+E,10A,%V2
>MODIFY 106,4300,%V1
>MODIFY PATCH,C9B0,0046,2313,CAB0,0064,CAB0,FFBA,4300,%V2
>IDNO 21518,SCR
>SAVE COPY,TERM
>END
*
*REN LIBE.OBJ,LIBE.OLD
*REN LIBE.NEW,LIBE.OBJ



This patch can also be applied to RTLE.OBJ, replacing the
first line by

>OBJECT RTLE.OBJ,RTLE.NEW,LIB

                                        return to index
================================================================================


218240
Software Problem:
----------------
Two programs in the OS/32 C R02.01 package display the incorrect
date in their output listing after 31 December 1999.



Software Resolution:
-------------------
The following two image patches correct the date displayed in the
output listings created by the CXR task and LISTER task.  The CXR
task is an optional utility in the C R02-01 package used to create
a cross reference of ones C variables.  The LISTER task is an
optional utility in the C R02-01 package used to format a C program
listing.



Image Patch for LISTER.TSK:
--------------------------

*LOAD PATCH
*TASK PATCH
*START
>IMAGE LISTER.TSK,LISTER.NEW
>GET *T
>BIAS 0:P
>EXPAND P,18
>VERIFY 3846,CAB0,FFBA
>VAR %V1
>VAR %V2
>RANGE 3846,PATCH,%V1
>RANGE PATCH+E,384A,%V2
>MODIFY 3846,4300,%V1
>MODIFY PATCH,C9B0,0046,2313,CAB0,0064,CAB0,FFBA,4300,%V2
>IDNO 21824,SCR
>SAVE COPY,TERM
>END
*
*REN LISTER.TSK,LISTER.OLD
*REN LISTER.NEW,LISTER.TSK



Image Patch for CXR.TSK:
-----------------------

*LOAD PATCH
*TASK PATCH
*START
>IMAGE CXR.TSK,CXR.NEW
>GET *T
>BIAS 0:P
>VAR %PAT
>EXPAND P,24,%PAT
>VERIFY 3556,CAB0,FFBA,C88B,0002
>MODIFY 3556,4300,4011,%PAT
>MODIFY PATCH,C9B0,0046,2313,CAB0,0064,CAB0,FFBA
>MODIFY NEXT,C88B,0002,4300,4011,355E
>IDNO 21824,SCR
>SAVE COPY,TERM
>END
*
*REN CXR.TSK,CXR.OLD
*REN CXR.NEW,CXR.TSK

                                        return to index
================================================================================