返回嵌套的LIST给LISP

CSharpBoy

下面代码我想创建一个嵌套的LIST给LISP但是返回了eInvalidResBuf错误码，错在哪里？


[LispFunction("GetNestedList")]
public static ResultBuffer GetNestedList(ResultBuffer resBufIn)
{
    // main result buffer
    ResultBuffer resBufOut = new ResultBuffer();

    // 5005 = RTSTR
    resBufOut.Add(new TypedValue(5005, "Main List Item 1"));

    // nested result buffer
    ResultBuffer resBufNested = new ResultBuffer();
    resBufNested.Add(new TypedValue(5005, "Nested List Item 1"));
    resBufNested.Add(new TypedValue(5005, "Nested List Item 2"));

    // 5023 = RTRESBUF
    resBufOut.Add(new TypedValue(5023, resBufNested));

    resBufOut.Add(new TypedValue(5005, "Main List Item 2"));

    return resBufOut;
}

解决方案：

你去 LispDataType enum 里面查看下ResultBuffer的类型和值的相关代码，你会看到RTRESBUF/5023不在里面，你的代码LispDataType嵌套的部分用LispDataType.ListBegin/LispDataType.ListEnd部分替换。


[sell=5]

1. [LispFunction("GetNestedList")]
   
2. public static ResultBuffer GetNestedList(ResultBuffer resBufIn)
   
3. {
   
4.     ResultBuffer resBufOut = new ResultBuffer();
   
5. 
   
6.     resBufOut.Add(new TypedValue((int)LispDataType.Text, "Main List Item 1"));
   
7.    
   
8.     resBufOut.Add(new TypedValue((int)LispDataType.ListBegin));
   
9.         resBufOut.Add(new TypedValue((int)LispDataType.Text, "Nested List Item 1"));
   
10.         resBufOut.Add(new TypedValue((int)LispDataType.Text, "Nested List Item 2"));
    
11.     resBufOut.Add(new TypedValue((int)LispDataType.ListEnd));
    
12. 
    
13.     resBufOut.Add(new TypedValue((int)LispDataType.Text, "Main List Item 2"));  
    
14. 
    
15.     return resBufOut;
    
16. }

[LispFunction("GetNestedList")]<br /> public static ResultBuffer GetNestedList(ResultBuffer resBufIn)<br /> {<br />     ResultBuffer resBufOut = new ResultBuffer();<br /> <br />     resBufOut.Add(new TypedValue((int)LispDataType.Text, "Main List Item 1"));<br />    <br />     resBufOut.Add(new TypedValue((int)LispDataType.ListBegin));<br />         resBufOut.Add(new TypedValue((int)LispDataType.Text, "Nested List Item 1"));<br />         resBufOut.Add(new TypedValue((int)LispDataType.Text, "Nested List Item 2"));<br />     resBufOut.Add(new TypedValue((int)LispDataType.ListEnd));<br /> <br />     resBufOut.Add(new TypedValue((int)LispDataType.Text, "Main List Item 2"));  <br /> <br />     return resBufOut;<br /> }

[/sell]