X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;ds=sidebyside;f=lib%2FSub%2FNary.pm;h=c7792d5c3f782f1fd302526d0eab0c9aabf560a1;hb=ffe40b718c29e7f7a3ced4c719302736c573d710;hp=d1c1ddaf9a221aed87584f5d36c39781c9c5afa4;hpb=24e9267d88e3b5d49961e061b974562c55876c4d;p=perl%2Fmodules%2FSub-Nary.git

diff --git a/lib/Sub/Nary.pm b/lib/Sub/Nary.pm
index d1c1dda..c7792d5 100644
--- a/lib/Sub/Nary.pm
+++ b/lib/Sub/Nary.pm
@@ -207,6 +207,7 @@ $ops{$_} = 'list' for qw/padany flip match entereval readline/;
 $ops{stat}      = 13;
 $ops{caller}    = sub { my @a = caller 0; scalar @a }->();
 $ops{localtime} = do { my @a = localtime; scalar @a };
+$ops{gmtime}    = do { my @a = gmtime; scalar @a };
 
 sub enter {
  my ($self, $cv) = @_;