src/Pure/Concurrent/counter.scala
author wenzelm
Wed, 12 Aug 2015 13:53:51 +0200
changeset 60916 a6e2a667b0a8
parent 56685 535d59d4ed12
child 64370 865b39487b5d
permissions -rw-r--r--
resolve undefined blobs by default, e.g. relevant for ML debugger to avoid reset of breakpoints after reload;

/*  Title:      Pure/Concurrent/counter.scala
    Module:     PIDE
    Author:     Makarius

Synchronized counter for unique identifiers < 0.

NB: ML ticks forwards, JVM ticks backwards.
*/

package isabelle


object Counter
{
  type ID = Long
  def make(): Counter = new Counter
}

final class Counter private
{
  private var count: Counter.ID = 0

  def apply(): Counter.ID = synchronized {
    require(count > java.lang.Long.MIN_VALUE)
    count -= 1
    count
  }

  override def toString: String = count.toString
}