X-Git-Url: http://git.indexdata.com/?p=mkws-moved-to-github.git;a=blobdiff_plain;f=test%2Fbin%2Fbomb;h=b706edf6bed74afdd6defdf440f8864fbba24ab1;hp=255bea59389b5f9eef06737e723ee68e81526bcd;hb=HEAD;hpb=f6c79975e0d027d1bec4e5c925ccce15460ae8ff

diff --git a/test/bin/bomb b/test/bin/bomb
index 255bea5..b706edf 100755
--- a/test/bin/bomb
+++ b/test/bin/bomb
@@ -1,17 +1,21 @@
-#!/bin/sh
+#!/bin/bash
 # Copyright (c) 2014 Index Data ApS. http://indexdata.com
 #
 # bomb - wrapper to stop a process after N seconds
 
-# Turn on job control. This will switch to process group
+# Turn on job control. This will switch the process group
 # as on an interactive shell, and make sure that a signal
-# to the process group will not kill any parent processes
+# to the process group will not kill any parent processes.
 set -o monitor
 
+# the maximum amount of cpu time in seconds
+# last resort if BSD::Resource is not available in ./bomb.pl
+ulimit -t 120
+
 # now run the perl script. For unknown reasons, the
 # call to setpgrp() in perl does not work as expected,
 # and we solve the issue by this simple shell wrapper
 
-exec $0.pl "$@"
+perl $0.pl "$@"
 
 # EOF