我该怎么做才能让以下工作?
我需要创建一个接受Expr列表并返回Expr(Expr列表 - > Epxr)的函数.
type DataObject() =
let data = System.Collections.Generic.Dictionary<int, obj>()
member this.AddValue propertyIndex value = data.Add(propertyIndex, value)
member this.GetValue propertyIndex =
match data.TryGetValue propertyIndex with
| (true, value) -> value
| (false, _) -> box "property not found"
...
(fun args ->
<@@
let data = new DataObject(values)
args |> List.iteri (fun i arg -> data.AddValue i <@@ (%%arg) : string @@>)
data
@@>)
Run Code Online (Sandbox Code Playgroud)
我创建了DataObject类型来添加args的值.但不知怎的,我无法设法让代码迭代不同的args(args.[0] .. args.[i]).我收到的消息是:
变量'arg'绑定在引号中,但用作拼接表达式的一部分.这是不允许的,因为它可能会超出其范围.
如果我显式访问args(args.[0],args.[1],...),解决方案可以工作,但是一旦我尝试添加迭代,我就会遇到问题.因为args列表的长度很灵活,所以对我来说这不是一个可行的解决方案.
我尝试了不同的方法,但不成功.有一些解决方案吗?
[编辑]
在我的解决方案中添加Tomas的反馈给我带来了这个:
type DataObject(values: obj []) = …Run Code Online (Sandbox Code Playgroud)