X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fcocoa%2Fwindows%2Fwindows.factor;h=4f18adeedfa78e0f5f6251907d068224ebefb486;hp=a4b1b7f210f5c5bb81188ad8015640029e2b60d1;hb=943596575ad294c074dfa381b70af74dba5992b1;hpb=e738c7206c32bd9b76f3cee31e950835e1b1ee24 diff --git a/basis/cocoa/windows/windows.factor b/basis/cocoa/windows/windows.factor index a4b1b7f210..4f18adeedf 100644 --- a/basis/cocoa/windows/windows.factor +++ b/basis/cocoa/windows/windows.factor @@ -16,7 +16,7 @@ CONSTANT: NSTexturedBackgroundWindowMask 256 CONSTANT: NSUtilityWindowMask 16 CONSTANT: NSDocModalWindowMask 64 CONSTANT: NSNonactivatingPanelMask 128 -CONSTANT: NSHUDWindowMask HEX: 1000 +CONSTANT: NSHUDWindowMask 0x1000 CONSTANT: NSBackingStoreRetained 0 CONSTANT: NSBackingStoreNonretained 1 @@ -27,7 +27,7 @@ CONSTANT: NSBackingStoreBuffered 2 -> initWithContentRect:styleMask:backing:defer: ; : class-for-style ( style -- NSWindow/NSPanel ) - HEX: 1ef0 bitand zero? NSWindow NSPanel ? ; + 0x1ef0 bitand zero? NSWindow NSPanel ? ; : ( view rect style -- window ) dup class-for-style [ swap -> setContentView: ] keep