Browse Source

* typo fix in last commit.

marcoonthegit 3 years ago
parent
commit
dcb3906741
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/win/wininc/struct.inc

+ 1 - 1
rtl/win/wininc/struct.inc

@@ -9669,7 +9669,7 @@ type
 
 
   procedure set_fDsrHold(var a : COMSTAT; __fDsrHold : DWORD);
   procedure set_fDsrHold(var a : COMSTAT; __fDsrHold : DWORD);
     begin
     begin
-       a.flag0:=b(a.flag0 and not bm_COMSTAT_fDsrHold) or ((__fDsrHold shl bp_COMSTAT_fDsrHold) and bm_COMSTAT_fDsrHold);
+       a.flag0:=(a.flag0 and not bm_COMSTAT_fDsrHold) or ((__fDsrHold shl bp_COMSTAT_fDsrHold) and bm_COMSTAT_fDsrHold);
     end;
     end;
 
 
   function fRlsdHold(var a : COMSTAT) : DWORD;
   function fRlsdHold(var a : COMSTAT) : DWORD;