[armedbear-cvs] r12580 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Sat Apr  3 18:39:04 2010
New Revision: 12580

Log:
Remove an exception block which can't be triggered.

Modified:
   trunk/abcl/src/org/armedbear/lisp/LispCharacter.java

Modified: trunk/abcl/src/org/armedbear/lisp/LispCharacter.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/LispCharacter.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/LispCharacter.java	Sat Apr  3 18:39:04 2010
@@ -63,14 +63,7 @@
   private String name;
   public static LispCharacter getInstance(char c)
   {
-    try
-      {
-        return lispChars.get(c);
-      }
-    catch (ArrayIndexOutOfBoundsException e)
-      {
-        return new LispCharacter(c);
-      }
+    return lispChars.get(c);
   }
 
   // This needs to be public for the compiler.
@@ -185,8 +178,8 @@
   }
 
   public static char getValue(LispObject obj)
-  {       
-          if (obj instanceof LispCharacter)
+  {
+      if (obj instanceof LispCharacter)
         return ((LispCharacter)obj).value;
       type_error(obj, Symbol.CHARACTER);
         // Not reached.