HP3000-L Archives

May 1998, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Stan Sieler <[log in to unmask]>
Reply To:
Stan Sieler <[log in to unmask]>
Date:
Tue, 19 May 1998 18:44:15 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (33 lines)
Paul asks:
>
> I thought that I had read somewhere that a native mode version of the
> 'calendar' intrinsic, HPCALENDAR, that returned a 32 bit integer had been
> made available by HP.  Is it true or just wishful thinking on my part?.

:cseq hpcalendar
CSEQ [2.2] - LPS Toolbox [A.02b]            (c) 1995 Lund Performance Solutions

Function HPCALENDAR := int32 : int32     {R28}
   {Returns 32-bit CALENDAR format:                                    }
   {upper 23 bits = #years since 1970                                  }
   {bottom 9 bits = day-of-year                                        }



If you run CSEQ on an MPE/iX release prior to 5.5 PP4, you get:

:cseq hpcalendar
CSEQ [2.2] - LPS Toolbox [A.02b]            (c) 1995 Lund Performance Solutions

HPCALENDAR is not in intrinsic file, but is in CSEQ.DATA:

HPCALENDAR { In MPE/iX 5.5 PowerPatch 4 }
   := int32
   ! Returns 32-bit CALENDAR format:
   ! upper 23 bits = #years since 1970
   ! bottom 9 bits = day-of-year

--
Stan Sieler                                          [log in to unmask]
                                     http://www.allegro.com/sieler.html

ATOM RSS1 RSS2