[armedbear-cvs] r12077 - trunk/abcl/src/org/armedbear/lisp
Erik Huelsmann
ehuelsmann at common-lisp.net
Wed Jul 29 19:56:42 UTC 2009
Author: ehuelsmann
Date: Wed Jul 29 15:56:39 2009
New Revision: 12077
Log:
Profiler efficiency: sampleNow only ever takes on a 'true'
value if both 'profiling' and 'sampling' are true -->
no need to check for the other 2 conditionals.
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 Wed Jul 29 15:56:39 2009
@@ -556,10 +556,8 @@
private void doProfiling()
throws ConditionThrowable
{
- if (profiling && sampling) {
- if (sampleNow)
- Profiler.sample(this);
- }
+ if (sampleNow)
+ Profiler.sample(this);
}
public final void pushStackFrame(LispObject operator)
More information about the armedbear-cvs
mailing list