* hack for making threadvr.inc compile on i8086

git-svn-id: branches/i8086@23863 -

rtl/inc/threadvr.inc

@@ -29,7 +29,7 @@ type
 
   TltvInitTablesTable = packed record
     count  : dword;
-    tables : packed array [1..32767] of pltvInitEntry;
+    tables : packed array [1..{$ifdef cpu16}16{$else}32767{$endif}] of pltvInitEntry;
   end;
   PltvInitTablesTable = ^TltvInitTablesTable;