Ben*_*aum 4 c# clojure s-expression
我今天早些时候遇到了这个问题:
示例输入:我遇到Joe和Jill然后我们去购物
示例输出: [TOP [S [S [NP [PRP I]] [VP [VBD run] [PP [IN into] [NP [NNP Joe] [CC和[NNP Jill]]]]] [CC和] [S [ADVP [RB然后]] [NP [PRP我们]] [VP [VBD去] [NP [NN购物]]]]]]
我打算建议简单地将预期输出(因为它看起来像一个s表达式)解析为一个对象(在我们的例子中是一个树),然后使用简单的LINQ方法来处理它.但令我惊讶的是,我无法找到C#s-expression解析器.
我唯一能想到的是使用Clojure解析它,因为它编译成clr,我不确定它是一个很好的解决方案.
顺便说一句,我不介意输出类型的答案dynamic
.我在这里找到的答案只是用于反序列化为特定模式.
总结一下我的问题: 我需要在C#中反序列化s表达式(序列化对于这个问题的未来读者来说会很好)
看起来你需要一个表单的数据结构:
public class SNode
{
public String Name { get; set; }
private readonly List<SNode> _Nodes = new List<SNode>();
public ICollection<SNode> Nodes { get { return _Nodes; } }
}
Run Code Online (Sandbox Code Playgroud)
表格的序列化程序
public String Serialize(SNode root)
{
var sb = new StringBuilder();
Serialize(root, sb);
return sb.ToString();
}
private void Serialize(SNode node, StringBuilder sb)
{
sb.Append('(');
sb.Append(node.Name);
foreach (var item in node.Nodes)
Serialize(item, sb);
sb.Append(" )");
}
Run Code Online (Sandbox Code Playgroud)
并且形式的反序列化器:
public SNode Deserialize(String st)
{
if (String.IsNullOrWhiteSpace(st))
return null;
var node = new SNode();
var nodesPos = String.IndexOf('(');
var endPos = String.LastIndexOf(')');
var childrenString = st.SubString(nodesPos, endPos - nodesPos);
node.Name = st.SubString(1, (nodesPos >= 0 ? nodePos : endPos)).TrimEnd();
var childStrings = new List<string>();
int brackets = 0;
int startPos = nodesPos;
for (int pos = nodesPos; pos++; pos < endPos)
{
if (st[pos] == '(')
brackets++;
else if (st[pos] == ')')
{
brackets--;
if (brackets == 0)
{
childStrings.Add(st.SubString(startPos, pos - startPos + 1));
startPos = pos + 1;
}
}
}
foreach (var child in childStrings)
{
var childNode = Deserialize(this, child);
if (childNode != null)
node.Nodes.Add(childNode);
}
return node;
}
Run Code Online (Sandbox Code Playgroud)
但是,如果还没有测试甚至编译过这段代码,那么这或多或少都会起作用.