From 06c784b576c401b11c6629e09c00504f8746b229 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Wed, 7 Sep 2022 10:16:24 -0700 Subject: self-documenting 0 Test_right_margin --- source_tests.lua | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'source_tests.lua') diff --git a/source_tests.lua b/source_tests.lua index dde4ec4..519c311 100644 --- a/source_tests.lua +++ b/source_tests.lua @@ -7,13 +7,14 @@ function test_resize_window() check_eq(App.screen.width, 300, 'F - test_resize_window/baseline/width') check_eq(App.screen.height, 300, 'F - test_resize_window/baseline/height') check_eq(Editor_state.left, Test_margin_left, 'F - test_resize_window/baseline/left_margin') + check_eq(Editor_state.right, 300 - Test_margin_right, 'F - test_resize_window/baseline/left_margin') App.resize(200, 400) + -- ugly; resize switches to real, non-test margins check_eq(App.screen.width, 200, 'F - test_resize_window/width') check_eq(App.screen.height, 400, 'F - test_resize_window/height') - check_eq(Editor_state.left, Test_margin_left, 'F - test_resize_window/left_margin') - -- ugly; right margin switches from 0 after resize + check_eq(Editor_state.left, Margin_left, 'F - test_resize_window/left_margin') check_eq(Editor_state.right, 200-Margin_right, 'F - test_resize_window/right_margin') - check_eq(Editor_state.width, 200-Test_margin_left-Margin_right, 'F - test_resize_window/drawing_width') + check_eq(Editor_state.width, 200-Margin_left-Margin_right, 'F - test_resize_window/drawing_width') -- TODO: how to make assertions about when App.update got past the early exit? end -- cgit 1.4.1-2-gfad0