jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

strformat: default for numbers is right alignment

Browse source
This commit is contained in:
Araq 2017-12-17 20:34:32 +01:00
commit 3fc7082887
1 changed files with 13 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/pure/strformat.nim
View file

@ -100,10 +100,11 @@ The optional align flag can be one of the following:
'<' '<'
Forces the field to be left-aligned within the available Forces the field to be left-aligned within the available
space (This is the default.) space. (This is the default for strings.)
'>' '>'
Forces the field to be right-aligned within the available space. Forces the field to be right-aligned within the available space.
(This is the default for numbers.)
'^' '^'
Forces the field to be centered within the available space. Forces the field to be centered within the available space.
@ -296,9 +297,9 @@ macro fmt*(pattern: string): untyped =
check fmt"{-255:X}", "-FF" check fmt"{-255:X}", "-FF"
check fmt"{255:x} uNaffeCteD CaSe", "ff uNaffeCteD CaSe" check fmt"{255:x} uNaffeCteD CaSe", "ff uNaffeCteD CaSe"
check fmt"{255:X} uNaffeCteD CaSe", "FF uNaffeCteD CaSe" check fmt"{255:X} uNaffeCteD CaSe", "FF uNaffeCteD CaSe"
check fmt"{255:>4x}", " ff" check fmt"{255:4x}", " ff"
check fmt"{255:04x}", "00ff" check fmt"{255:04x}", "00ff"
check fmt"{-255:>4x}", " -ff" check fmt"{-255:4x}", " -ff"
check fmt"{-255:04x}", "-0ff" check fmt"{-255:04x}", "-0ff"
# Float tests # Float tests
@ -410,7 +411,7 @@ proc mkDigit(v: int, typ: char): string {.inline.} =
else: else:
result = $chr(ord(if typ == 'x': 'a' else: 'A') + v - 10) result = $chr(ord(if typ == 'x': 'a' else: 'A') + v - 10)
proc alignString*(s: string, minimumWidth: int; align = '<'; fill = ' '): string = proc alignString*(s: string, minimumWidth: int; align = '\0'; fill = ' '): string =
## Aligns ``s`` using ``fill`` char. ## Aligns ``s`` using ``fill`` char.
## This is only of interest if you want to write a custom ``format`` proc that ## This is only of interest if you want to write a custom ``format`` proc that
## should support the standard format specifiers. ## should support the standard format specifiers.
@ -421,7 +422,7 @@ proc alignString*(s: string, minimumWidth: int; align = '<'; fill = ' '): string
let toFill = minimumWidth - sRuneLen let toFill = minimumWidth - sRuneLen
if toFill <= 0: if toFill <= 0:
result = s result = s
elif align == '<': elif align == '<' or align == '\0':
result = s & repeat(fill, toFill) result = s & repeat(fill, toFill)
elif align == '^': elif align == '^':
let half = toFill div 2 let half = toFill div 2
@ -512,7 +513,7 @@ proc parseStandardFormatSpecifier*(s: string; start = 0;
## an unknown suffix after the ``type`` field is not an error. ## an unknown suffix after the ``type`` field is not an error.
const alignChars = {'<', '>', '^'} const alignChars = {'<', '>', '^'}
result.fill = ' ' result.fill = ' '
result.align = '<' result.align = '\0'
result.sign = '-' result.sign = '-'
var i = start var i = start
if i + 1 < s.len and s[i+1] in alignChars: if i + 1 < s.len and s[i+1] in alignChars:
@ -593,8 +594,10 @@ proc format*(value: SomeReal; specifier: string; res: var string) =
var f = formatBiggestFloat(value, fmode, spec.precision) var f = formatBiggestFloat(value, fmode, spec.precision)
if value >= 0.0 and spec.sign != '-': if value >= 0.0 and spec.sign != '-':
f = spec.sign & f f = spec.sign & f
# the default for numbers is right-alignment:
let align = if spec.align == '\0': '>' else: spec.align
let result = alignString(f, spec.minimumWidth, let result = alignString(f, spec.minimumWidth,
spec.align, spec.fill) align, spec.fill)
if spec.typ in {'A'..'Z'}: if spec.typ in {'A'..'Z'}:
res.add toUpperAscii(result) res.add toUpperAscii(result)
else: else: