added test case

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7591 8c9fc860-2736-0410-a75d-ab315db34111

source/Oberon.Compilation.Test

@@ -39469,4 +39469,13 @@ positive: tests of MIN and MAX
 	END TestMinMax;
 
 	BEGIN
-	END Test.
+	END Test.
+
+negative: conversion float to unsigned data type
+	MODULE Test;
+	VAR real: REAL;
+	VAR unsigned8: UNSIGNED8;
+	BEGIN
+	    unsigned8 := UNSIGNED8(real);
+	END Test.
+