* if a variant is read/written, include the variants unit

git-svn-id: trunk@47459 -
(cherry picked from commit bcdfd07bdd1cf31d609bc0fed933ad5d83d4114b)

compiler/ninl.pas

@@ -843,7 +843,10 @@ implementation
                   end;
                 end;
               variantdef :
-                name:=procprefixes[do_read]+'variant';
+                begin
+                  name:=procprefixes[do_read]+'variant';
+                  include(current_module.moduleflags,mf_uses_variants);
+                end;
               arraydef :
                 begin
                   if is_chararray(para.left.resultdef) then