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 }
#
#
default { fail "$test (header)" }
}
}
-
+
proc expect_table_dsc { test match_header match_item } {
expect {
-re $match_header {}
}
set do_loop 1
- set last_value 999999
+ set last_value 99999999
set found_item 0
while { $do_loop ==1 } {
expect {