From 7f15f07b3f0d4a9c1e1a39d95f8e784edb65e041 Mon Sep 17 00:00:00 2001 From: Jaromir Capik Date: Thu, 14 Mar 2013 14:31:03 +0100 Subject: [PATCH] testsuite: increasing the upper limit of permitted values This commit increases the upper limit of permitted values in the expect_table_dsc procedure from 999,999 to 99,999,999. The previous value was insufficient and causing the slabtop test to fail on build systems where the number of objects exceeds one milion. --- testsuite/config/unix.exp | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/testsuite/config/unix.exp b/testsuite/config/unix.exp index d9100e4e..2a72c074 100644 --- a/testsuite/config/unix.exp +++ b/testsuite/config/unix.exp @@ -15,16 +15,16 @@ proc procps_v_version { tool } { clone_output "$toolpath version $version\n" } -proc free_version {} { procps_v_version free } -proc kill_version {} { procps_v_version kill } -proc pgrep_version {} { procps_v_version pgrep } -proc pkill_version {} { procps_v_version pkill } -proc pmap_version {} { procps_v_version pmap } -proc pwdx_version {} { procps_v_version pwdx } -proc sysctl_version {} { procps_v_version sysctl } -proc uptime_version {} { procps_v_version uptime } -proc vmstat_version {} { procps_v_version vmstat } -proc w_version {} { procps_v_version w } +proc free_version {} { procps_v_version free } +proc kill_version {} { procps_v_version kill } +proc pgrep_version {} { procps_v_version pgrep } +proc pkill_version {} { procps_v_version pkill } +proc pmap_version {} { procps_v_version pmap } +proc pwdx_version {} { procps_v_version pwdx } +proc sysctl_version {} { procps_v_version sysctl } +proc uptime_version {} { procps_v_version uptime } +proc vmstat_version {} { procps_v_version vmstat } +proc w_version {} { procps_v_version w } # # @@ -69,7 +69,7 @@ proc expect_table { test match_header match_items match_footer } { default { fail "$test (header)" } } } - + proc expect_table_dsc { test match_header match_item } { expect { -re $match_header {} @@ -80,7 +80,7 @@ proc expect_table_dsc { test match_header match_item } { } set do_loop 1 - set last_value 999999 + set last_value 99999999 set found_item 0 while { $do_loop ==1 } { expect {