Skip to content

Commit

Permalink
Fix for all but one of the concurrency tests
Browse files Browse the repository at this point in the history
But it shouldn't have made a difference (I don't think)  :-(
  • Loading branch information
lizmat committed Nov 10, 2013
1 parent 00a781f commit d63e0e2
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/vm/jvm/core/ThreadPoolScheduler.pm
Expand Up @@ -65,7 +65,7 @@ my class ThreadPoolScheduler does Scheduler {
if $every {
$!timer.'method/scheduleAtFixedRate/(Ljava/util/TimerTask;JJ)V'(
nqp::jvmbootinterop().proxy(
'java.util.TimerTask', nqp::hash('run', &block)),
'java.util.TimerTask', nqp::hash('run', -> { block() })),
($delay * 1000).Int,
($every * 1000).Int);
}
Expand All @@ -74,7 +74,7 @@ my class ThreadPoolScheduler does Scheduler {
elsif $delay or &catch {
$!timer.'method/schedule/(Ljava/util/TimerTask;J)V'(
nqp::jvmbootinterop().proxy(
'java.util.TimerTask', nqp::hash('run', &block)),
'java.util.TimerTask', nqp::hash('run', -> { block() })),
($delay * 1000).Int);
}

Expand Down

0 comments on commit d63e0e2

Please sign in to comment.