X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fwindows%2Fdwmapi%2Fdwmapi.factor;fp=basis%2Fwindows%2Fdwmapi%2Fdwmapi.factor;h=3a688dbad8bb08e933e7649ac7a2e0aa7be9dc4c;hp=86c35a4527d4c2bb57f0a15b8c717cecd49530a3;hb=7ec2ba15ef18bc0a2ec05e075758eb5f315c8a13;hpb=48191c249b8441268c42f1e453c8945bc81db3df

diff --git a/basis/windows/dwmapi/dwmapi.factor b/basis/windows/dwmapi/dwmapi.factor
index 86c35a4527..3a688dbad8 100644
--- a/basis/windows/dwmapi/dwmapi.factor
+++ b/basis/windows/dwmapi/dwmapi.factor
@@ -11,15 +11,14 @@ STRUCT: MARGINS
     { cyTopHeight    int }
     { cyBottomHeight int } ;
 
+C: <MARGINS> MARGINS
+
 STRUCT: DWM_BLURBEHIND
     { dwFlags                DWORD   }
     { fEnable                BOOL    }
     { hRgnBlur               HANDLE  }
     { fTransitionOnMaximized BOOL    } ;
 
-: <MARGINS> ( l r t b -- MARGINS )
-    MARGINS <struct-boa> ; inline
-
 : full-window-margins ( -- MARGINS )
     -1 -1 -1 -1 <MARGINS> ; inline