1 "{ Package: 'stx:libbasic' }"

     2 

     3 SharedPool subclass:#Win32Constants

     4 	instanceVariableNames:''

     5 	classVariableNames:'FILE_ATTRIBUTE_HIDDEN FILE_ATTRIBUTE_NORMAL

     6 		FILE_ATTRIBUTE_TEMPORARY'

     7 	poolDictionaries:''

     8 	category:'OS-Windows'

     9 !

    10 

    11 !Win32Constants class methodsFor:'documentation'!

    12 

    13 documentation

    14 "

    15     contains (will, eventually) win32 OS constants.

    16 "

    17 ! !

    18 

    19 !Win32Constants class methodsFor:'initialization'!

    20 

    21 initialize

    22     "Invoked at system start or when the class is dynamically loaded."

    23 

    24     FILE_ATTRIBUTE_HIDDEN := 2.

    25     FILE_ATTRIBUTE_NORMAL := 128.

    26     FILE_ATTRIBUTE_TEMPORARY := 256.

    27 ! !

    28 

    29 !Win32Constants class methodsFor:'documentation'!

    30 

    31 version_CVS

    32     ^ '$Header: /cvs/stx/stx/libbasic/Win32Constants.st,v 1.1 2009-10-28 13:26:24 cg Exp $'

    33 ! !

    34 

    35 Win32Constants initialize!