X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FSub%2FNary.pm;h=0b505f3dc8a99415ac077b044092e598fcdae80d;hb=6faf4b78a5c4fdcf2f3d42e3decceb4968ba0347;hp=c44a10e9bf8fb6d73541a8cbb48829b396192403;hpb=da043a17ae41baa2154227a2689d31671f055165;p=perl%2Fmodules%2FSub-Nary.git diff --git a/lib/Sub/Nary.pm b/lib/Sub/Nary.pm index c44a10e..0b505f3 100644 --- a/lib/Sub/Nary.pm +++ b/lib/Sub/Nary.pm @@ -202,7 +202,7 @@ $ops{$_} = 0 for qw/stub nextstate/; $ops{$_} = 1 for qw/padsv/; $ops{$_} = 'list' for qw/padav/; $ops{$_} = 'list' for qw/padhv rv2hv/; -$ops{$_} = 'list' for qw/padany flip match/; +$ops{$_} = 'list' for qw/padany flip match entereval readline/; sub enter { my ($self, $cv) = @_;