# 
# patch "testsuite.at"
#  from [169f2b7d55bea46941d2e567949b9d98cdb2da1e]
#    to [45feda4266348cd6eea49d37e66770c76d084bab]
# 
========================================================================
--- testsuite.at	169f2b7d55bea46941d2e567949b9d98cdb2da1e
+++ testsuite.at	45feda4266348cd6eea49d37e66770c76d084bab
@@ -40,7 +40,7 @@
 # Pick a random port, so running multiple testsuites concurrently on the
 # same machine has a hope of working.  Port range will usually be
 # 20050..53347.
-_PORT=`echo $RANDOM | awk 'BEGIN {srand()} END {printf "%.0f\n", ((rand() * 529 + 20050 + $1) % 64512 + 1024)}'`
+_PORT=`echo $RANDOM | awk 'BEGIN {a=1;srand()} END {printf "%.0f\n", ((rand() * 529 + 20050 + $a) % 64512 + 1024)}'`
 
 AT_DATA(test_keys, [@<:@pubkey address@hidden@:>@
 MIGdMA0GCSqGSIb3DQEBAQUAA4GLADCBhwKBgQCfN/cAMabgb6T7m8ksGnpQ7LO6hOdnc/7V