在Lisp语言中使用.Net FrameWork库

Clojure是最近比较火的一门Lisp方言，它最大的特色在于直接构建在java虚拟机上，可以方便使用java sdk和各种java库。相对说来，Common Lisp就不太方便了，自带的函数库功能少，许多功能要自己去找。有Lisp的爱好者开发了rdnzl，一个Lisp的函数库，可以直接调用.Net的函数库。

官方主页点击这里

下面介绍怎么在Ecl里面使用rdnzl。

首先下载rdnzl的源代码包，解压到Ecl的目录下。用文本编辑器打开rdnzl.asd，将

#+:ecl (:file "port-ecl")        ; ECL-specific stuff here

这一行修改成

(:file "port-ecl")

为了方便使用，我打算将rdnzl编译成一个独立的fas文件，因此，还需要Visual Studio的编译环境。

打开VS的命令行提示，进入Ecl， 输入如下命令：

>(require 'asdf)

>(require 'cmp)

>(setf C::*COMPILE-IN-CONSTANTS* t)

>(asdf:make-build :rdnzl :type :fasl)

编译完成后，会在系统的Application Data\common-lisp\cache\ecl-12.2.1-unknown-win-x86 目录下生成rdnzl.fasb和rdnzl.lib，将这两个文件和压缩包中的RDNZL.dll拷贝到Ecl目录下，就能使用了。

注意：正常情况下会有个路径错误，Ecl的编译器不能正确识别路径中的空格，因此链接过程会失败。我是将Application Data的路径重新设置，消除空格后，才能完成编译。解决的办法，需要将link命令下中的将路径用""包含起来。不过这似乎需要修改Ecl的源代码。

 

现在可以试用下rdnzl了，在Ecl环境中输入以下命令：

> (require 'rdnzl)

> (rdnzl:enable-rdnzl-syntax)

> (rdnzl:import-types "System.Windows.Forms"
"MessageBox" "MessageBoxButtons" "DialogResult")

>(rdnzl:use-namespace "System.Windows.Forms")

>[MessageBox.Show "hello .Net" "Lisp" [$MessageBoxButtons.OKCancel]]

 

.Net的messagebox显示出来了。