[Info-vax] Teco / TECOC (was: Re: Intel proposal to simplify x86-64)
Arne Vajhøj
arne at vajhoej.dk
Wed Jun 7 20:10:18 EDT 2023
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)
Arne
More information about the Info-vax
mailing list