[libinline-java-perl] 152/398: Added more localized signal handling.
Jonas Smedegaard
dr at jones.dk
Thu Feb 26 11:42:59 UTC 2015
This is an automated email from the git hooks/post-receive script.
js pushed a commit to tag 0.55
in repository libinline-java-perl.
commit afef40bd73420a0a85d34b075dd4f21e22f61c17
Author: patrick_leb <>
Date: Sat Jan 26 03:04:31 2002 +0000
Added more localized signal handling.
---
Java.pm | 11 +++++------
1 file changed, 5 insertions(+), 6 deletions(-)
diff --git a/Java.pm b/Java.pm
index b008dde..7c9d693 100644
--- a/Java.pm
+++ b/Java.pm
@@ -73,8 +73,6 @@ sub done {
Inline::Java::debug("exiting with $ec") ;
- # In Windows, it is possible that the process will hang here if
- # the children are not all dead. But they should be. Really.
exit($ec) ;
}
@@ -86,10 +84,6 @@ END {
}
-# Signal stuff, not really needed with JNI
-use sigtrap 'handler', \&done, 'normal-signals' ;
-
-
# To export the cast function and others.
sub import {
Inline::Java->export_to_level(1, @_) ;
@@ -1155,6 +1149,11 @@ sub get_DONE {
}
+sub set_DONE {
+ $DONE = 1 ;
+}
+
+
sub java2perl {
my $pkg = shift ;
my $jclass = shift ;
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libinline-java-perl.git
More information about the Pkg-perl-cvs-commits
mailing list