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

Erik Huelsmann ehuelsmann at common-lisp.net
Mon Dec 28 23:12:35 UTC 2009


Author: ehuelsmann
Date: Mon Dec 28 18:12:34 2009
New Revision: 12312

Log:
Add a function interface to test whether the interpreter
 is already initialized.

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

Modified: trunk/abcl/src/org/armedbear/lisp/Interpreter.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Interpreter.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Interpreter.java	Mon Dec 28 18:12:34 2009
@@ -121,6 +121,10 @@
         return interpreter;
     }
 
+    public static boolean initialized() {
+        return interpreter != null;
+    }
+
     private Interpreter()
     {
         jlisp = false;




More information about the armedbear-cvs mailing list