diff --git a/lib/PJP/M/BuiltinFunction.pm b/lib/PJP/M/BuiltinFunction.pm index 4a12000..7e6ba7f 100644 --- a/lib/PJP/M/BuiltinFunction.pm +++ b/lib/PJP/M/BuiltinFunction.pm @@ -68,7 +68,7 @@ sub generate { while (<$fh>) { $_encoding = $1 and next if !defined $_encoding && m{^=encoding\s+(.+)$}; s{E}{/}g; - my @names = m{C<(\-?[a-zA-Z_]+)(?:[^>]+)?>}g; + my @names = m{C<(\-?[a-zA-Z0-9_]+)(?:[^>]+)?>}g; push @_candidate, map {s{^($OPS_REGEXP)(?:/+|/STRING/)$}{$1}; $_} @names; } close $fh;