diff options
| author | Andreas Schwab | 2007-02-16 13:18:29 +0000 |
|---|---|---|
| committer | Andreas Schwab | 2007-02-16 13:18:29 +0000 |
| commit | cb06e57015e38dbaff0904762a8cd728a6cd1275 (patch) | |
| tree | c5162ee79472c547d16be219d2552d71335c786e /src | |
| parent | 51ce60a78cced475b0afc0d86804f013e9401633 (diff) | |
| download | emacs-cb06e57015e38dbaff0904762a8cd728a6cd1275.tar.gz emacs-cb06e57015e38dbaff0904762a8cd728a6cd1275.zip | |
(Fformat): Add support for '+' flag.
Diffstat (limited to 'src')
| -rw-r--r-- | src/editfns.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/editfns.c b/src/editfns.c index 6ef2efe313e..5053119d0c4 100644 --- a/src/editfns.c +++ b/src/editfns.c | |||
| @@ -3396,7 +3396,7 @@ Use %% to put a single % into the output. | |||
| 3396 | 3396 | ||
| 3397 | The basic structure of a %-sequence is | 3397 | The basic structure of a %-sequence is |
| 3398 | % <flags> <width> <precision> character | 3398 | % <flags> <width> <precision> character |
| 3399 | where flags is [- #0]+, width is [0-9]+, and precision is .[0-9]+ | 3399 | where flags is [-+ #0]+, width is [0-9]+, and precision is .[0-9]+ |
| 3400 | 3400 | ||
| 3401 | usage: (format STRING &rest OBJECTS) */) | 3401 | usage: (format STRING &rest OBJECTS) */) |
| 3402 | (nargs, args) | 3402 | (nargs, args) |
| @@ -3509,7 +3509,7 @@ usage: (format STRING &rest OBJECTS) */) | |||
| 3509 | 3509 | ||
| 3510 | where | 3510 | where |
| 3511 | 3511 | ||
| 3512 | flags ::= [- #0]+ | 3512 | flags ::= [-+ #0]+ |
| 3513 | field-width ::= [0-9]+ | 3513 | field-width ::= [0-9]+ |
| 3514 | precision ::= '.' [0-9]* | 3514 | precision ::= '.' [0-9]* |
| 3515 | 3515 | ||
| @@ -3523,7 +3523,7 @@ usage: (format STRING &rest OBJECTS) */) | |||
| 3523 | 3523 | ||
| 3524 | while (format != end | 3524 | while (format != end |
| 3525 | && (*format == '-' || *format == '0' || *format == '#' | 3525 | && (*format == '-' || *format == '0' || *format == '#' |
| 3526 | || * format == ' ')) | 3526 | || * format == ' ' || *format == '+')) |
| 3527 | ++format; | 3527 | ++format; |
| 3528 | 3528 | ||
| 3529 | if (*format >= '0' && *format <= '9') | 3529 | if (*format >= '0' && *format <= '9') |
| @@ -3700,7 +3700,7 @@ usage: (format STRING &rest OBJECTS) */) | |||
| 3700 | discarded[format - format_start] = 1; | 3700 | discarded[format - format_start] = 1; |
| 3701 | format++; | 3701 | format++; |
| 3702 | 3702 | ||
| 3703 | while (index("-0# ", *format)) | 3703 | while (index("-+0# ", *format)) |
| 3704 | { | 3704 | { |
| 3705 | if (*format == '-') | 3705 | if (*format == '-') |
| 3706 | { | 3706 | { |