App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi', 'screen:3')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'de', 'screen:2')
App.screen.check(y, 'fgh', 'screen:3')
App.screen.check(y, 'abc ', 'screen:1')
App.screen.check(y, 'def ', 'screen:2')
App.screen.check(y, 'ghi', 'screen:3')
App.screen.check(y, 'abcd ', 'screen:1')
App.screen.check(y, 'e fgh', 'screen:2')
App.screen.check(y, 'ijk', 'screen:3')
App.screen.check(y, 'mad', 'screen:1')
App.screen.check(y, 'am I', 'screen:2')
App.screen.check(y, '’m a', 'screen:3')
App.screen.check(y, 'madam ', 'baseline/screen:1')
App.screen.check(y, "I'm ad", 'baseline/screen:2')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 12, 'cursor:pos')
App.screen.check(y, "I'm ad", 'baseline/screen:2')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 12, 'cursor:pos')
App.screen.check(y, 'madam ', 'baseline/screen:1')
App.screen.check(y, "I'm ad", 'baseline/screen:2')
App.screen.check(y, 'am', 'baseline/screen:3')
check_eq(Editor_state.cursor1.pos, 15, 'cursor') -- one more than the number of UTF-8 code-points
App.screen.check(y, 'madam ', 'baseline/screen:1')
App.screen.check(y, 'I’m ad', 'baseline/screen:2')
App.screen.check(y, 'am', 'baseline/screen:3')
check_eq(Editor_state.cursor1.pos, 15, 'cursor') -- one more than the number of UTF-8 code-points
App.screen.check(y, 'the quick brown fox ', 'baseline/screen:1')
check_eq(Editor_state.cursor1.pos, 20, 'cursor')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'de', 'screen:2')
App.screen.check(y, 'fg', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'a', 'screen:1')
App.screen.check(y, 'bc', 'screen:2')
App.screen.check(y, 'def', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
App.screen.check(y, 'axy', 'screen:1')
App.screen.check(y, 'zbc', 'screen:2')
App.screen.check(y, 'def', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 2, 'cursor')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghi', 'screen:2')
check_eq(Editor_state.lines[2].mode, 'drawing', 'baseline/lines')
App.screen.check(y, 'abc', 'baseline/screen:1')
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'abc ', 'baseline/screen:1')
App.screen.check(y, 'def ', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 9, 'screen_top:pos')
App.screen.check(y, 'ghi ', 'screen:1')
App.screen.check(y, 'jkl ', 'screen:2')
App.screen.check(y, 'mno ', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 2, 'cursor')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 4, 'cursor')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghi', 'screen:2')
App.screen.check(y, 'jkl', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'baseline/screen:3') -- line wrapping includes trailing whitespace
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 5, 'cursor:pos')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghi ', 'screen:2')
App.screen.check(y, 'jkl', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghij', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 5, 'cursor:pos')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghij', 'screen:2')
App.screen.check(y, 'kl', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghij', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 3, 'baseline2/screen_top')
check_eq(Editor_state.cursor1.line, 3, 'baseline2/cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'baseline2/cursor:pos')
check_eq(Editor_state.screen_top1.line, 3, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 5, 'cursor:pos')
App.screen.check(y, 'ghij', 'screen:1')
App.screen.check(y, 'kl', 'screen:2')
App.screen.check(y, 'mno', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 2, 'cursor')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi', 'screen:3')
App.screen.check(y, 'def', 'baseline/screen:1')
App.screen.check(y, 'ghi', 'baseline/screen:2')
App.screen.check(y, 'jkl', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 1, 'cursor')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi', 'screen:3')
App.screen.check(y, 'jkl', 'baseline/screen:1')
App.screen.check(y, 'mno', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'screen:1')
App.screen.check(y, 'jkl', 'screen:2')
App.screen.check(y, 'mno', 'screen:3')
check_eq(Editor_state.screen_top1.line, 3, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 1, 'screen_top:pos')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'ghi', 'baseline/screen:1')
App.screen.check(y, 'jkl', 'baseline/screen:2')
App.screen.check(y, 'mno', 'baseline/screen:3')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghi', 'screen:2')
App.screen.check(y, 'jkl', 'screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 5, 'screen_top:pos')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 5, 'cursor:pos')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 1, 'cursor')
App.screen.check(y, 'abc', 'screen:2')
App.screen.check(y, 'def', 'screen:3')
App.screen.check(y, 'def', 'baseline/screen:1')
App.screen.check(y, 'ghi', 'baseline/screen:2')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 1, 'cursor')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:1')
App.screen.check(y, 'jkl', 'baseline/screen:2')
App.screen.check(y, 'mno', 'baseline/screen:3') -- line wrapping includes trailing whitespace
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'abc ', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi', 'screen:3')
App.screen.check(y, 'jkl', 'baseline/screen:2')
App.screen.check(y, 'mno', 'baseline/screen:3') -- line wrapping includes trailing whitespace
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'abc ', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'ghi ', 'screen:3')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 4, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'g', 'screen:2')
App.screen.check(y, 'hi', 'screen:3')
App.screen.check(y, 'jkl', 'baseline/screen:1')
check_eq(Editor_state.screen_top1.line, 4, 'screen_top')
check_eq(Editor_state.cursor1.line, 5, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'j', 'screen:1')
App.screen.check(y, 'kl', 'screen:2')
App.screen.check(y, 'a', 'screen:1')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi', 'baseline/screen:3')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghij', 'screen:2')
App.screen.check(y, 'kl', 'screen:3')
App.screen.check(y, 'jkl', 'baseline/screen:1')
App.screen.check(y, 'mno', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'screen:1')
App.screen.check(y, 'jkl', 'screen:2')
App.screen.check(y, 'mno', 'screen:3')
check_eq(Editor_state.screen_top1.line, 3, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 1, 'screen_top:pos')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 4, 'cursor:pos')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'baseline/screen:3') -- line wrapping includes trailing whitespace
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 6, 'cursor:pos')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghi ', 'screen:2')
App.screen.check(y, 'jkl', 'screen:3')
App.screen.check(y, 'jkl', 'baseline/screen:1')
App.screen.check(y, 'mno', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'screen:1')
App.screen.check(y, 'jkl', 'screen:2')
App.screen.check(y, 'mno', 'screen:3')
check_eq(Editor_state.screen_top1.line, 3, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 1, 'screen_top:pos')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'ghi ', 'baseline/screen:3') -- line wrapping includes trailing whitespace
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 8, 'cursor:pos')
App.screen.check(y, 'def', 'screen:1')
App.screen.check(y, 'ghi ', 'screen:2')
App.screen.check(y, 'jkl', 'screen:3')
App.screen.check(y, 'abc def ghi ', 'baseline1/screen:1')
App.screen.check(y, 'jkl mno pqr ', 'baseline1/screen:2')
App.screen.check(y, 'xyz', 'baseline1/screen:3')
App.screen.check(y, 'abc def ghi ', 'baseline2/screen:1')
App.screen.check(y, 'jkl mno pqr ', 'baseline2/screen:2')
App.screen.check(y, 'stu', 'baseline2/screen:3')
App.screen.check(y, 'def', 'baseline/screen:1')
App.screen.check(y, 'ghi', 'baseline/screen:2')
App.screen.check(y, 'jkl', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
check_eq(Editor_state.cursor1.line, 1, 'cursor')
App.screen.check(y, 'abcdef', 'screen:1')
App.screen.check(y, 'ghi', 'screen:2')
App.screen.check(y, 'jkl', 'screen:3')
App.screen.check(y, 'jkl', 'baseline/screen:1')
App.screen.check(y, 'mno', 'baseline/screen:2')
App.screen.check(y, 'ghij', 'screen:1')
App.screen.check(y, 'kl', 'screen:2')
App.screen.check(y, 'mno', 'screen:3')
check_eq(Editor_state.screen_top1.line, 3, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 1, 'screen_top:pos')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 4, 'cursor:pos')
check_eq(Editor_state.cursor1.line, 2, 'baseline/cursor:line')
check_eq(Editor_state.cursor1.pos, 5, 'baseline/cursor:pos')
check_nil(Editor_state.selection1.line, 'baseline/selection:line')
check_nil(Editor_state.selection1.pos, 'baseline/selection:pos')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'defg', 'baseline/screen:2')
App.screen.check(y, 'xyz', 'baseline/screen:3')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 4, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection:line')
check_nil(Editor_state.selection1.pos, 'selection:pos')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'def', 'screen:2')
App.screen.check(y, 'xyz', 'screen:3')
check_eq(Editor_state.cursor1.line, 2, 'baseline/cursor:line')
check_eq(Editor_state.cursor1.pos, 4, 'baseline/cursor:pos')
check_nil(Editor_state.selection1.line, 'baseline/selection:line')
check_nil(Editor_state.selection1.pos, 'baseline/selection:pos')
App.screen.check(y, 'abc', 'baseline/screen:1')
App.screen.check(y, 'def', 'baseline/screen:2')
App.screen.check(y, 'xyz', 'baseline/screen:3')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 5, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection:line')
check_nil(Editor_state.selection1.pos, 'selection:pos')
--? check_eq(Editor_state.selection1.line, 2, 'selection:line')
--? check_eq(Editor_state.selection1.pos, 4, 'selection:pos')
App.screen.check(y, 'abc', 'screen:1')
App.screen.check(y, 'defg', 'screen:2')
App.screen.check(y, 'xyz', 'screen:3')
check_eq(Editor_state.cursor1.line, 1, '1/cursor:line')
check_eq(Editor_state.cursor1.pos, 5, '1/cursor:pos')
end
check_eq(Editor_state.cursor1.line, 1, '1/cursor:line')
check_eq(Editor_state.cursor1.pos, 1, '1/cursor:pos')
end
function test_search_wrap_upwards()
check_eq(Editor_state.cursor1.line, 1, '2/cursor:line')
check_eq(Editor_state.cursor1.pos, 1, '2/cursor:pos')
end
function test_search_wrap()
check_eq(Editor_state.cursor1.line, 4, '2/cursor:line')
check_eq(Editor_state.cursor1.pos, 1, '2/cursor:pos')
end
function test_search_upwards()
check_eq(Editor_state.cursor1.line, 2, '1/cursor:line')
check_eq(Editor_state.cursor1.pos, 1, '1/cursor:pos')
-- reset cursor
Editor_state.cursor1 = {line=1, pos=1}
Editor_state.screen_top1 = {line=1, pos=1}
-- search for second occurrence
edit.run_after_keychord(Editor_state, 'C-f')
check_eq(Editor_state.selection1.line, 1, 'line')
check_eq(Editor_state.selection1.pos, 2, 'pos')
end
check_eq(Editor_state.lines[1].data, 'xbc', 'baseline')
check_nil(Editor_state.selection1.line, 'baseline:selection')
-- undo
edit.run_after_keychord(Editor_state, 'C-z')
edit.run_after_keychord(Editor_state, 'C-z')
-- selection is restored
end
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- undo
--? -- after undo, the backspaced key is selected
edit.run_after_keychord(Editor_state, 'C-z')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
local y = Editor_state.top
end
function test_undo_delete_text()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- undo
edit.run_after_keychord(Editor_state, 'C-z')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
local y = Editor_state.top
check_eq(Editor_state.lines[1].data, 'bc', 'data')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection')
check_eq(Editor_state.lines[1].data, 'bc', 'data')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection')
check_eq(Editor_state.lines[1].data, 'akl', 'data:1')
check_eq(Editor_state.lines[2].data, 'mno', 'data:2')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection')
check_eq(Editor_state.lines[1].data, 'a', 'data:1')
check_eq(Editor_state.lines[2].data, 'def', 'data:2')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection')
check_eq(Editor_state.lines[1].data, 'abc', 'data:1')
check_eq(Editor_state.lines[2].data, 'f', 'data:2')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection')
end
-- selection is cleared
-- cursor remains at start of selection
end
function test_backspace_to_start_of_line()
-- selection is cleared
-- cursor remains at start of selection
end
function test_backspace_to_end_of_line()
-- selection is cleared
-- cursor remains at start of selection
end
function test_backspace_over_multiple_lines()
-- selection is cleared
-- cursor moves to start of selection
end
function test_backspace_over_selection_reverse()
-- selection is cleared
-- cursor (remains) at start of selection
check_eq(Editor_state.lines[1].data, 'abcdef', 'check')
end
end
function test_backspace_past_line_boundary()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- after hitting backspace the screen scrolls up by one screen line
edit.run_after_keychord(Editor_state, 'backspace')
y = Editor_state.top
y = y + Editor_state.line_height
end
function test_backspace_can_scroll_up_screen_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting backspace the screen scrolls up by one line
edit.run_after_keychord(Editor_state, 'backspace')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 26, 'cursor:pos')
end
function test_backspace_can_scroll_up()
-- try to move the cursor earlier in the third screen line by clicking the mouse
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.cursor1.pos, 28, 'cursor:pos')
y = Editor_state.top
-- add to the line until it's wrapping over 3 screen lines
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_position_cursor_on_recently_edited_wrapping_line()
-- draw a line wrapping over 2 screen lines
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting end the screen scrolls down by one line
edit.run_after_keychord(Editor_state, 'end')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_end_scrolls_down_in_wrapped_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- after hitting home the screen scrolls up to first screen line
edit.run_after_keychord(Editor_state, 'home')
y = Editor_state.top
y = y + Editor_state.line_height
end
function test_home_scrolls_up_in_wrapped_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the right arrow the screen scrolls down by one line
edit.run_after_keychord(Editor_state, 'right')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_right_arrow_scrolls_down_in_wrapped_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- after hitting the left arrow the screen scrolls up to first screen line
edit.run_after_keychord(Editor_state, 'left')
y = Editor_state.top
y = y + Editor_state.line_height
end
function test_left_arrow_scrolls_up_in_wrapped_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 3, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 7, 'cursor:pos')
y = Editor_state.top
-- after typing something the line wraps and the screen scrolls down
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_typing_on_bottom_line_scrolls_down()
check_eq(Editor_state.screen_top1.line, 2, 'screen_top')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
local y = Editor_state.top
end
function test_inserting_text_on_final_line_avoids_scrolling_down_when_not_at_bottom()
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the enter key the screen does not scroll down
edit.run_after_keychord(Editor_state, 'return')
end
function test_enter_on_final_line_avoids_scrolling_down_when_not_at_bottom()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the enter key the screen scrolls down
edit.run_after_keychord(Editor_state, 'return')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_enter_on_bottom_line_scrolls_down()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the page-up key the screen scrolls up to top
edit.run_after_keychord(Editor_state, 'pageup')
y = y + Editor_state.line_height
end
function test_pageup_scrolls_up_from_middle_screen_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the page-up key the screen scrolls up to top
edit.run_after_keychord(Editor_state, 'pageup')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_pageup_scrolls_up_by_screen_line()
y = y + Editor_state.line_height
y = Editor_state.top
-- after pageup the cursor goes to first line
edit.run_after_keychord(Editor_state, 'pageup')
y = y + Editor_state.line_height
end
function test_pageup()
y = y + Editor_state.line_height
y = Editor_state.top
-- empty first line
y = y + Editor_state.line_height
-- after hitting the up arrow the screen scrolls up by one line
edit.run_after_keychord(Editor_state, 'up')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_up_arrow_scrolls_up_to_empty_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- after hitting the up arrow the screen scrolls up to final screen line of previous line
edit.run_after_keychord(Editor_state, 'up')
y = Editor_state.top
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_up_arrow_scrolls_up_to_final_screen_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- after hitting the up arrow the screen scrolls up to first screen line
edit.run_after_keychord(Editor_state, 'up')
y = Editor_state.top
y = y + Editor_state.line_height
end
function test_up_arrow_scrolls_up_by_one_screen_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the up arrow the screen scrolls up by one line
edit.run_after_keychord(Editor_state, 'up')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_up_arrow_scrolls_up_by_one_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- the screen is unchanged
y = Editor_state.top
-- after hitting the up arrow the cursor moves up by 1 line
edit.run_after_keychord(Editor_state, 'up')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_up_arrow_moves_cursor()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting down arrow the screen doesn't scroll down further, and certainly doesn't scroll up
edit.run_after_keychord(Editor_state, 'down')
-- after hitting pagedown the screen scrolls down to start of a long line
edit.run_after_keychord(Editor_state, 'pagedown')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the down arrow the screen scrolls down by one line
edit.run_after_keychord(Editor_state, 'down')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_down_arrow_scrolls_down_by_one_screen_line_after_splitting_within_word()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the down arrow the screen scrolls down by one line
edit.run_after_keychord(Editor_state, 'down')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_down_arrow_scrolls_down_by_one_screen_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after hitting the down arrow the screen scrolls down by one line
edit.run_after_keychord(Editor_state, 'down')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_down_arrow_scrolls_down_by_one_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
-- the screen is unchanged
y = Editor_state.top
-- after hitting the down arrow, the cursor moves down by 1 line
edit.run_after_keychord(Editor_state, 'down')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.screen_top1.line, 1, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 9, 'screen_top:pos')
end
function test_down_arrow_moves_cursor()
end
function test_pagedown_never_moves_up()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- after pagedown we scroll down the very long wrapping line
edit.run_after_keychord(Editor_state, 'pagedown')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_pagedown_can_start_from_middle_of_long_wrapping_line()
y = Editor_state.top + drawing_height
-- after pagedown the screen draws the drawing up top
-- 15px margin + 10px margin + 25px drawing + 10px margin + 15px line3 = 75px < screen height 80px
edit.run_after_keychord(Editor_state, 'pagedown')
Editor_state.cursor1 = {line=1, pos=1}
Editor_state.screen_top1 = {line=1, pos=1}
Editor_state.screen_bottom1 = {}
local drawing_height = Drawing_padding_height + drawing_width/2 -- default
-- initially the screen displays the first line and the drawing
-- 15px margin + 15px line1 + 10px margin + 25px drawing + 10px margin = 75px < screen height 80px
edit.draw(Editor_state)
local y = Editor_state.top
end
function test_pagedown_skips_drawings()
y = y + Editor_state.line_height
y = Editor_state.top
-- after pagedown the bottom line becomes the top
edit.run_after_keychord(Editor_state, 'pagedown')
y = y + Editor_state.line_height
check_nil(Editor_state.selection1.line, 'check')
end
check_eq(Editor_state.selection1.line, 1, 'selection:line')
check_eq(Editor_state.selection1.pos, 2, 'selection:pos')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
end
check_eq(Editor_state.selection1.line, 1, 'selection:line')
check_eq(Editor_state.selection1.pos, 2, 'selection:pos')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 4, 'cursor:pos')
end
function test_select_text_repeatedly_using_mouse_and_shift()
check_eq(Editor_state.selection1.line, 1, 'selection:line')
check_eq(Editor_state.selection1.pos, 2, 'selection:pos')
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 4, 'cursor:pos')
end
function test_select_text_using_mouse_and_shift()
end
function test_select_text_using_mouse()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- paste some text including a newline, check that new line is created
App.clipboard = 'xy\nz'
edit.run_after_keychord(Editor_state, 'C-v')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.cursor1.line, 2, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
check_eq(Editor_state.lines[1].data, '', 'data:1')
check_eq(Editor_state.lines[2].data, 'abc', 'data:2')
end
function test_insert_from_clipboard()
end
function test_insert_newline_at_start_of_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
y = Editor_state.top
-- hitting the enter key splits the line
edit.run_after_keychord(Editor_state, 'return')
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_insert_newline()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(App.clipboard, 'a', 'clipboard')
check(Editor_state.selection1.line, 'check')
check_eq(App.clipboard, 'a', 'clipboard')
check_eq(Editor_state.lines[1].data, 'bc', 'data')
App.screen.check(y, 'def', 'baseline/screen:1')
App.screen.check(y, 'ghi', 'baseline/screen:2')
App.screen.check(y, 'jkl', 'baseline/screen:3')
check_eq(Editor_state.screen_top1.line, 1, 'check')
check_eq(Editor_state.lines[1].data, 'ahi', 'data')
end
-- set up a selection starting above the currently displayed page
Editor_state.selection1 = {line=1, pos=2}
-- delete selection
edit.run_after_keychord(Editor_state, 'backspace')
-- page scrolls up
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.lines[1].data, 'xyzdef', 'check')
end
function test_deleting_selection_may_scroll()
end
function test_paste_replaces_selection()
-- selected text is deleted
end
function test_cut()
-- selection is reset since shift key is not pressed
check_nil(Editor_state.selection1.line, 'check')
check_eq(Editor_state.lines[1].data, 'Dbc', 'data')
end
function test_copy_does_not_reset_selection()
check_eq(Editor_state.lines[1].data, 'xbc', 'check')
end
function test_edit_with_shift_key_deletes_selection()
check_nil(Editor_state.selection1.line, 'check')
check_eq(Editor_state.lines[1].data, 'abc', 'data')
end
check_eq(Editor_state.selection1.line, 1, 'selection:line')
check_eq(Editor_state.selection1.pos, 1, 'selection:pos')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
end
function test_cursor_movement_without_shift_resets_selection()
end
function test_select_text()
y = y + Editor_state.line_height
-- click past the end of the screen line
edit.run_after_mouse_click(Editor_state, App.screen.width-2,y-2, 1)
-- cursor moves to end of screen line
end
function test_click_past_end_of_word_wrapping_line()
y = y + Editor_state.line_height
-- click past the end of it
edit.run_after_mouse_click(Editor_state, App.screen.width-2,y-2, 1)
-- cursor moves to end of line
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_click_past_end_of_wrapping_line_containing_non_ascii()
y = y + Editor_state.line_height
-- click past the end of it
edit.run_after_mouse_click(Editor_state, App.screen.width-2,y-2, 1)
-- cursor moves to end of line
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_click_past_end_of_wrapping_line()
y = y + Editor_state.line_height
-- click past end of second screen line
edit.run_after_mouse_click(Editor_state, App.screen.width-2,y-2, 1)
-- cursor moves to end of screen line
end
function test_click_on_wrapping_line_rendered_from_partway_at_top_of_screen()
y = y + Editor_state.line_height
-- click past end of second screen line
edit.run_after_mouse_click(Editor_state, App.screen.width-2,y-2, 1)
-- cursor moves to end of screen line
y = y + Editor_state.line_height
end
function test_click_on_wrapping_line()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_draw_wrapping_text_containing_non_ascii()
-- draw a long line containing non-ASCII
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection is empty to avoid perturbing future edits')
end
function test_draw_text_wrapping_within_word()
-- arrange a screen line that needs to be split within a word
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection is empty to avoid perturbing future edits')
end
end
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_draw_word_wrapping_text()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
end
function test_draw_wrapping_text()
y = y + Editor_state.line_height
y = y + Editor_state.line_height
check_eq(Editor_state.cursor1.line, 1, 'cursor')
end
function test_draw_text()
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection is empty to avoid perturbing future edits')
end
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection is empty to avoid perturbing future edits')
end
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 2, 'cursor:pos')
check_nil(Editor_state.selection1.line, 'selection:line')
check_nil(Editor_state.selection1.pos, 'selection:pos')
end
-- selection is empty to avoid perturbing future edits
check_eq(Editor_state.cursor1.line, 2, 'line')
check_eq(Editor_state.cursor1.pos, 4, 'pos')
end
check_eq(Editor_state.cursor1.pos, 9, 'check')
end
function test_move_past_end_of_word_on_next_line()
check_eq(Editor_state.cursor1.pos, 4, 'check')
end
function test_skip_multiple_spaces_to_next_word()
check_eq(Editor_state.cursor1.pos, 8, 'check')
end
function test_skip_past_tab_to_next_word()
check_eq(Editor_state.cursor1.pos, 4, 'check')
end
function test_skip_to_next_word()
check_eq(Editor_state.cursor1.line, 1, 'line')
check_eq(Editor_state.cursor1.pos, 5, 'pos')
end
function test_move_past_end_of_word()
check_eq(Editor_state.cursor1.pos, 1, 'check')
end
function test_move_to_start_of_word_on_previous_line()
check_eq(Editor_state.cursor1.pos, 9, 'check')
end
function test_skip_multiple_spaces_to_previous_word()
check_eq(Editor_state.cursor1.pos, 1, 'check')
end
function test_skip_past_tab_to_previous_word()
check_eq(Editor_state.cursor1.pos, 1, 'check')
end
function test_skip_to_previous_word()
check_eq(Editor_state.cursor1.pos, 1, 'check')
end
function test_move_to_start_of_previous_word()
check_eq(Editor_state.cursor1.line, 2, 'line')
check_eq(Editor_state.cursor1.pos, 1, 'pos')
end
function test_move_to_start_of_word()
check_eq(Editor_state.cursor1.line, 1, 'line')
check_eq(Editor_state.cursor1.pos, 4, 'pos') -- past end of line
end
function test_move_right_to_next_line()
check_eq(Editor_state.cursor1.pos, 2, 'check')
end
function test_move_left_to_previous_line()
check_eq(Editor_state.cursor1.pos, 1, 'check')
end
function test_move_right()
App.screen.check(y, 'a', 'screen:1')
end
function test_press_ctrl()
check_eq(#Editor_state.lines, 1, '#lines')
check_eq(Editor_state.cursor1.line, 1, 'cursor')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top')
end
function test_insert_first_character()
check_eq(#Editor_state.lines, 1, '#lines')
check_eq(Editor_state.cursor1.line, 1, 'cursor')
end
function test_backspace_from_start_of_final_line()
check_eq(#Editor_state.lines, 2, '#lines')
check_eq(Editor_state.cursor1.line, 2, 'cursor')
end
function test_backspace_to_delete_drawing()
check_eq(#Editor_state.lines, 1, '#lines')
check_eq(Editor_state.cursor1.line, 1, 'cursor:line')
check_eq(Editor_state.cursor1.pos, 1, 'cursor:pos')
check_eq(Editor_state.screen_top1.line, 1, 'screen_top:line')
check_eq(Editor_state.screen_top1.pos, 1, 'screen_top:pos')
end
function test_click_to_create_drawing()