diff --git a/tests/xwgame.pl b/tests/xwgame.pl
index 54ac8d8e0..73ee93ef9 100755
--- a/tests/xwgame.pl
+++ b/tests/xwgame.pl
@@ -64,4 +64,9 @@ for ( my $p = 0; $p < $nPlayers; ++$p ) {
     }
 } 
 
-
+sub usage()
+{
+    print STDERR <<EOF
+    usage : $0 [-nplayers n] [-dict dname] [-port pnum] [-quit]
+EOF
+}