This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
0bda300
)
utf8.c: White space only
author
Karl Williamson
<public@khwilliamson.com>
Wed, 28 Sep 2011 02:25:42 +0000
(20:25 -0600)
committer
Karl Williamson
<public@khwilliamson.com>
Sat, 1 Oct 2011 15:15:32 +0000
(09:15 -0600)
This indents a block of code to match being in a newly created block
utf8.c
patch
|
blob
|
blame
|
history
diff --git
a/utf8.c
b/utf8.c
index
b8a5227
..
7763e82
100644
(file)
--- a/
utf8.c
+++ b/
utf8.c
@@
-2489,11
+2489,11
@@
S_swash_get(pTHX_ SV* swash, UV start, UV span)
* in small powers of 2, this should be a valid assumption */
assert(start + span - 1 <= PERL_UNICODE_MAX);
- send = s + scur;
- while (s < send) {
- *s = ~(*s);
- s++;
- }
+
send = s + scur;
+
while (s < send) {
+
*s = ~(*s);
+
s++;
+
}
}
}