# ludic.character/fact_pool.ludic - the facts' records made at the start (CHARACTERFACTS of them) with a free list
# of room for all, so a frame holding a new peak of facts makes nothing until that many are held
const CHR_FACTS: int = 64

function chr_fpool_new() -> []CharacterFact {
  let l = new []CharacterFact
  for i in 0 .. CHR_FACTS { push(l, new CharacterFact) }
  return l
}
function chr_ffree_new() -> []CharacterFact {
  let l = chr_fpool_new()
  List.clear(l)
  return l
}