Explorar o código

* pass the overflow check flag correctly to the 32 and 16-bit mul helpers (on
i8086 and AVR) according to whether overflow checking is enabled (instead of
always passing 'false')

git-svn-id: trunk@26445 -

nickysn %!s(int64=11) %!d(string=hai) anos
pai
achega
aec73bce68
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/nadd.pas

+ 1 - 1
compiler/nadd.pas

@@ -2933,7 +2933,7 @@ implementation
                          internalerror(2011022301);
                      end;
                      result := ccallnode.createintern(procname,
-                       ccallparanode.create(cordconstnode.create(0,pasbool8type,false),
+                       ccallparanode.create(cordconstnode.create(ord(cs_check_overflow in current_settings.localswitches),pasbool8type,false),
                        ccallparanode.create(right,
                        ccallparanode.create(left,nil))));
                      left := nil;