Clean up temp files on signal.
authorBen Pfaff <blp@cs.stanford.edu>
Thu, 12 Jan 2006 17:04:09 +0000 (17:04 +0000)
committerBen Pfaff <blp@cs.stanford.edu>
Thu, 12 Jan 2006 17:04:09 +0000 (17:04 +0000)
src/utils/pintos

index afd0ec280f356516bd29e8db098d66649cb7df01..f99396841aa65f3873a8cf11145637ae1d7ff489 100755 (executable)
@@ -677,10 +677,11 @@ sub xsystem {
 # relay_signal($pid, $signal)
 #
 # Relays $signal to $pid and then reinvokes it for us with the default
-# handler.
+# handler.  Also cleans up temporary files.
 sub relay_signal {
     my ($pid, $signal) = @_;
     kill $signal, $pid;
+    File::Temp::cleanup();
     $SIG{$signal} = 'DEFAULT';
     kill $signal, getpid ();
 }