From 9c5dfa18ed809e0cca090ecb7a1a8f0e3301c053 Mon Sep 17 00:00:00 2001 From: Philipp Haller Date: Tue, 15 Mar 2011 16:42:00 +0000 Subject: Closes #3838. Review by prokopec. --- src/actors/scala/actors/Actor.scala | 27 +++++++++++++++------------ test/files/jvm/t3838.check | 1 + test/files/jvm/t3838.scala | 15 +++++++++++++++ 3 files changed, 31 insertions(+), 12 deletions(-) create mode 100644 test/files/jvm/t3838.check create mode 100644 test/files/jvm/t3838.scala diff --git a/src/actors/scala/actors/Actor.scala b/src/actors/scala/actors/Actor.scala index 98f5d2287f..059ab3abf7 100644 --- a/src/actors/scala/actors/Actor.scala +++ b/src/actors/scala/actors/Actor.scala @@ -589,18 +589,21 @@ trait Actor extends AbstractActor with ReplyReactor with ActorCanReply with Inpu done = true receiveTimeout } else { - waitingFor = f - received = None - isSuspended = true - val thisActor = this - onTimeout = Some(new TimerTask { - def run() { thisActor.send(TIMEOUT, thisActor) } - }) - Actor.timer.schedule(onTimeout.get, msec) - scheduler.managedBlock(blocker) - drainSendBuffer(mailbox) - // keep going - () => {} + if (onTimeout.isEmpty) { + waitingFor = f + received = None + isSuspended = true + val thisActor = this + onTimeout = Some(new TimerTask { + def run() { thisActor.send(TIMEOUT, thisActor) } + }) + Actor.timer.schedule(onTimeout.get, msec) + scheduler.managedBlock(blocker) + drainSendBuffer(mailbox) + // keep going + () => {} + } else + sys.error("unhandled timeout") } } todo() diff --git a/test/files/jvm/t3838.check b/test/files/jvm/t3838.check new file mode 100644 index 0000000000..154227a350 --- /dev/null +++ b/test/files/jvm/t3838.check @@ -0,0 +1 @@ +caught java.lang.RuntimeException: unhandled timeout diff --git a/test/files/jvm/t3838.scala b/test/files/jvm/t3838.scala new file mode 100644 index 0000000000..ba8f15fc31 --- /dev/null +++ b/test/files/jvm/t3838.scala @@ -0,0 +1,15 @@ +import scala.actors.Actor._ + +object Test { + def main(args: Array[String]) { + actor { + try { + receiveWithin(1) { + case str: String => println(str) + } + } catch { + case e: Exception => println("caught "+e) + } + } + } +} -- cgit v1.2.3