Explorar o código

Fixed shift by 64

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7902 8c9fc860-2736-0410-a75d-ab315db34111
negelef %!s(int64=7) %!d(string=hai) anos
pai
achega
05e0c0bb77
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      source/Oberon.Compilation.Test

+ 1 - 1
source/Oberon.Compilation.Test

@@ -39465,7 +39465,7 @@ positive: tests of MIN and MAX
 	    ASSERT(0 = MIN(UNSIGNED8)); ASSERT(255 = MAX(UNSIGNED8));
 	    ASSERT(0 = MIN(UNSIGNED16)); ASSERT(65535 = MAX(UNSIGNED16));
 	    ASSERT(0 = MIN(UNSIGNED32)); ASSERT(4294967295 = MAX(UNSIGNED32));
-	    ASSERT(0 = MIN(UNSIGNED64)); ASSERT(LSH(1,64)-1 = MAX(UNSIGNED64));
+	    ASSERT(0 = MIN(UNSIGNED64)); ASSERT(SIGNED64(-1) = MAX(UNSIGNED64));
 	END TestMinMax;
 
 	BEGIN