humza/sml-projects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

implement additional non-terminal yank commands

Browse Source
This commit is contained in:
Humza Shahid
2025-09-04 00:50:16 +01:00
parent e1a15ab1d0
commit 367e691349
2 changed files with 50 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
fcore/normal-mode/normal-mode.sml
View File

@@ -280,7 +280,18 @@ struct
parseYankTerminal (str, count, app, chrCmd, time)
else
(* todo: handle non-terminal characters *)
app
case String.sub (str, strPos + 1) of
#"t" => NormalYank.yankToChr (app, 1, Cursor.tillNextChr, op+, chrCmd)
| #"T" => NormalYank.yankToChr (app, 1, Cursor.tillPrevChr, op-, chrCmd)
| #"f" => NormalYank.yankToChr (app, count, Cursor.toNextChr, op+, chrCmd)
| #"F" => NormalYank.yankToChr (app, count, Cursor.toPrevChr, op-, chrCmd)
(* todo: implement
| #"g" =>
| #"i" =>
| #"a" =>
| #"d" =>
*)
| _ => NormalFinish.clearMode app
(* useful reference as list of non-terminal commands *)
fun parseAfterCount (strPos, str, count, app, chrCmd, time) =