-- simple FORTH-screenfile editor
Copyright (C) Tektronix, Inc. 1998 - 2000. All rights reserved.
description: This is a simple fullscreen FORTH block editor.
will be missing in most builds
EXTENSIONS
<<edit-init>>
( .. )( | ) ; |
; |
constructor primitive <<edit-init>>
an executable word (no special usage info)
or wrapper call around p4_edit_init
EXTENSIONS
EDIT-BLOCK
( blk -- )(
)
;
p4:"edit-block";
start the internal block-editor on the assigned block
EXTENSIONS
EDIT-TEXT
( .. )(
)
;
as:"edit-minus-text";
ordinary primitive EDIT-TEXT
an executable word (no special usage info)
or wrapper call around p4_edit_text
EXTENSIONS
EDIT-ERROR
( -- )(
)
;
p4:"edit-error";
if an error occured, this routine can be called to invoke an appropriate EDITOR (see also EDIT-BLOCK)
FORTH
EDIT-BLOCK-START
( .. )( | ) ; |
; |
ordinary primitive EDIT-BLOCK-START
an executable word (no special usage info)
or wrapper call around p4_edit_block