comment
authorClaus Gittinger <cg@exept.de>
Mon, 25 May 2015 20:37:56 +0200
changeset 18405 140903606af8
parent 18404 ae9230dde5ca
child 18406 eb1c585b6c9b
comment
String.st
--- a/String.st	Mon May 25 14:02:53 2015 +0200
+++ b/String.st	Mon May 25 20:37:56 2015 +0200
@@ -3754,7 +3754,7 @@
 
 %{  /* NOCONTEXT */
 #ifdef __SCHTEAM__
-    return context._RETURN( (STSymbol.asSymbolIfInterned(self.asSTString("[knownAsSymbol]").asString("")) != null) ? True : False );
+    return context._RETURN( (STSymbol.asSymbolIfInterned(self.asSTString().asString()) != null) ? STObject.True : STObject.False );
 #else
     OBJ cls;
     int indx;
@@ -4228,13 +4228,13 @@
 	if (aStringOrChar.isSTString()) {
 	    java.lang.String me = self.asString();
 	    java.lang.String other = aStringOrChar.asString();
-	    return __c__._RETURN( me.startsWith(other) ? True : False);
+	    return __c__._RETURN( me.startsWith(other) ? STObject.True : STObject.False);
 	}
 	if (aStringOrChar.isSTCharacter()) {
 	    char[] me = self.asSTString().characters;
 	    char ch = aStringOrChar.charValue();
 	    return __c__._RETURN( ((me.length > 0)
-				  && (me[0] == ch)) ? True : False);
+				  && (me[0] == ch)) ? STObject.True : STObject.False);
 	}
     }
 #else
@@ -4357,9 +4357,9 @@
 !String class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.341 2015-05-25 12:02:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.342 2015-05-25 18:37:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.341 2015-05-25 12:02:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.342 2015-05-25 18:37:56 cg Exp $'
 ! !