applications/i3
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tests: make cmp_float a real test instruction

Browse Source
This commit is contained in:
Michael Stapelberg 2012-09-10 13:23:49 +02:00
parent 5bea7cb7df
commit 6bfbec9da3
4 changed files with 54 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
testcases/lib/i3test.pm
View File

@ -33,7 +33,6 @@ our @EXPORT = qw(
open_floating_window open_floating_window
get_dock_clients get_dock_clients
cmd cmd
cmp_float
sync_with_i3 sync_with_i3
does_i3_live does_i3_live
exit_gracefully exit_gracefully
@ -566,13 +565,7 @@ sub launch_with_config {
return $i3_pid; return $i3_pid;
} }
# compares two floats and return true if they differ less
# then 1e-6
sub cmp_float {
my ($a, $b) = @_;
return abs($a - $b) < 1e-6;
}
package i3test::X11; package i3test::X11;
use parent 'X11::XCB::Connection'; use parent 'X11::XCB::Connection';

31
testcases/lib/i3test/Test.pm
View File

@ -1,8 +1,12 @@
package i3test::Test; package i3test::Test;
# vim:ts=4:sw=4:expandtab
use base 'Test::Builder::Module'; use base 'Test::Builder::Module';
our @EXPORT = qw(is_num_children); our @EXPORT = qw(
is_num_children
cmp_float
);
my $CLASS = __PACKAGE__; my $CLASS = __PACKAGE__;
@ -54,6 +58,31 @@ sub is_num_children {
$tb->is_num($got_num_children, $num_children, $name); $tb->is_num($got_num_children, $num_children, $name);
} }
=head2 cmp_float($a, $b)
Compares floating point numbers C<$a> and C<$b> and returns true if they differ
less then 1e-6.
$tmp = fresh_workspace;
open_window for (1..4);
cmd 'resize grow width 10 px or 25 ppt';
($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.166666666666667), 'first window got 16%');
ok(cmp_float($nodes->[1]->{percent}, 0.166666666666667), 'second window got 16%');
ok(cmp_float($nodes->[2]->{percent}, 0.166666666666667), 'third window got 16%');
ok(cmp_float($nodes->[3]->{percent}, 0.50), 'fourth window got 50%');
=cut
sub cmp_float {
my ($a, $b, $name) = @_;
my $tb = $CLASS->builder;
$tb->cmp_ok(abs($a - $b), '<', 1e-6, $name);
}
=head1 AUTHOR =head1 AUTHOR
Michael Stapelberg <michael@i3wm.org> Michael Stapelberg <michael@i3wm.org>

44
testcases/t/141-resize.t
View File

@ -22,8 +22,8 @@ cmd 'resize grow up 10 px or 25 ppt';
my ($nodes, $focus) = get_ws_content($tmp); my ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.25), 'top window got only 25%'); cmp_float($nodes->[0]->{percent}, 0.25, 'top window got only 25%');
ok(cmp_float($nodes->[1]->{percent}, 0.75), 'bottom window got 75%'); cmp_float($nodes->[1]->{percent}, 0.75, 'bottom window got 75%');
############################################################ ############################################################
@ -34,8 +34,8 @@ cmd 'split h';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.25), 'top window got only 25%'); cmp_float($nodes->[0]->{percent}, 0.25, 'top window got only 25%');
ok(cmp_float($nodes->[1]->{percent}, 0.75), 'bottom window got 75%'); cmp_float($nodes->[1]->{percent}, 0.75, 'bottom window got 75%');
############################################################ ############################################################
# checks that resizing within stacked/tabbed cons works # checks that resizing within stacked/tabbed cons works
@ -52,14 +52,14 @@ cmd 'split h';
cmd 'layout stacked'; cmd 'layout stacked';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.5), 'top window got 50%'); cmp_float($nodes->[0]->{percent}, 0.5, 'top window got 50%');
ok(cmp_float($nodes->[1]->{percent}, 0.5), 'bottom window got 50%'); cmp_float($nodes->[1]->{percent}, 0.5, 'bottom window got 50%');
cmd 'resize grow up 10 px or 25 ppt'; cmd 'resize grow up 10 px or 25 ppt';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.25), 'top window got 25%'); cmp_float($nodes->[0]->{percent}, 0.25, 'top window got 25%');
ok(cmp_float($nodes->[1]->{percent}, 0.75), 'bottom window got 75%'); cmp_float($nodes->[1]->{percent}, 0.75, 'bottom window got 75%');
############################################################ ############################################################
# Checks that resizing in the parent's parent's orientation works. # Checks that resizing in the parent's parent's orientation works.
@ -79,14 +79,14 @@ $top = open_window;
$bottom = open_window; $bottom = open_window;
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.5), 'left window got 50%'); cmp_float($nodes->[0]->{percent}, 0.5, 'left window got 50%');
ok(cmp_float($nodes->[1]->{percent}, 0.5), 'right window got 50%'); cmp_float($nodes->[1]->{percent}, 0.5, 'right window got 50%');
cmd 'resize grow left 10 px or 25 ppt'; cmd 'resize grow left 10 px or 25 ppt';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.25), 'left window got 25%'); cmp_float($nodes->[0]->{percent}, 0.25, 'left window got 25%');
ok(cmp_float($nodes->[1]->{percent}, 0.75), 'right window got 75%'); cmp_float($nodes->[1]->{percent}, 0.75, 'right window got 75%');
################################################################################ ################################################################################
# Check that the resize grow/shrink width/height syntax works. # Check that the resize grow/shrink width/height syntax works.
@ -101,8 +101,8 @@ $right = open_window;
cmd 'resize grow width 10 px or 25 ppt'; cmd 'resize grow width 10 px or 25 ppt';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.25), 'left window got 25%'); cmp_float($nodes->[0]->{percent}, 0.25, 'left window got 25%');
ok(cmp_float($nodes->[1]->{percent}, 0.75), 'right window got 75%'); cmp_float($nodes->[1]->{percent}, 0.75, 'right window got 75%');
# Now test it with four windows # Now test it with four windows
$tmp = fresh_workspace; $tmp = fresh_workspace;
@ -112,19 +112,19 @@ open_window for (1..4);
cmd 'resize grow width 10 px or 25 ppt'; cmd 'resize grow width 10 px or 25 ppt';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.166666666666667), 'first window got 16%'); cmp_float($nodes->[0]->{percent}, 0.166666666666667, 'first window got 16%');
ok(cmp_float($nodes->[1]->{percent}, 0.166666666666667), 'second window got 16%'); cmp_float($nodes->[1]->{percent}, 0.166666666666667, 'second window got 16%');
ok(cmp_float($nodes->[2]->{percent}, 0.166666666666667), 'third window got 16%'); cmp_float($nodes->[2]->{percent}, 0.166666666666667, 'third window got 16%');
ok(cmp_float($nodes->[3]->{percent}, 0.50), 'fourth window got 50%'); cmp_float($nodes->[3]->{percent}, 0.50, 'fourth window got 50%');
# height should be a no-op in this situation # height should be a no-op in this situation
cmd 'resize grow height 10 px or 25 ppt'; cmd 'resize grow height 10 px or 25 ppt';
($nodes, $focus) = get_ws_content($tmp); ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.166666666666667), 'first window got 16%'); cmp_float($nodes->[0]->{percent}, 0.166666666666667, 'first window got 16%');
ok(cmp_float($nodes->[1]->{percent}, 0.166666666666667), 'second window got 16%'); cmp_float($nodes->[1]->{percent}, 0.166666666666667, 'second window got 16%');
ok(cmp_float($nodes->[2]->{percent}, 0.166666666666667), 'third window got 16%'); cmp_float($nodes->[2]->{percent}, 0.166666666666667, 'third window got 16%');
ok(cmp_float($nodes->[3]->{percent}, 0.50), 'fourth window got 50%'); cmp_float($nodes->[3]->{percent}, 0.50, 'fourth window got 50%');
############################################################ ############################################################

4
testcases/t/191-resize-levels.t
View File

@ -23,7 +23,7 @@ cmd 'resize grow left 10px or 25ppt';
my ($nodes, $focus) = get_ws_content($tmp); my ($nodes, $focus) = get_ws_content($tmp);
ok(cmp_float($nodes->[0]->{percent}, 0.25), 'left container got only 25%'); cmp_float($nodes->[0]->{percent}, 0.25, 'left container got only 25%');
ok(cmp_float($nodes->[1]->{percent}, 0.75), 'right container got 75%'); cmp_float($nodes->[1]->{percent}, 0.75, 'right container got 75%');
done_testing; done_testing;