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

Mark Evenson mevenson at common-lisp.net
Tue Dec 28 21:00:50 UTC 2010


Author: mevenson
Date: Tue Dec 28 16:00:49 2010
New Revision: 13109

Log:
Remove the deprecated and dangerously non-functional getStack()/setStack() methods.

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

Modified: trunk/abcl/src/org/armedbear/lisp/LispThread.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/LispThread.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/LispThread.java	Tue Dec 28 16:00:49 2010
@@ -512,24 +512,12 @@
 
     private StackFrame stack = null;
 
-    @Deprecated
-    public LispObject getStack()
+   public final void pushStackFrame(StackFrame frame)
     {
-        return NIL;
+        frame.setNext(stack);
+        stack = frame;
     }
 
-    @Deprecated
-    public void setStack(LispObject stack)
-    {
-    }
-
-    public final void pushStackFrame(StackFrame frame)
-    {
-	frame.setNext(stack);
-	stack = frame;
-    }
-
-
     public final void popStackFrame()
     {
         if (stack != null)




More information about the armedbear-cvs mailing list