--- a/StandaloneStartup.st Fri Dec 13 14:37:07 2019 +0100
+++ b/StandaloneStartup.st Fri Dec 13 14:49:05 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 2006 by eXept Software AG
All Rights Reserved
@@ -1189,6 +1187,12 @@
] do:[
|idx|
+ idx := Smalltalk commandLineArguments indexOf:#('--version').
+ idx ~~ 0 ifTrue:[
+ Smalltalk versionString _errorPrintCR.
+ Smalltalk exit:0.
+ ].
+
CommandLineArguments := (self additionalArgumentsFromRegistry)
, Smalltalk commandLineArguments.