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

[Erik Huelsmann]

Author: ehuelsmann
Date: Wed Jul 29 05:15:14 2009
New Revision: 12074

Log:
Run the profiler scheduling thread at maximum priority.

Required to make the profiler work on Windows.


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

Modified: trunk/abcl/src/org/armedbear/lisp/Profiler.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Profiler.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Profiler.java	Wed Jul 29 05:15:14 2009
@@ -106,10 +106,9 @@
                     sleep = Fixnum.getValue(second);
                     thread.resetStack();
                     Thread t = new Thread(profilerRunnable);
-                    int priority =
-                        Math.min(Thread.currentThread().getPriority() + 1,
-                                 Thread.MAX_PRIORITY);
-                    t.setPriority(priority);
+                    // Maximum priority doesn't hurt:
+                    // we're sleeping all the time anyway
+                    t.setPriority(Thread.MAX_PRIORITY);
                     new Thread(profilerRunnable).start();
                 }
                 out._writeLine("; Profiler started.");