diff options
| author | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2025-05-24 16:24:49 +0300 |
|---|---|---|
| committer | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2025-05-24 17:22:52 +0300 |
| commit | 6e3da17a2fae11af9ae00d9b59bd0d752022e16b (patch) | |
| tree | af0d64f08536ac193b30a8092a8c9c337eaf81e4 /src/qreg-commands.c | |
| parent | 4b266c9616f4eb359be71c44b9b2fa3373265bb0 (diff) | |
| download | sciteco-6e3da17a2fae11af9ae00d9b59bd0d752022e16b.tar.gz | |
<EI> has been repurposed and is the macro file inclusion (indirect file) command now
* Improves DEC TECO-11 compatibility.
* <EM> is still supported as a synonym, but considered deprecated and is no longer documented.
A warning is printed when invoked.
It can be repurposed at any time in the future.
* `EI$` is not yet supported.
I am unsure whether this makes any sense.
Diffstat (limited to 'src/qreg-commands.c')
| -rw-r--r-- | src/qreg-commands.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/qreg-commands.c b/src/qreg-commands.c index a4019a0..51f9149 100644 --- a/src/qreg-commands.c +++ b/src/qreg-commands.c @@ -703,7 +703,7 @@ teco_state_macro_got_register(teco_machine_main_t *ctx, teco_qreg_t *qreg, TECO_DEFINE_STATE_EXPECTQREG(teco_state_macro); static teco_state_t * -teco_state_macrofile_done(teco_machine_main_t *ctx, const teco_string_t *str, GError **error) +teco_state_indirect_done(teco_machine_main_t *ctx, const teco_string_t *str, GError **error) { if (ctx->flags.mode > TECO_MODE_NORMAL) return &teco_state_start; @@ -725,9 +725,9 @@ teco_state_macrofile_done(teco_machine_main_t *ctx, const teco_string_t *str, GE return &teco_state_start; } -/*$ EM - * EMfile$ -- Execute macro from file - * :EMfile$ +/*$ EI indirect + * EIfile$ -- Execute from indirect command file + * :EIfile$ * * Read the file with name <file> into memory and execute its contents * as a macro. @@ -738,7 +738,7 @@ teco_state_macrofile_done(teco_machine_main_t *ctx, const teco_string_t *str, GE * As all \*(ST code, the contents of <file> must be in valid UTF-8 * even if operating in the \(lqdefault ANSI\(rq mode as configured by \fBED\fP. */ -TECO_DEFINE_STATE_EXPECTFILE(teco_state_macrofile); +TECO_DEFINE_STATE_EXPECTFILE(teco_state_indirect); static teco_state_t * teco_state_copytoqreg_got_register(teco_machine_main_t *ctx, teco_qreg_t *qreg, |