When does sys$starlet_c.tlb get updated?

[abrsvc]

SOrry to be confusing. What I was asking for was the first page of each of the 2 RTLs. The one with the updated code and the "original". The information in the header might give us a clue about what/when it was updated.

Dan

[OwensJ]

Here are the comparisons of the top of the ots$routines file inside of sys$starlet_c.tlb

From Version 8.3 installed:
/********************************************************************************************************************************/
/* Created: 24-Sep-2008 12:41:42 by OpenVMS SDL EV3-2-1 */
/* Source: 24-SEP-2008 12:41:39 $1$DGA68:[STARLET_H.SRC]OTS$ROUTINES.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE ots$routines ***/
#ifndef __OTS_ROUTINES_LOADED
#define __OTS_ROUTINES_LOADED 1

#pragma __nostandard /* This file uses non-ANSI-Standard features */
#pragma __member_alignment __save
#pragma __nomember_alignment
#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */
#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */
#endif

#ifdef __cplusplus
extern "C" {
#define __unknown_params ...
#define __optional_params ...
#else
#define __unknown_params
#define __optional_params ...
#endif

#ifndef __struct
#if !defined(__VAXC)
#define __struct struct
#else
#define __struct variant_struct
#endif
#endif

#ifndef __union
#if !defined(__VAXC)
#define __union union
#else
#define __union variant_union
#endif
#endif

/**************************************************************************** */
/* * */
/* COPYRIGHT (c) 1988 BY * */
/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */
/* ALL RIGHTS RESERVED. * */
/* * */
/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */
/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */
/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */
/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */
/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */
/* TRANSFERRED. * */
/* * */
/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */
/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */
/* CORPORATION. * */
/* * */
/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */
/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * */
/* * */
/* * */
/**************************************************************************** */
/* */
/* 23-Feb-2006 JML PTR 75-109-96 Add missing headers for IEEE forms of */
/* various routines. */
/* */
/* As of 23-Feb-2006 SDL has no types to describe IEEE floating */
/* data. Since the actual type is only material with respect */
/* to size of the argument (single vs double precision) we use */
/* F-Floating to represent IEEE S-Floating and D-Floating to */
/* represent IEEE T-Floating. */
/* */
/* In the course of fixing this PTR it was discovered that */
/* number of header definitions have been commented out for */
/* years. Attempts to determine why they are commented out */
/* proved futile. Rather than risk enabling them and possibly */
/* introducing a collision between the system supplied headers */
/* and private headers users may have developed to work around */
/* the lack of them, they shall remain commented out. */
/* However, their new IEEE forms will be enabled as these */
/* routines only came into existence recently. */
/* (see DPML$SHR.OPT checkin of 24-Mar-2004). */
/* */
/* OTS$CVT_T_D */
/* */
/* Convert Numeric Text to D- or F-Floating Value */
/* */
/* The Convert Numeric Text to D- or F-Floating routines */
/* convert an ASCII text string representation of a */
/* numeric value to a D_floating or F_floating value. */
/* */

[OwensJ]

And from whatever updated version we have that we are trying to locate:
/********************************************************************************************************************************/
/* Created: 24-Sep-2008 12:41:42 by OpenVMS SDL EV3-2-1 */
/* Source: 24-SEP-2008 12:41:39 $1$DGA68:[STARLET_H.SRC]OTS$ROUTINES.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE ots$routines ***/
#ifndef __OTS_ROUTINES_LOADED
#define __OTS_ROUTINES_LOADED 1

#pragma __nostandard /* This file uses non-ANSI-Standard features */
#pragma __member_alignment __save
#pragma __nomember_alignment
#ifdef __INITIAL_POINTER_SIZE /* Defined whenever ptr size pragmas supported */
#pragma __required_pointer_size __save /* Save the previously-defined required ptr size */
#pragma __required_pointer_size __short /* And set ptr size default to 32-bit pointers */
#endif

#ifdef __cplusplus
extern "C" {
#define __unknown_params ...
#define __optional_params ...
#else
#define __unknown_params
#define __optional_params ...
#endif

#ifndef __struct
#if !defined(__VAXC)
#define __struct struct
#else
#define __struct variant_struct
#endif
#endif

#ifndef __union
#if !defined(__VAXC)
#define __union union
#else
#define __union variant_union
#endif
#endif

/**************************************************************************** */
/* * */
/* COPYRIGHT (c) 1988 BY * */
/* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * */
/* ALL RIGHTS RESERVED. * */
/* * */
/* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * */
/* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * */
/* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * */
/* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * */
/* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * */
/* TRANSFERRED. * */
/* * */
/* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * */
/* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * */
/* CORPORATION. * */
/* * */
/* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * */
/* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * */
/* * */
/* * */
/**************************************************************************** */
/* */
/* 20-Mar-2007 JML QXCM1000393572 Headers returning complex results */
/* can't be compiled by BASIC. */
/* */
/* Well clearly the routines returning complex results */
/* by value (requiring 2 registers) need header generation to */
/* be limited to only those languages KNOWN to be able */
/* to support it and likely to call them. */
/* */
/* */
/* 14-Dec-2006 JML QXCM1000384200 Headers returning complex results */
/* can't be compiled by C/C++ */
/* */
/* Now I understand why a number of headers have been commented */
/* out. When I added all the new IEEE forms, even for those */
/* VAX forms commented out, I didn't realize that C/C++ cannot */
/* return more than 64bits by value. Five of the existing IEEE */
/* routines return complex results by value and those require */
/* 2 registers. This resulted in a .h file for C/C++ that */
/* would not compile. The fix is to use iflanguage and */
/* prevent those headers from being generated for C/C++. These */
/* routines most likely will be called by Fortran anyway. */
/* */
/* 23-Feb-2006 JML PTR 75-109-96 Add missing headers for IEEE forms of */
/* various routines. */
/* */
/* As of 23-Feb-2006 SDL has no types to describe IEEE floating */
/* data. Since the actual type is only material with respect */
/* to size of the argument (single vs double precision) we use */
/* F-Floating to represent IEEE S-Floating and D-Floating to */
/* represent IEEE T-Floating. */
/* */
/* In the course of fixing this PTR it was discovered that */
/* number of header definitions have been commented out for */
/* years. Attempts to determine why they are commented out */
/* proved futile. Rather than risk enabling them and possibly */
/* introducing a collision between the system supplied headers */
/* and private headers users may have developed to work around */
/* the lack of them, they shall remain commented out. */
/* However, their new IEEE forms will be enabled as these */
/* routines only came into existence recently. */
/* (see DPML$SHR.OPT checkin of 24-Mar-2004). */
/* */
/* OTS$CVT_T_D */
/* */
/* Convert Numeric Text to D- or F-Floating Value */
/* */
/* The Convert Numeric Text to D- or F-Floating routines */
/* convert an ASCII text string representation of a */
/* numeric value to a D_floating or F_floating value. */
/* */

[OwensJ]

Sorry... I only have the recent one on this machine so my copy and paste was bad.

The first two lines of the original were
/* Created: 29-Jun-2006 22:45:46 by OpenVMS SDL EV3-2-1 */
/* Source: 29-Jun-2006 22:45:42 $1$DGA2027:[STARLET_H.SRC]OTS$ROUTINES.SDI;1 */

I didnt mean for them to have identical beginnings.

[OwensJ]

Some additional information. The header from ots$routines.h that i used was from the sys-V0300 patch in VMS83I-1H1, where it does update sys$starlet_c.tlb and has the header with that 24-sep-2008 build date of ots$routines.h.

The file that we have on our old build machine has a header build date reading
/* Created: 11-Jul-2007 11:44:44 by OpenVMS SDL EV3-2-1 */
/* Source: 11-Jul-2007 11:44:40 $1$DGA91:[STARLET_H.SRC]OTS$ROUTINES.SDI;1 */

So I know that the version I need of this file had a build date of 11-Jul-2007. Though I have found patches to sys$starlet_c.tlb in 8.3-H1 and 8.4, I'm trying to see if this version is somewhere in 8.3.

[OwensJ]

Here is an update. To respond directly to my topic question, in OpenVMS V8.3, it doesn't get updated.

There are many patches in version 8.3 that update the .OLB file, but none that update the .TLB file.

There are patches in version 8.3-1H1 that update the .TLB file, such as VMS831H1I_SYS-V0300, but V8.3 won't run an 8.3-1H1 patch. You can however, extract just the .tlb file from the patch itself and use it. And also, upon extraction, extract components out of it. So we viewed the ots$routines.h file inside of the sys-v3.0 patch from 1H1, and it does in fact have the updates we were looking for.

You can also perform the updates yourself manually to the included version with V8.3. To fix our compilation issue, HP told us that we would need to comment out the following:


struct {float ots$divc$$ret_1_ [2];} ots$divcs(__unknown_params);
struct {double ots$divc$$ret_3_ [2];} ots$divct_r3(__unknown_params);
struct {float ots$mulc$$ret_5_ [2];} ots$mulcs(__unknown_params);
struct {double ots$mulc$$ret_7_ [2];} ots$mulct_r3(__unknown_params);
struct {float ots$powc$$ret_9_ [2];} ots$powcscs(__unknown_params);
struct {double ots$powc$$ret_11_ [2];} ots$powctct_r3(__unknown_params);
struct {float ots$powc$$ret_13_ [2];} ots$powcsj(__unknown_params);
struct {double ots$powc$$ret_15_ [2];} ots$powctj_r3(__unknown_params);

In order to fix the issues listed in the 14-DEC-2006 fix. (JML QXCM1000384200)

They did find references to this fix, however there are no existing patches for it in Version 8.3 of OpenVMS, which is why we couldn't find one. They said there were references to this fix in ACRTL-V0300 in V8.3, but that the patch is not available, and the fix is not referenced in ACRTL-V0400. So somehow the fix got lost in the process for version 8.3, though it is corrected in future versions of OpenVMS.

So, in short, if you have version 8.3 of OpenVMS, and you need to get sys$starlet_c.tlb updated, you have to obtain an updated file manually from another patch, or comment out the sections of the .h file inside of it yourself and put it back in.