Browse Source

* put multiple statements of the else-part of case between begin..end

git-svn-id: trunk@35152 -
Jonas Maebe 8 years ago
parent
commit
691c2d655e
1 changed files with 4 additions and 2 deletions
  1. 4 2
      compiler/ncgrtti.pas

+ 4 - 2
compiler/ncgrtti.pas

@@ -657,8 +657,10 @@ implementation
                   tcb.emit_ord_const(def.high.svalue,s64inttype);
                 end;
               else
-                tcb.emit_ord_const(longint(def.low.svalue),s32inttype);
-                tcb.emit_ord_const(longint(def.high.svalue),s32inttype);
+                begin
+                  tcb.emit_ord_const(longint(def.low.svalue),s32inttype);
+                  tcb.emit_ord_const(longint(def.high.svalue),s32inttype);
+                end;
             end;
             tcb.end_anonymous_record;
             tcb.end_anonymous_record;