[libinline-java-perl] 214/398: ok
Jonas Smedegaard
dr at jones.dk
Thu Feb 26 11:43:04 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 b30a3c75973708b1d9379803b186dc2eaa149e65
Author: patrick_leb <>
Date: Mon Mar 3 02:04:35 2003 +0000
ok
---
Java/ClassLoader.pm | 66 -----------------------------------------------------
1 file changed, 66 deletions(-)
diff --git a/Java/ClassLoader.pm b/Java/ClassLoader.pm
deleted file mode 100644
index 27101b8..0000000
--- a/Java/ClassLoader.pm
+++ /dev/null
@@ -1,66 +0,0 @@
-package Inline::Java::ClassLoader ;
-
-
-use strict ;
-
-$Inline::Java::ClassLoader::VERSION = '0.35' ;
-
-
-use Carp ;
-
-
-1 ;
-
-
-__DATA__
-
-
-public class InlineJavaClassLoader extends URLClassLoader {
- private static InlineJavaClassLoader instance = null ;
- private HashMap urls = new HashMap() ;
-
-
- InlineJavaClassLoader(URL u){
- super(new URL [] {u}) ;
- instance = this ;
- }
-
-
- public static void AddPath(URL u){
- if (instance.urls.get(u) != null){
- instance.urls.put(u, "1") ;
- instance.addURL(u) ;
- }
- }
-
-
- public static void main(String[] argv) {
- String path = argv[0] ;
- File p = new File(path) ;
-
- try {
- InlineJavaClassLoader cl =
- new InlineJavaClassLoader(p.toURL()) ;
- Class sc = Class.forName("InlineJavaServer", true, cl) ;
- Constructor c = sc.getConstructor(
- new Class [] {argv.getClass()}) ;
- c.newInstance(new Object [] {argv}) ;
- }
- catch (MalformedURLException me){
- System.err.println("Invalid classpath entry '" + path + "': " +
- me.getMessage()) ;
- System.err.flush() ;
- }
- catch (Exception e){
- System.err.println("Problem (" + e.getClass().getName() +
- ") loading InlineJavaServer class: " +
- e.getMessage()) ;
- System.err.flush() ;
- }
- }
-
-
- public static InlineJavaServer jni_main(int debug) {
- return new InlineJavaServer(debug) ;
- }
-}
--
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