Skip to content
This repository has been archived by the owner on Feb 3, 2021. It is now read-only.

Commit

Permalink
Browse files Browse the repository at this point in the history
Unrecognized charname should .panic instead of pir::die.
  • Loading branch information
pmichaud committed Feb 16, 2010
1 parent 42d216f commit 4fc27f3
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/HLL/Actions.pm
Expand Up @@ -172,7 +172,7 @@ method charname($/) {
my $codepoint := $<integer>
?? $<integer>.ast
!! Q:PIR { %r = new ['CodeString'] }.charname_to_ord( ~$/ );
pir::die("Unrecognized character name $/") if $codepoint < 0;
$/.CURSOR.panic("Unrecognized character name $/") if $codepoint < 0;
make pir::chr($codepoint);
}

Expand Down

0 comments on commit 4fc27f3

Please sign in to comment.