[Info-vax] Meditech in the news

[Bob Eager]

On Sun, 09 Jan 2022 19:58:48 -0500, Arne Vajhøj wrote:

> On 1/9/2022 5:32 AM, Bob Eager wrote:
>> On Sat, 08 Jan 2022 13:30:48 -0800, plugh wrote:
>>> On Saturday, January 8, 2022 at 2:23:11 PM UTC-7, Bob Eager wrote:
>>>> On Sat, 08 Jan 2022 12:18:22 -0800, plugh wrote:
>>>>
>>>>> Very true. I should've been clearer when referencing CAM. I'd like
>>>>> to call out stem-and-list CAM as opposed to hashing &c. The
>>>>> difference is storage organization around paths, not nodes. That's
>>>>> why I namechecked REXX. I'm quite sure perl could do that as well.
>>>> I use REXX quite a bit, and I use that facility a lot too.
>>>
>>> Did it ever get to VMS? It would've been a nice replacement for DCL.
>> 
>> There is a version of Regina which is reputed to work; Test on 6.1 and
>> 6.2, with some minor limitations.
> 
> Latest (regina394.zip)
> 
> update descrip.mms:
> 
> /DEFINE=(VMS,HAVE_DIV,HAVE_ARPA_INET_H)
> ->
> /
DEFINE=(VMS,HAVE_DIV,HAVE_ARPA_INET_H,REGINA_VERSION_MAJOR="""3""",REGINA_VERSION_MINOR="""9""",REGINA_VERSION_SUPP="""""",REGINA_VERSION_RELEASE="""4""",REGINA_BITS="""64""",REGINA_VERSION_DATE="""-""")
> 
> 
OBJ9=vmsfuncs.obj,vmscmd.obj,variable.obj,wrappers.obj,yaccsrc.obj,alloca.obj,arxfuncs.obj
> ->
> 
OBJ9=vmsfuncs.obj,vmscmd.obj,variable.obj,wrappers.obj,yaccsrc.obj,alloca.obj,arxfuncs.obj,mygetopt.obj,os_other.obj
> 
> mygetopt.obj :  mygetopt.c
>          @ write sys$output ""
>          @ write sys$output "Compiling $(MMS$SOURCE) "
>          $(CC) $(CFLAGS) $(MMS$SOURCE)
>          @ write sys$output "Done (compiling)."
> os_other.obj :  os_other.c
>          @ write sys$output ""
>          @ write sys$output "Compiling $(MMS$SOURCE) "
>          $(CC) $(CFLAGS) $(MMS$SOURCE)
>          @ write sys$output "Done (compiling)."
> 
> update vmsfuncs.c:
> 
> str_digitize( TSD, temp, 0, 1 , "", 0)
> ->
> str_digitize( TSD, temp, 0, 1 )
> 
> update os_other.c:
> 
> #if defined(MAC) || defined(GO32) || defined (__EMX__) ||
> (defined(__WATCOMC__) && !defined(__QNX__)) || defined(_MSC_VER) ||
> defined(DJGPP) || defined(__CYGWIN32__) || defined(__BORLANDC__) ||
> defined(__MINGW32__) || defined(__WINS__) || defined(__EPOC32__)
> ||defined(__LCC__)
> ->
> #if defined(MAC) || defined(GO32) || defined (__EMX__) ||
> (defined(__WATCOMC__) && !defined(__QNX__)) || defined(_MSC_VER) ||
> defined(DJGPP) || defined(__CYGWIN32__) || defined(__BORLANDC__) ||
> defined(__MINGW32__) || defined(__WINS__) || defined(__EPOC32__)
> ||defined(__LCC__) || defined(VMS)
> 
> # elif defined(VMS)
> #  define ISTR_SLASH "/"
> #  define I_SLASH '/'
> 
> # if !defined(MAC) && !defined(__WINS__) && !defined(__EPOC32__) &&
> !defined(__CYGWIN__)
> ->
> # if !defined(MAC) && !defined(__WINS__) && !defined(__EPOC32__) &&
> !defined(__CYGWIN__) && !defined(VMS)
> 
> And I get a REXX.EXE.
> 
> Unfortunately I cannot test it because I don't know REXX.

Easy test. Feed it:

  say 'Hello, world'




-- 
My posts are my copyright and if @diy_forums or Home Owners' Hub 
wish to copy them they can pay me £1 a message.
Use the BIG mirror service in the UK: http://www.mirrorservice.org
*lightning surge protection* - a w_tom conductor