Explorar o código

* cherry picked commit did not compile, fixing it, resolves #24863

florian %!s(int64=3) %!d(string=hai) anos
pai
achega
d63ad582a7
Modificáronse 1 ficheiros con 3 adicións e 2 borrados
  1. 3 2
      compiler/ninl.pas

+ 3 - 2
compiler/ninl.pas

@@ -131,7 +131,8 @@ implementation
       pass_1,
       pass_1,
       ncal,ncon,ncnv,nadd,nld,nbas,nflw,nmem,nmat,nutils,
       ncal,ncon,ncnv,nadd,nld,nbas,nflw,nmem,nmat,nutils,
       nobjc,objcdef,
       nobjc,objcdef,
-      cgbase,procinfo;
+      cgbase,procinfo,
+      ppu;
 
 
    function geninlinenode(number : tinlinenumber;is_const:boolean;l : tnode) : tinlinenode;
    function geninlinenode(number : tinlinenumber;is_const:boolean;l : tnode) : tinlinenode;
 
 
@@ -845,7 +846,7 @@ implementation
               variantdef :
               variantdef :
                 begin
                 begin
                   name:=procprefixes[do_read]+'variant';
                   name:=procprefixes[do_read]+'variant';
-                  include(current_module.moduleflags,mf_uses_variants);
+                  current_module.flags:=current_module.flags or uf_uses_variants;
                 end;
                 end;
               arraydef :
               arraydef :
                 begin
                 begin