On Thu Mar 12 15:29:54 2009, kru...@gmail.com wrote:
> diff --git a/build/gen_metaop_pir.pl b/build/gen_metaop_pir.pl
> index 3f858a3..78e4fce 100644
> --- a/build/gen_metaop_pir.pl
> +++ b/build/gen_metaop_pir.pl
> @@ -131,7 +131,7 @@ while (@ops) {
> .end\n);
>
> # LHS-dwimming hyper ops.
> - $hypername = qq(unicode:"infix:\u00bb$opname\\u00bb");
> + $hypername = qq(unicode:"infix:\\u00bb$opname\\u00bb");
> push @gtokens, sprintf($hyper_no_dwim_fmt, $hypername, $opname,
> "<<$opname<<", $opname, $hypername);
> push @code, qq(
> .sub $hypername
Hey, good catch! Applied as git 285279b (though IIRC thanks to a Parrot
hash/unicode interaction bug unicode forms of hyper ops currently don't
work...that may be out of date though)
Jonathan
