removed warnings for unused parameters

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

source/FoxSemanticChecker.Mod

@@ -8374,7 +8374,9 @@ TYPE
 		PROCEDURE Symbol(x: SyntaxTree.Symbol);
 		BEGIN
 			IF ~x.used & (x.access * SyntaxTree.Public = {}) & (x.access # SyntaxTree.Hidden) THEN
-				Warning(x,"never used");
+				IF ~(x IS SyntaxTree.Parameter) THEN
+					Warning(x,"never used");
+				END;
 			END;
 			x.Accept(SELF);
 		END Symbol;