X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=blobdiff_plain;f=Upper.xs;h=c2036cce24e91c10f65fee5a780693e95f5cbcb0;hp=3ba3348b7edc058e80ca3314acbfd7698c8c59c2;hb=5d014d3d078c8343471064da26a253cef6e81b42;hpb=44a4cbe3d261efdc74b24dc6ea56922c9b57096d

diff --git a/Upper.xs b/Upper.xs
index 3ba3348..c2036cc 100644
--- a/Upper.xs
+++ b/Upper.xs
@@ -1143,9 +1143,9 @@ static I32 su_init(pTHX_ void *ud, I32 cxix, I32 size) {
   * by the smallest multiple of SU_SAVE_PLACEHOLDER_SIZE greater or equal to
   * max(SU_SAVE_DESTRUCTOR_SIZE, size). */
 
- if (size <= SU_SAVE_DESTRUCTOR_SIZE)
+ if (size <= SU_SAVE_DESTRUCTOR_SIZE) {
   pad = 0;
- else {
+ } else {
   I32 extra = size - SU_SAVE_DESTRUCTOR_SIZE;
   pad = extra / SU_SAVE_PLACEHOLDER_SIZE;
   if (extra % SU_SAVE_PLACEHOLDER_SIZE)