在之前一篇在newlisp中使用table-driven模式曾经用过这个类型做table-driver模式。

这里将专门描述Tree如何使用。

创建字典

首先Tree是一个namesapce，如果想创建一个字典保存key/value结构，需要如下使用：

(new Tree ‘MyTable) 
(MyTable "/home/a.cc" "123:45") 
(MyTable "/home/b.cc" "123:46") 
(MyTable "/home/c.cc" "123:47") 
(MyTable "/home/d.cc" "123:48") 
(MyTable "/home/e.cc" "123:49") 

查询字典

读取的时候也很简单：

(MyTable "/home/a.cc")
"123:45"

保存字典

(save "d2.lsp" ‘MyTable)

(context ‘MyTable)

(set ‘_/home/a.cc "123:45")

(set ‘_/home/b.cc "123:46")

(set ‘_/home/c.cc "123:47")

(set ‘_/home/d.cc "123:48")

(set ‘_/home/e.cc "123:49")


(context MAIN)

读取字典文件

就是通用做法

(load "d2.lsp")
MAIN

newLISP中的字典类型,布布扣,bubuko.com

newLISP中的字典类型

原文：http://blog.csdn.net/csfreebird/article/details/23541989