[Info-vax] Teco / TECOC (was: Re: Intel proposal to simplify x86-64)
Johnny Billquist
bqt at softjar.se
Wed Jun 7 20:59:57 EDT 2023
On 2023-06-08 02:10, Arne Vajhøj wrote:
> On 6/7/2023 5:38 AM, Johnny Billquist wrote:
>> On 2023-06-07 01:16, Arne Vajhøj wrote:
>>> On 6/6/2023 10:39 AM, Johnny Billquist wrote:
>>>> The VMS TECO was made into a callable editor unless my memory fails me.
>>>
>>> Only callable EDT and callable TPU are documented in the
>>> utility routines manual:
>>>
>>> https://docs.vmssoftware.com/vsi-openvms-utility-routines/
>>>
>>> Obviously "documented" and "exist" are different.
>>
>> It's documented in the TECO manual:
>>
>> https://www.livingcomputers.org/UI/UserDocs/OpenVMS-7-3/3_(Editor)_DEC_Standard_TECO.pdf
>>
>> Section G.17
>
> Oh. It is.
>
> (never looked in that manual)
>
> And it still works on VMS Alpha.
>
> $ type myteco.for
> program myteco
> integer*4 dot, z
> character*255 text
> call lib$get_foreign(fnm,,fnmlen)
> call teco$init()
> call teco$load_text('ABCDE')
> call teco$set_dot(1)
> call teco$delete_text(3)
> call teco$set_dot(0)
> call teco$pointers(dot, z)
> call teco$get_text(text)
> write(*,*) z, text(1:z)
> end
> $ for/tie myteco
> $ link/nonative myteco + sys$input/opt
> sys$library:tecoshr_tv/share
> $
> $ run myteco
> 2 AE
>
> (the code is not using TECO commands, but that is because
> I don't know TECO commands)
Oh! This is so much fun. Thanks for checking that one out. :-D
Next you need to figure out what your name does in TECO. ;-)
Johnny
More information about the Info-vax
mailing list