prefix_spec.pony

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
trait val PrefixSpec
  """
  Base trait for all prefix specifiers.
  """

primitive PrefixDefault is PrefixSpec
  """
  No prefix before the formatted value.
  """

primitive PrefixSpace is PrefixSpec
  """
  Use a space as the prefix for positive numbers.
  """

primitive PrefixSign is PrefixSpec
  """
  Use a `+` sign as the prefix for positive numbers.
  """

type PrefixNumber is
  ( PrefixDefault
  | PrefixSpace
  | PrefixSign )