浏览代码

Improved test for max of sets

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7805 8c9fc860-2736-0410-a75d-ab315db34111
eth.negelef 7 年之前
父节点
当前提交
7cee7ce9c1
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      source/Oberon.Compilation.Test

+ 1 - 1
source/Oberon.Compilation.Test

@@ -5288,7 +5288,7 @@ positive: maximal value of set
 
 	MODULE Test;
 	CONST Result = MAX (SET)
-	BEGIN ASSERT (-{0..Result} = {})
+	BEGIN ASSERT (Result = SIZEOF (SET) * 8 - 1)
 	END Test.
 
 negative: arithmetic shift of constant set