summaryrefslogtreecommitdiff
path: root/util/check-format.pl
diff options
context:
space:
mode:
authorDr. David von Oheimb <David.von.Oheimb@siemens.com>2022-01-06 22:54:20 +0100
committerPauli <ppzgs1@gmail.com>2022-01-09 13:19:52 +1100
commitd45c0e1a5e89f01d83f6059c788524e901a11604 (patch)
treef6be7ef567299d748e8686391deae50cc102ca3e /util/check-format.pl
parent15ae69fa7bc0f367edded19bc48e6d9a5ce8d547 (diff)
downloadopenssl-new-d45c0e1a5e89f01d83f6059c788524e901a11604.tar.gz
check-format.pl: Fix report on missing space before +/-: allow, e.g., '1e-6'
Reviewed-by: Paul Dale <pauli@openssl.org> (Merged from https://github.com/openssl/openssl/pull/17434)
Diffstat (limited to 'util/check-format.pl')
-rwxr-xr-xutil/check-format.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/util/check-format.pl b/util/check-format.pl
index 8861b2bd8a..836fe30fa9 100755
--- a/util/check-format.pl
+++ b/util/check-format.pl
@@ -691,8 +691,8 @@ while (<>) { # loop over all lines of all input files
report("no space before '=' or '<op>='") if $intra_line =~ m/\S(=)/; # '=' etc. without preceding space
report("no space before '$1'") if $intra_line =~ m/\S([|\/%<>^\?])/; # |/%<>^? without preceding space
# TODO ternary ':' without preceding SPC, while allowing no SPC before ':' after 'case'
- report("no space before binary '$1'") if $intra_line =~ m/[^\s{()\[]([+\-])/;# +/- without preceding space or {()[
- # or ')' (which is used f type casts)
+ report("no space before binary '$2'") if $intra_line =~ m/([^\s{()\[e])([+\-])/; # '+'/'-' without preceding space or {()[e
+ # ')' may be used for type casts or before "->", 'e' may be used for numerical literals such as "1e-6"
report("no space before binary '$1'") if $intra_line =~ m/[^\s{()\[*!]([*])/; # '*' without preceding space or {()[*!
report("no space before binary '$1'") if $intra_line =~ m/[^\s{()\[]([&])/; # '&' without preceding space or {()[
report("no space after ternary '$1'") if $intra_line =~ m/(:)[^\s\d]/; # ':' without following space or digit