--- a/Character.st Wed Mar 05 22:36:23 2014 +0100
+++ b/Character.st Wed Mar 05 22:36:55 2014 +0100
@@ -305,7 +305,6 @@
^ self codePoint:anInteger
! !
-
!Character class methodsFor:'accessing untypeable characters'!
controlCharacter:char
@@ -352,7 +351,6 @@
^ self codePoint:41
! !
-
!Character class methodsFor:'constants'!
backspace
@@ -583,7 +581,6 @@
"
! !
-
!Character methodsFor:'Compatibility-Dolphin'!
isAlphaNumeric
@@ -721,8 +718,10 @@
^ asciivalue = aCharacter codePoint
"
- $A = 65
- $A = 43
+ $A = (Character value:65)
+ $A = (Character codePoint:65)
+ $A = ($B-1)
+ $A = 65
"
!
@@ -2884,10 +2883,10 @@
!Character class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.151 2014-02-21 11:55:51 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.152 2014-03-05 21:36:55 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.151 2014-02-21 11:55:51 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.152 2014-03-05 21:36:55 cg Exp $'
! !