src/HOL/Tools/ATP_Manager/lib/scripts/local_atp.pl
changeset 32751 5b65449d7669
parent 32750 c876bcb601fc
parent 32639 a6909ef949aa
child 32752 f65d74a264dd
--- a/src/HOL/Tools/ATP_Manager/lib/scripts/local_atp.pl	Thu Sep 17 14:17:37 2009 +1000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,15 +0,0 @@
-use POSIX qw(setsid);
-
-$SIG{'INT'} = "DEFAULT";
-
-defined (my $pid = fork) or die "$!";
-if (not $pid) {
-  POSIX::setsid or die $!;
-  exec @ARGV;
-}
-else {
-  wait;
-  my ($user, $system, $cuser, $csystem) = times;
-  my $time = ($user + $cuser) * 1000;
-  print "$time\n";
-}