2011-03-18 137 views

回答

3

您需要先从term中创建一个字符串,然后使用print来打印该字符串。要将term转换为字符串,可以定义如下的函数:

fun termToString (node (str, terms)) = 
    "node("^str^", "^termListToString terms^")" 
    | termToString (vnode str) = 
    "vnode("^str^")" 
and termListToString terms = 
    "["^String.concatWith ", " (map termToString terms)^"]" 
相关问题