We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 5409c85 commit 4ffa0c2Copy full SHA for 4ffa0c2
src/HLL/Actions.nqp
@@ -203,20 +203,11 @@ class HLL::Actions {
203
}
204
205
method charname($/) {
206
-#?if !moar
207
- my $codepoint := $<integer>
208
- ?? $<integer>.made
209
- !! nqp::codepointfromname(~$/);
210
- $/.CURSOR.panic("Unrecognized character name, '$/'") if $codepoint < 0;
211
- make nqp::chr($codepoint);
212
-#?endif
213
-#?if moar
214
my $codepoint := $<integer>
215
?? nqp::chr($<integer>.made)
216
!! nqp::getstrfromname(~$/);
217
$/.CURSOR.panic("Unrecognized character name '$/'") if $codepoint eq '';
218
make $codepoint;
219
220
221
222
method charnames($/) {
0 commit comments