Use bignum to find a suitable big number.

src/server/testsuite/lyskomd.0/prot-a-parse-cov.exp

@@ -35,6 +35,8 @@
 source "$srcdir/config/prot-a.exp"
 read_versions
 
+set bignum [exec ./bignum]
+
 proc protocol_error {} {
     simple_expect "%% LysKOM protocol error."
 }
@@ -72,7 +74,7 @@ protocol_error
 
 send "1000 80 -1 { 1 }\n"
 simple_expect "%% LysKOM protocol error."
-send "1000 80 3000000000 { 1 }\n"
+send "1000 80 $bignum { 1 }\n"
 simple_expect "%%Insane array size."
 client_death 0
 
@@ -144,7 +146,7 @@ protocol_error
 
 send "1012 62 5 -6Hgazonk 0\n"
 simple_expect "%% LysKOM protocol error."
-send "1012 62 5 3000000000Hgazonk 0\n"
+send "1012 62 5 ${bignum}Hgazonk 0\n"
 simple_expect "%%Insane string length."
 client_death 0
 
@@ -198,7 +200,7 @@ protocol_error
 
 send "1019 86 [holl "Text"] 0 { } -1 { 1 00000000 0 [holl "A"] }\n"
 simple_expect "%% LysKOM protocol error."
-send "1019 86 [holl "Text"] 0 { } 3000000000 { 1 00000000 0 [holl "A"] }\n"
+send "1019 86 [holl "Text"] 0 { } ${bignum} { 1 00000000 0 [holl "A"] }\n"
 simple_expect "%%Insane array size."
 client_death 0
 client_start 0
@@ -386,7 +388,7 @@ kom_accept_async "0 { }"
 
 send "2007 89 [holl "PP"] [holl "PW"] 0 -1 { }\n"
 simple_expect "%% LysKOM protocol error."
-send "2007 89 [holl "PP"] [holl "PW"] 0 3000000000 { }\n"
+send "2007 89 [holl "PP"] [holl "PW"] 0 ${bignum} { }\n"
 simple_expect "%%Insane array size."
 client_death 0
 client_start 0
@@ -396,7 +398,7 @@ kom_accept_async "0 { }"
 
 send "2008 92 1 -1 { } 0 { }\n"
 simple_expect "%% LysKOM protocol error."
-send "2008 92 1 3000000000 { } 0 { }\n"
+send "2008 92 1 ${bignum} { } 0 { }\n"
 simple_expect "%%Insane array size."
 client_death 0
 client_start 0
@@ -406,7 +408,7 @@ kom_accept_async "0 { }"
 
 send "2009 93 1 -1 { } 0 { }\n"
 simple_expect "%% LysKOM protocol error."
-send "2009 93 1 30000000000 { } 0 { }\n"
+send "2009 93 1 ${bignum} { } 0 { }\n"
 simple_expect "%%Insane array size."
 client_death 0
 client_start 0