* fixed class cast error

git-svn-id: branches/objc@13737 -

compiler/symtable.pas

@@ -633,7 +633,8 @@ implementation
                  ) and
                  { don't complain about alias for hidden _cmd parameter to
                    obj-c methods }
-                 not (vo_is_msgsel in tabstractvarsym(sym).varoptions) then
+                 not((tsym(sym).typ in [localvarsym,paravarsym]) and
+                     (vo_is_msgsel in tabstractvarsym(sym).varoptions)) then
                 MessagePos2(tsym(sym).fileinfo,sym_h_local_symbol_not_used,SymTypeName[tsym(sym).typ],tsym(sym).prettyname);
             end;
           end;