From 846a40a0a60190343a296aadabb63c2e5f129b79 Mon Sep 17 00:00:00 2001 From: Humza Shahid Date: Fri, 26 Dec 2025 22:49:24 +0000 Subject: [PATCH] begin adding tests for 'daw' motion --- test/normal-delete.sml | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) diff --git a/test/normal-delete.sml b/test/normal-delete.sml index 13b290d..cc9ae03 100644 --- a/test/normal-delete.sml +++ b/test/normal-delete.sml @@ -4442,6 +4442,27 @@ struct end) ] + val dawDelete = describe "delete motion 'daw' (delete around word)" + [test "deletes a single newline when cursor is on a newline" (fn _ => + let + (* arrange *) + val originalString = "hello\n\nworld\n" + val app = TestUtils.init originalString + val app = AppWith.idx (app, 6) + + (* act *) + val {buffer, cursorIdx, ...} = TestUtils.updateMany (app, "daw") + + (* assert *) + val expectedString = "hello\nworld\n" + val actualString = LineGap.toString buffer + + val expectedCursorIdx = 6 + in + Expect.isTrue + (actualString = expectedString andalso cursorIdx = expectedCursorIdx) + end)] + val tests = [ dhDelete , dlDelete @@ -4469,5 +4490,6 @@ struct , dTDelete , diwDelete , diWDelete + , dawDelete ] end