X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Nary.git;a=blobdiff_plain;f=lib%2FSub%2FNary.pm;h=5ff05745418108e0f388d291a7ccf046ec9bc75e;hp=c44a10e9bf8fb6d73541a8cbb48829b396192403;hb=5a4749d6f0c25cbc5b564453ac9abf338f660b82;hpb=da043a17ae41baa2154227a2689d31671f055165 diff --git a/lib/Sub/Nary.pm b/lib/Sub/Nary.pm index c44a10e..5ff0574 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/; sub enter { my ($self, $cv) = @_;