diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/core-commands.c | 2 | ||||
-rw-r--r-- | src/main.c | 2 | ||||
-rw-r--r-- | src/qreg.c | 50 | ||||
-rw-r--r-- | src/qreg.h | 1 |
4 files changed, 55 insertions, 0 deletions
diff --git a/src/core-commands.c b/src/core-commands.c index c3ec3dd..60e7bcc 100644 --- a/src/core-commands.c +++ b/src/core-commands.c @@ -123,6 +123,8 @@ teco_state_start_comma(teco_machine_main_t *ctx, GError **error) * \(lq.\(rq pushes onto the stack, the current * position (also called <dot>) of the currently * selected buffer or Q-Register. + * + * <dot> is also available in Q-Register \(lq:\(rq. */ static void teco_state_start_dot(teco_machine_main_t *ctx, GError **error) @@ -399,6 +399,8 @@ main(int argc, char **argv) teco_qreg_table_insert(&teco_qreg_table_globals, teco_qreg_plain_new("_", 1)); /* replacement string register */ teco_qreg_table_insert(&teco_qreg_table_globals, teco_qreg_plain_new("-", 1)); + /* current document's dot (":") */ + teco_qreg_table_insert(&teco_qreg_table_globals, teco_qreg_dot_new()); /* current buffer name and number ("*") */ teco_qreg_table_insert(&teco_qreg_table_globals, teco_qreg_bufferinfo_new()); /* current working directory ("$") */ @@ -398,6 +398,56 @@ teco_qreg_plain_new(const gchar *name, gsize len) return teco_qreg_new(&vtable, name, len); } +/* see also teco_state_start_jump() */ +static gboolean +teco_qreg_dot_set_integer(teco_qreg_t *qreg, teco_int_t value, GError **error) +{ + gssize pos = teco_interface_glyphs2bytes(value); + if (pos < 0) { + g_set_error_literal(error, TECO_ERROR, TECO_ERROR_MOVE, + "Attempt to move pointer off page when setting Q-Register \":\""); + return FALSE; + } + + teco_interface_ssm(SCI_GOTOPOS, pos, 0); + return TRUE; +} + +static gboolean +teco_qreg_dot_undo_set_integer(teco_qreg_t *qreg, GError **error) +{ + if (teco_current_doc_must_undo()) + undo__teco_interface_ssm(SCI_GOTOPOS, + teco_interface_ssm(SCI_GETCURRENTPOS, 0, 0), 0); + return TRUE; +} + +/* see also teco_state_start_dot() */ +static gboolean +teco_qreg_dot_get_integer(teco_qreg_t *qreg, teco_int_t *ret, GError **error) +{ + sptr_t pos = teco_interface_ssm(SCI_GETCURRENTPOS, 0, 0); + *ret = teco_interface_bytes2glyphs(pos); + return TRUE; +} + +/** @static @memberof teco_qreg_t */ +teco_qreg_t * +teco_qreg_dot_new(void) +{ + static teco_qreg_vtable_t vtable = TECO_INIT_QREG( + .set_integer = teco_qreg_dot_set_integer, + .undo_set_integer = teco_qreg_dot_undo_set_integer, + .get_integer = teco_qreg_dot_get_integer + ); + + /* + * If we wanted to use ".", we'd have to either make this a local register + * or add ".." as special syntax equivalent to [.]. + */ + return teco_qreg_new(&vtable, ":", 1); +} + static gboolean teco_qreg_radix_set_integer(teco_qreg_t *qreg, teco_int_t value, GError **error) { @@ -112,6 +112,7 @@ struct teco_qreg_t { }; teco_qreg_t *teco_qreg_plain_new(const gchar *name, gsize len); +teco_qreg_t *teco_qreg_dot_new(void); teco_qreg_t *teco_qreg_bufferinfo_new(void); teco_qreg_t *teco_qreg_workingdir_new(void); teco_qreg_t *teco_qreg_clipboard_new(const gchar *name); |