--- CBOR-XS/XS.pm 2020/11/29 21:35:51 1.73 +++ CBOR-XS/XS.pm 2020/11/30 18:30:29 1.74 @@ -66,7 +66,7 @@ use common::sense; -our $VERSION = 1.8; +our $VERSION = 1.81; our @ISA = qw(Exporter); our @EXPORT = qw(encode_cbor decode_cbor); @@ -760,8 +760,8 @@ =cut -sub CBOR::XS::as_int ($) { bless [$_[0], 0, undef], CBOR::XS::Tagged:: } -sub CBOR::XS::as_cbor ($) { bless [$_[0], 1, undef], CBOR::XS::Tagged:: } +sub CBOR::XS::as_cbor ($) { bless [$_[0], 0, undef], CBOR::XS::Tagged:: } +sub CBOR::XS::as_int ($) { bless [$_[0], 1, undef], CBOR::XS::Tagged:: } sub CBOR::XS::as_bytes ($) { bless [$_[0], 2, undef], CBOR::XS::Tagged:: } sub CBOR::XS::as_text ($) { bless [$_[0], 3, undef], CBOR::XS::Tagged:: } sub CBOR::XS::as_float16 ($) { bless [$_[0], 4, undef], CBOR::XS::Tagged:: }