Smalltalk.st
changeset 1553 983c16ee1aab
parent 1552 58af83d72fd2
child 1562 850a88ecff97
--- a/Smalltalk.st	Tue Jul 16 12:02:10 1996 +0200
+++ b/Smalltalk.st	Tue Jul 16 12:08:59 1996 +0200
@@ -3078,9 +3078,9 @@
      (to further identify the version in case of errors)"
 
 %{  /* NOCONTEXT */
-    extern char *__getRel();
-
-    RETURN (__MKSTRING(__getRel() COMMA_SND));
+    extern OBJ __getRel();
+
+    RETURN (__getRel());
 %}
 
     "
@@ -3165,5 +3165,5 @@
 !Smalltalk  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.151 1996-07-16 10:02:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.152 1996-07-16 10:08:59 cg Exp $'
 ! !