* TSearchRec - > TRawByteSearchRec to avoid conversion warnings killing the compiler

git-svn-id: branches/unicode@24751 -

compiler/assemble.pas

@@ -295,7 +295,7 @@ Implementation
 
         procedure DeleteFilesWithExt(const AExt:string);
         var
-          dir : TSearchRec;
+          dir : TRawByteSearchRec;
         begin
           if findfirst(s+source_info.dirsep+'*'+AExt,faAnyFile,dir) = 0 then
             begin