#DOCUMENTATION by cg
class: Character
changed:
#isControlCharacter
#isSeparator
--- a/Character.st Sun May 08 02:26:58 2016 +0200
+++ b/Character.st Sun May 08 02:27:08 2016 +0200
@@ -646,7 +646,6 @@
or:[ (asciivalue == 247 ) ]]]]]
! !
-
!Character methodsFor:'accessing'!
codePoint
@@ -1802,16 +1801,12 @@
"return true if I am a control character (i.e. ascii value < 32 or == 16rFF)"
%{ /* NOCONTEXT */
-#ifdef NON_ASCII /* i.e. EBCDIC ;-) */
-# error not yet implemented - fails when compiled
-#else
REGISTER INT val;
val = __intVal(__INST(asciivalue));
if (val < ' ' || val == 0xFF) {
- RETURN ( true );
+ RETURN ( true );
}
-#endif
RETURN (false);
%}.
@@ -2212,16 +2207,14 @@
REGISTER INT val;
val = __intVal(__INST(asciivalue));
-#ifndef NON_ASCII /* i.e. EBCDIC ;-) */
if (val <= ' ')
-#endif
- if ((val == ' ')
- || (val == '\n')
- || (val == '\t')
- || (val == '\r')
- || (val == '\f')) {
- RETURN ( true );
- }
+ if ((val == ' ')
+ || (val == '\n')
+ || (val == '\t')
+ || (val == '\r')
+ || (val == '\f')) {
+ RETURN ( true );
+ }
RETURN (false);
%}.
^ (asciivalue == 16r20)
@@ -2229,7 +2222,6 @@
or:[asciivalue == 16r0A
or:[asciivalue == 16r09
or:[asciivalue == 16r0C]]]]
-
!
isUppercase