--- a/Smalltalk.st Sun Oct 29 18:48:44 1995 +0100
+++ b/Smalltalk.st Sun Oct 29 19:08:45 1995 +0100
@@ -26,14 +26,14 @@
COPYRIGHT (c) 1988 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.69 1995-10-28 16:45:10 cg Exp $
+$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.70 1995-10-29 18:08:45 cg Exp $
'!
!Smalltalk class methodsFor:'documentation'!
version
"
-$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.69 1995-10-28 16:45:10 cg Exp $
+$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.70 1995-10-29 18:08:45 cg Exp $
"
!
@@ -2327,7 +2327,7 @@
and represent a stable workable version which got published
to the outside world."
- ^ 7
+ ^ 8
"
Smalltalk revisionNr
@@ -2349,16 +2349,13 @@
!
versionDate
- "return the version date - thats the date when the smalltalk
- executable was linked."
-
+ "return the executables build date - thats the date when the smalltalk
+ executable was built"
%{
-#ifdef VERSIONDATE_STRING
- RETURN ( _MKSTRING(VERSIONDATE_STRING COMMA_SND) );
-#endif
-%}.
- ^ '12-oct-1995'
-
+ extern char *__getBuildDateString();
+
+ RETURN (__MKSTRING(__getBuildDateString() COMMA_SND) );
+%}
"
Smalltalk versionDate
"