如何柯里化布尔类型的内置函数（并将其设置为 1 或 0）？

Question

我认为我可以在给定函数调用的情况下将布尔本机类型设置为 true 或 false，但似乎没有按照我的预期

用特征更新

    has 'Lock'    => ( 
        is => 'ro', 
        isa => 'Bool', 
        traits => ['Bool'],
        default => 0 ,
        reader  => 'isLocked', 
        handles => {
            lock     => [ set => 1 ],
            unlock => [ set => 0 ],
            flip     => 'toggle',

        }
  ); 

Answer 1

我认为您正在寻找 Moose::Meta::Attribute::Native::Trait::Bool 此处，由 traits => 指定['布尔']。

当你拥有的只是 isa =>; '布尔'，默认 => 0，您的属性不包含对象。您无法调用数字 0 上的方法，因此如果没有本机特征的帮助，它就无法处理任何事情。

来自 Moose::Meta::Attribute::Native ：“本机委托允许您将本机 Perl 数据结构委托给对象，就好像它们是对象一样。”这意味着当您将句柄与它们一起使用时，它们会生成特殊方法，这些方法对属性执行某些操作，而不是对存储在属性中的对象调用方法。 Bool 原生特征提供了 set、unset 和 toggle 方法，这意味着您可以使用以下方法执行您想要的操作：

has 'Lock'    => ( 
    is => 'ro', 
    isa => 'Bool',
    traits => ['Bool'],
    default => 0 ,
    reader  => 'isLocked', 
    handles => {
        lock     => 'set',
        unlock   => 'unset',
        flip     => 'toggle',
    }
 );