Funny bomb test on scala lazy

lazy_bomb_test.scala

sealed trait BombLike {
  def power : Int
  def name : String
}

case class Bomb(power : Int, name : String) extends BombLike {
  println("Explosion!")
}

case object Clock extends BombLike {
  override def power : Int = 0
  override def name : String = "clock"
  println("Alarm!")
}

def process(a : => Option[BombLike]) : Unit = {
  printWhat {
    a match {
      case Some(bl) => bl
      case None => Clock
    }
  }
}

def printWhat(a : => BombLike) : Unit = {
  println(runInSafe(a))
}

def runInSafe(bl : => BombLike) : String = {
  println("Start of safe zone")
  val result = s"${bl.name} of power ${bl.power}"
  println("End of safe zone")
  result
}

process(Some(Bomb(100500, "Little bomb")))

Вопросы:

1. Что произойдет: взрыв или сигнал будильника?
2. Сколько раз произойдет это событие? Почему?
3. Событие произойдет в безопасной зоне или вне ее? Почему?
4. Как переписать код так, чтоб событие произошло ровно один раз, но при этом осталось в безопасной зоне?