--- a/String.st Tue Nov 11 12:20:45 2003 +0100
+++ b/String.st Tue Nov 11 14:16:57 2003 +0100
@@ -2633,7 +2633,7 @@
!
printfPrintString:formatString
- "non-portable but sometimes useful.
+ "non-standard but sometimes useful.
Return a printed representation of the receiver as specified by formatString,
which is defined by printf.
No checking on buffer overrun is done; the resulting string may not
@@ -2647,26 +2647,26 @@
OBJ s;
if (__isString(formatString)) {
- /*
- * actually only needed on sparc: since thisContext is
- * in a global register, which gets destroyed by printf,
- * manually save it here - very stupid ...
- */
-
- cp = (char *)__stringVal(self);
- if (__qClass(self) != String)
- cp += __OBJS2BYTES__(__intVal(__ClassInstPtr(__qClass(self))->c_ninstvars));
-
- __BEGIN_PROTECT_REGISTERS__
-
- sprintf(buffer, (char *)__stringVal(formatString), cp);
-
- __END_PROTECT_REGISTERS__
-
- s = __MKSTRING(buffer COMMA_SND);
- if (s != nil) {
- RETURN (s);
- }
+ /*
+ * actually only needed on sparc: since thisContext is
+ * in a global register, which gets destroyed by printf,
+ * manually save it here - very stupid ...
+ */
+
+ cp = (char *)__stringVal(self);
+ if (__qClass(self) != String)
+ cp += __OBJS2BYTES__(__intVal(__ClassInstPtr(__qClass(self))->c_ninstvars));
+
+ __BEGIN_PROTECT_REGISTERS__
+
+ sprintf(buffer, (char *)__stringVal(formatString), cp);
+
+ __END_PROTECT_REGISTERS__
+
+ s = __MKSTRING(buffer COMMA_SND);
+ if (s != nil) {
+ RETURN (s);
+ }
}
%}.
self primitiveFailed
@@ -3152,5 +3152,5 @@
!String class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.187 2003-10-23 15:44:24 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.188 2003-11-11 13:16:24 cg Exp $'
! !