fix

repository/Grease-Pharo110-Slime.package/GRAnsiCharactersRule.class/instance/group.st

@@ -0,0 +1,4 @@
+accessing
+group
+
+	^ 'ANSI Compatibility'

repository/Grease-Pharo110-Slime.package/GRAnsiCharactersRule.class/instance/initialize.st

@@ -0,0 +1,13 @@
+initialization
+initialize
+
+	super initialize.
+	self replace: 'Character value: ``@expr' with: 'Character codePoint: ``@expr'
+		"replace: '`#source to: `#target'
+			withValueFrom: [ :node |
+				RBLiteralNode value: (String streamContents: [ :stream |
+					node receiver value codePoint to: node arguments first value codePoint do: [ :code |
+						stream nextPut: (Character codePoint: code) ] ]) ]
+			when: [ :node |
+				node receiver value isCharacter
+					and: [ node arguments first value isCharacter ] ]"

repository/Grease-Pharo110-Slime.package/GRAnsiCharactersRule.class/instance/name.st

@@ -0,0 +1,4 @@
+accessing
+name
+
+	^ 'Characters'

repository/Grease-Pharo110-Slime.package/GRAnsiCharactersRule.class/instance/rationale.st

@@ -0,0 +1,4 @@
+accessing
+rationale
+
+	^ 'Character value: 64 and $a to: $b is not ANSI compatible.'

repository/Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testAnsiCharacterRule.st

@@ -1,6 +1,6 @@
 tests-transform
 testAnsiCharacterRule
-	<expectedFailure>
+
 	| class |
 	class := self defineSubClassOf: #GRObject.
 	self compile: 'character Character value: 123' in: class.