我正在编写一个用于创建具有自定义行为的枚举的模块。我现在所做的是将枚举添加到GLOBAL
包中,但这不会安装任何词法符号,除非您在一个模块中创建枚举并从另一个模块中导入它。使用BEGIN $*W.install_lexical_symbol(...)
不是一种选择,因为枚举的值可以从网络连接中获得,并且会阻止编译直到接收到值。是否可以在运行时在调用者的上下文中安装词法符号?如果是这样,怎么样?
我要说“不”。
(我经常学会后悔用P6做这件事,但嘿嘿。)
我的主要证据是像"the set of symbols in a lexical scope is immutable after compile time"这样的评论。
也许抓住一个生病的袋子去读How to define variable names dynamically in Perl 6?的建议,这些建议既邪恶又不够邪恶,足以做我认为你要求的事情。
当你完成呕吐后,请密封袋子,然后访问the freenode IRC channel #perl6-dev,在那里真正的专家与胆量有关。 (我想你知道这一点,但我认为我会把它包含在这个后代的答案中,因为我似乎有一种生病的幽默感。)
枚举有自己的metamodel。您可以使用它来声明具有新行为的新枚举。这有点棘手,但肯定会创建一些安装在你想要的词法范围内的东西。