: TOKEN_QUERY_SOURCE HEX: 0010 ; inline\r
: TOKEN_ADJUST_DEFAULT HEX: 0080 ; inline\r
: TOKEN_READ STANDARD_RIGHTS_READ TOKEN_QUERY bitor ;\r
-: TOKEN_WRITE STANDARD_RIGHTS_WRITE\r
- TOKEN_ADJUST_PRIVILEGES bitor\r
- TOKEN_ADJUST_GROUPS bitor\r
- TOKEN_ADJUST_DEFAULT bitor ; foldable\r
-: TOKEN_ALL_ACCESS STANDARD_RIGHTS_REQUIRED\r
- TOKEN_ASSIGN_PRIMARY bitor\r
- TOKEN_DUPLICATE bitor\r
- TOKEN_IMPERSONATE bitor\r
- TOKEN_QUERY bitor\r
- TOKEN_QUERY_SOURCE bitor\r
- TOKEN_ADJUST_PRIVILEGES bitor\r
- TOKEN_ADJUST_GROUPS bitor\r
- TOKEN_ADJUST_SESSIONID bitor\r
- TOKEN_ADJUST_DEFAULT bitor ; foldable\r
++\r
+: TOKEN_WRITE\r
+ {\r
+ STANDARD_RIGHTS_WRITE\r
+ TOKEN_ADJUST_PRIVILEGES\r
+ TOKEN_ADJUST_GROUPS\r
+ TOKEN_ADJUST_DEFAULT\r
+ } flags ; foldable\r
++\r
+: TOKEN_ALL_ACCESS\r
+ {\r
+ STANDARD_RIGHTS_REQUIRED\r
+ TOKEN_ASSIGN_PRIMARY\r
+ TOKEN_DUPLICATE\r
+ TOKEN_IMPERSONATE\r
+ TOKEN_QUERY\r
+ TOKEN_QUERY_SOURCE\r
+ TOKEN_ADJUST_PRIVILEGES\r
+ TOKEN_ADJUST_GROUPS\r
+ TOKEN_ADJUST_SESSIONID\r
+ TOKEN_ADJUST_DEFAULT\r
+ } flags ; foldable\r
\r
FUNCTION: BOOL OpenProcessToken ( HANDLE ProcessHandle,\r
DWORD DesiredAccess,\r
XCreateColormap ;
: event-mask ( -- n )
++<<<<<<< HEAD:extra/x11/windows/windows.factor
+ {
+ ExposureMask
+ StructureNotifyMask
+ KeyPressMask
+ KeyReleaseMask
+ ButtonPressMask
+ ButtonReleaseMask
+ PointerMotionMask
+ FocusChangeMask
+ EnterWindowMask
+ LeaveWindowMask
+ PropertyChangeMask
+ } flags ;
++=======
+ ExposureMask
+ StructureNotifyMask bitor
+ KeyPressMask bitor
+ KeyReleaseMask bitor
+ ButtonPressMask bitor
+ ButtonReleaseMask bitor
+ PointerMotionMask bitor
+ FocusChangeMask bitor
+ EnterWindowMask bitor
+ LeaveWindowMask bitor
+ PropertyChangeMask bitor ;
++>>>>>>> a05c18152b59073c49aa313ba685516310ec74a8:extra/x11/windows/windows.factor
: window-attributes ( visinfo -- attributes )
"XSetWindowAttributes" <c-object>