[armedbear-cvs] r13213 - in trunk/abcl: . src/org/armedbear/lisp

[Alessio Stalla]

Author: astalla
Date: Fri Feb 11 18:06:24 2011
New Revision: 13213

Log:
Added Maven POM for deployment. Fixed a primitive class name in Java.java.


Added:
   trunk/abcl/pom.xml
Modified:
   trunk/abcl/src/org/armedbear/lisp/Java.java

Added: trunk/abcl/pom.xml
==============================================================================
--- (empty file)
+++ trunk/abcl/pom.xml	Fri Feb 11 18:06:24 2011
@@ -0,0 +1,58 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<project
+   xsi:schemaLocation="http://maven.apache.org/POM/4.0.0 http://maven.apache.org/xsd/maven-4.0.0.xsd"
+   xmlns="http://maven.apache.org/POM/4.0.0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+
+  <!-- NOT USABLE FOR BUILDS, only for installing into a repository! -->
+
+  <modelVersion>4.0.0</modelVersion>
+  <parent>
+    <groupId>org.sonatype.oss</groupId>
+    <artifactId>oss-parent</artifactId>
+    <version>6</version>
+  </parent>
+  <groupId>org.armedbear.lisp</groupId>
+  <artifactId>abcl</artifactId>
+  <packaging>jar</packaging>
+  <name>ABCL - Armed Bear Common Lisp</name>
+  <version>0.24.0</version>
+  <description>Common Lisp implementation running on the JVM</description>
+  <url>http://common-lisp/project/armedbear</url>
+  <licenses>
+    <license>
+      <name>GNU General Public License with Classpath exception</name>
+      <url>http://www.gnu.org/software/classpath/license.html</url>
+      <distribution>repo</distribution>
+    </license>
+  </licenses>
+  <scm>
+    <connection>scm:svn:svn://common-lisp.net/project/armedbear/svn/trunk/</connection>
+    <developerConnection>scm:svn:svn+ssh://common-lisp.net/project/armedbear/svn/trunk/</developerConnection>
+    <url>http://common-lisp.net/websvn/listing.php?repname=armedbear</url>
+  </scm>
+  <developers>
+    <developer>
+      <id>ehu</id>
+      <name>Erik Huelsmann</name>
+      <email>ehuels at gmail.com</email>
+    </developer>
+    <developer>
+      <id>easyE</id>
+      <name>Mark Evenson</name>
+      <email>evenson at panix.com</email>
+    </developer>
+    <developer>
+      <id>V-ille</id>
+      <name>Ville Voutilainen</name>
+      <email>ville.voutilainen at gmail.com</email>
+    </developer>
+    <developer>
+      <id>astalla</id>
+      <name>Alessio Stalla</name>
+      <email>alessiostalla at gmail.com</email>
+    </developer>
+  </developers>
+
+
+  <dependencies />
+</project>

Modified: trunk/abcl/src/org/armedbear/lisp/Java.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Java.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Java.java	Fri Feb 11 18:06:24 2011
@@ -1207,13 +1207,13 @@
         }
     };
 
-    private static final Primitive JRUN_EXCEPTION_PROTECTED = new pf_jrun_exception_protection();
+    private static final Primitive JRUN_EXCEPTION_PROTECTED = new pf_jrun_exception_protected();
     @DocString(name="jrun-exception-protected", args="closure",
     doc="Invokes the function CLOSURE and returns the result.  "+
         "Signals an error if stack or heap exhaustion occurs.")
-    private static final class pf_jrun_exception_protection extends Primitive
+    private static final class pf_jrun_exception_protected extends Primitive
     {
-        pf_jrun_exception_protection()
+        pf_jrun_exception_protected()
         {
             super("jrun-exception-protected", PACKAGE_JAVA, true);
         }
@@ -1229,6 +1229,7 @@
                 return error(new StorageCondition("Out of memory " + oom.getMessage()));
             }
             catch (StackOverflowError oos) {
+                oos.printStackTrace();
                 return error(new StorageCondition("Stack overflow."));
             }
         }