我正在研究一个项目,我想创建一个非常紧凑的方法来创建实体和属性.
例如:
- let entity = (entity "name")
- |>> (attribute "attr" String)
- |>> (attribute "two" String)
在此示例中|>>将是一个管道操作符以及向该实体添加属性的功能.
我知道这有效:
- let entity = (entity "name")
- |> addAttr (attribute "attr" String)
所以我想知道的是,如果可以替换它
- |> addAttr
同
- |>>
谢谢您的帮助
(我不知道这是否可能)
您可以像这样定义它:
- let (|>>) e a = e |> addAttr a