--- a/Smalltalk.st	Fri May 11 09:56:22 2018 +0200
+++ b/Smalltalk.st	Fri May 11 09:56:43 2018 +0200
@@ -8781,11 +8781,11 @@
     "return a full version string"
 
     ^ 'Smalltalk/X release %1%2 of %3'
-	bindWith:(self versionString)
-	with:((ExternalAddress pointerSize == 8)
-			ifTrue:[' (64bit)']
-			ifFalse:[''])
-	with:(self versionDate)
+        bindWith:(self versionString)
+        with:((ExternalBytes sizeofPointer == 8)
+                        ifTrue:[' (64bit)']
+                        ifFalse:[''])
+        with:(self versionDate)
 
     "
      Smalltalk fullVersionString
@@ -8810,34 +8810,34 @@
     bit := 'bit'.
 
     (lang == #de) ifTrue:[
-	proto := 'Willkommen bei %1 (%4Version %2 von %3)'. bit := 'Bit'.
+        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)'
+        proto := 'Ciao, benvenuto al %1 (%4versione %2 di %3)'
     ] ifFalse:[ (lang == #es) ifTrue:[
-	proto := 'Hola, bienvenida a %1 (%4version %2 de %3)'
+        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)'
+        proto := 'Hei, verdenmottakelse til %1 (%4versjon %2 av %3)'
     ]]]]]].
 
     "/ ... more needed here ...
 
     proto isNil ifTrue:[
-	proto := 'Hello World - welcome to %1 (%4version %2 of %3)'.
-    ].
-    ExternalAddress pointerSize ~~ 4 ifTrue:[
-	bitsPerWordString := (ExternalAddress pointerSize * 8) printString,bit,' '.
+        proto := 'Hello World - welcome to %1 (%4version %2 of %3)'.
+    ].
+    ExternalBytes sizeofPointer ~~ 4 ifTrue:[
+        bitsPerWordString := (ExternalBytes sizeofPointer * 8) printString,bit,' '.
     ] ifFalse:[
-	bitsPerWordString := ''
+        bitsPerWordString := ''
     ].
 
     ^ proto bindWith:('SmallTalk/X' allBold)
-		with:(self versionString)
-		with:(self versionDate)
-		with:bitsPerWordString
+                with:(self versionString)
+                with:(self versionDate)
+                with:bitsPerWordString
 
     "
      Smalltalk language:#us.