Adjust the test I committed yesterday so that we treat the warning we don't want to reappear as an error.

git-svn-id: trunk@33325 -

tests/tbs/tb0617.pp

@@ -3,6 +3,8 @@
 program tb0617;
 
 {$mode objfpc}
+{ We don't want this warning to occur again }
+{$warn 5059 error}
 
 type
   generic TGenericStructList<T> = class