equal
deleted
inserted
replaced
3740 # define PLATFORM_DEFINE "-DMACOS" |
3740 # define PLATFORM_DEFINE "-DMACOS" |
3741 # endif |
3741 # endif |
3742 # ifdef VMS |
3742 # ifdef VMS |
3743 # define PLATFORM_DEFINE "-DVMS" |
3743 # define PLATFORM_DEFINE "-DVMS" |
3744 # endif |
3744 # endif |
|
3745 # ifdef OSX |
|
3746 # define PLATFORM_DEFINE "-DOSX" |
|
3747 # endif |
3745 # ifndef PLATFORM_DEFINE |
3748 # ifndef PLATFORM_DEFINE |
3746 # define PLATFORM_DEFINE "-DUNIX" |
3749 # define PLATFORM_DEFINE "-DUNIX" |
3747 # endif |
3750 # endif |
3748 #endif |
3751 #endif |
3749 |
3752 |
3937 "return a collection of strings as possibly returned by getPlatformName. |
3940 "return a collection of strings as possibly returned by getPlatformName. |
3938 Should be used instead of getOSType or getSystemType if multiple choice |
3941 Should be used instead of getOSType or getSystemType if multiple choice |
3939 dialogs are presented to the user." |
3942 dialogs are presented to the user." |
3940 |
3943 |
3941 ^#( |
3944 ^#( |
3942 win32 |
3945 win32 |
3943 os2 "/ actually - this is no longer true |
3946 os2 "/ actually - this is no longer true (OS/2 not supported) |
3944 macos "/ actually - this is no longer true |
3947 macos "/ actually - this is no longer true (old MACOS not supported) |
3945 vms "/ actually - this is no longer true |
3948 vms "/ actually - this is no longer true (VMS not supported) |
3946 beos "/ actually - this was never true |
3949 beos "/ actually - this was never true (beos not supported) |
3947 unix |
3950 osx "/ yes!! it is supported |
|
3951 unix |
3948 ) |
3952 ) |
3949 |
3953 |
3950 " |
3954 " |
3951 OperatingSystem knownPlatformNames |
3955 OperatingSystem knownPlatformNames |
3952 OperatingSystem platformName |
3956 OperatingSystem platformName |
4030 This returns #unix for all unix derivatives. |
4034 This returns #unix for all unix derivatives. |
4031 I.e. it is much less specific than getOSType or getSystemType." |
4035 I.e. it is much less specific than getOSType or getSystemType." |
4032 |
4036 |
4033 |os| |
4037 |os| |
4034 |
4038 |
4035 os := self getSystemType. |
4039 os := self getSystemType. |
4036 os = #win32 ifTrue:[ ^ #win32]. |
4040 os = #win32 ifTrue:[ ^ #win32]. |
4037 os = #os2 ifTrue:[ ^ #os2]. |
4041 os = #os2 ifTrue:[ ^ #os2]. |
|
4042 os = #osx ifTrue:[ ^ #osx]. |
4038 os = #macos ifTrue:[ ^ #macos]. |
4043 os = #macos ifTrue:[ ^ #macos]. |
4039 os = #VMS ifTrue:[ ^ #vms]. |
4044 os = #VMS ifTrue:[ ^ #vms]. |
4040 os = #openVMS ifTrue:[ ^ #vms]. |
4045 os = #openVMS ifTrue:[ ^ #vms]. |
4041 ^ #unix |
4046 ^ #unix |
4042 |
4047 |
7271 ! ! |
7276 ! ! |
7272 |
7277 |
7273 !AbstractOperatingSystem class methodsFor:'documentation'! |
7278 !AbstractOperatingSystem class methodsFor:'documentation'! |
7274 |
7279 |
7275 version |
7280 version |
7276 ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.248 2014-01-28 19:37:53 stefan Exp $' |
7281 ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.249 2014-02-25 13:48:43 cg Exp $' |
7277 ! |
7282 ! |
7278 |
7283 |
7279 version_CVS |
7284 version_CVS |
7280 ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.248 2014-01-28 19:37:53 stefan Exp $' |
7285 ^ '$Header: /cvs/stx/stx/libbasic/AbstractOperatingSystem.st,v 1.249 2014-02-25 13:48:43 cg Exp $' |
7281 ! ! |
7286 ! ! |
7282 |
7287 |
7283 |
7288 |
7284 AbstractOperatingSystem initialize! |
7289 AbstractOperatingSystem initialize! |