--- a/Smalltalk.st Tue May 08 13:09:57 2018 +0200
+++ b/Smalltalk.st Tue May 08 20:01:24 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1988 by Claus Gittinger
All Rights Reserved
@@ -3804,8 +3802,11 @@
isSmalltalkX
"is this a Smalltalk/X system ?
Return true here - this may be useful to write portable
- applications - add #isSmalltalkX to your other smalltalks,
- returning false there."
+ applications.
+ Add #isSmalltalkX to your other smalltalks, returning false there.
+ Notice: the ST/X compilers know about this, and inline the code
+ (not generating code for the false branch).
+ So in ST/X, this check costs you absolutely nothing."
^ true
!
@@ -8809,13 +8810,13 @@
(lang == #de) ifTrue:[
proto := 'Willkommen bei %1 (%4Version %2 von %3)'. bit := 'Bit'.
] ifFalse:[ (lang == #fr) ifTrue:[
- proto := 'Salut, Bienvenue à%1 (%4version %2 de %3)'
+ proto := 'Salut, Bienvenue à %1 (%4version %2 de %3)'
] ifFalse:[ (lang == #it) ifTrue:[
proto := 'Ciao, benvenuto al %1 (%4versione %2 di %3)'
] ifFalse:[ (lang == #es) ifTrue:[
proto := 'Hola, bienvenida a %1 (%4version %2 de %3)'
] ifFalse:[ (lang == #pt) ifTrue:[
- proto := 'Olá!!, mem-vindo a %1 (%4version %2 de %3)'
+ proto := 'Olá!!, mem-vindo a %1 (%4version %2 de %3)'
] ifFalse:[ (lang == #no) ifTrue:[
proto := 'Hei, verdenmottakelse til %1 (%4versjon %2 av %3)'
]]]]]].