src/Pure/Concurrent/counter.scala

make double sure that buffer.lineSeparator is well-defined: prevent a situation where $JEDIT_SETTINGS/properties would contain "buffer.lineSeparator=" and new-file would lead to a buffer with empty lineSeparator, and save would produce just one line;

/*  Title:      Pure/Concurrent/counter.scala
    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 > Long.MinValue, "counter overflow")
    count -= 1
    count
  }

  override def toString: String = count.toString
}