Common Lisp 和 Cocoa 结合起来编写 APP 的例子--代码中设置加载路径

Common Lisp 和 Cocoa 结合起来编写 APP 的例子--代码中设置加载路径

话说最近愈来愈以为 Objective-C 的代码太繁琐了, 可是在 OSX 下写程序又离不开苹果的框架,因而就但愿能把苹果 Cocoa 提供的界面组件和其余更简单的编程语言结合起来使用(好比 Common Lisp), 查了查, 发现能够搞,苹果提供了 bridge , Common Lisp 提供了 FFI,.

翻了翻文档, 在 Clozure CL 中找到一篇比较简单的,就是一个汇率转换器. 具体就是:
一、先用XCode 的 Interface Builder 完成界面组件的设置, 输出一个名为 correncyconverter.nib 的文件；
二、再用 Common Lisp 建立一个名为 currency-converter.lisp 的源文件, 在这个lisp文件里写代码操做这些界面组件；
三、最后在 CCL 环境里把这两个文件编译成一个独立的 APP。

一切都很完美,惟一的缺憾就是要把 Lisp 的 image 包含进去, 使得最终的 app 文件体积稍微偏大--大概50M.

具体的教程在 Clozure CL 的目录下 "/ccl-1.8-darwinx86/examples/cocoa/currency-converter/howto.html"，上述两个文件也能够在这个目录下找到。

编译过程以下，在 CCL 中依次输入下面的命令

# 把 currency-converter 设置为当前工做路径    
(setf (current-directory) "/Users/mikel/Valise/clozure/openmcl/example-code/currency-converter/")
# 加载 currency-converter.lisp
(load "currency-converter")
# 加载 BUILD-APPLICATION
(require "build-application")
# 执行BUILD-APPLICATION 
(ccl::build-application :name "CurrencyConverter"
                        :main-nib-name "CurrencyConverter"
                        :nibfiles 
  '(#P"/ccl-1.8-darwinx86/examples/cocoa/currency-converter/CurrencyConverter.nib"))

最后会在目录 “/ccl-1.8-darwinx86/examples/cocoa/currency-converter/” 下生成一个 APP, 这个 APP 能够独立运行，以下图所示：