【神奇的函數(shù)式編程語(yǔ)言的獨(dú)特功能】Lisp 的運(yùn)行期修改、編譯代碼，并替換當(dāng)前運(yùn)行版本的試驗(yàn)

《實(shí)用 Common Lisp 編程》一書(shū)中提到一個(gè) Lisp 神奇案例：運(yùn)行在太空飛船上的一段代碼在太空飛船飛離地球一億英里時(shí)被發(fā)現(xiàn)有 BUG ，然后 Lisp 程序員遠(yuǎn)程調(diào)試、替換了有 BUG的代碼，聽(tīng)起來(lái)很神奇。

然后有人在網(wǎng)上找到了這個(gè)故事的來(lái)源，出自 JPL實(shí)驗(yàn)室，就是當(dāng)年錢(qián)學(xué)森前輩和馮.卡門(mén)等人參與聯(lián)合創(chuàng)建的那個(gè)“噴氣推動(dòng)實(shí)驗(yàn)室”。具體的鏈接在這里http://www.flownet.com/gat/jpl-lisp.html

看來(lái)這項(xiàng)功能果然很強(qiáng)大，但是這種描述不是很直觀，那就在我們的環(huán)境上小小地實(shí)際試驗(yàn)一下，試驗(yàn)代碼如下：

(defun test ()

(loop

(顯示數(shù)字)

(if (not (停止循環(huán))) (return))))

(defun 顯示數(shù)字 ()

(format t "111111111 ~%")

(format t "222222222 ~%")

)

(defun 停止循環(huán) ()

(format t "輸入 c 繼續(xù)循環(huán)，輸入其他任意鍵退出循環(huán): ")

(equal 'c (read *query-io*))) 試驗(yàn)的主體部分是這個(gè)函數(shù) (顯示數(shù)字)，程序首次運(yùn)行時(shí)，會(huì)順序顯示：

11111111111

22222222222 接著我們不停止程序，在程序運(yùn)行期修改這個(gè)函數(shù) (顯示數(shù)字)，把第一句注釋掉，這樣：

(defun 顯示數(shù)字 ()

;(format t "111111111 ~%")

(format t "222222222 ~%")

)

然后編譯(C-c C-c)，求值(C-x C-e)，這時(shí)再看 REPL 中還在運(yùn)行著的程序，就會(huì)發(fā)現(xiàn)函數(shù) (顯示數(shù)字)已經(jīng)被替換為新版本了。

程序首次運(yùn)行截圖：

程序保持運(yùn)行，修改函數(shù)后的運(yùn)行截圖：

經(jīng)過(guò)上述試驗(yàn)，發(fā)現(xiàn)函數(shù)型語(yǔ)言確實(shí)可以很方便的在運(yùn)行期替換函數(shù)，不過(guò)有一個(gè)條件就是該函數(shù)如果正在運(yùn)行中就替換不了，什么意思呢？如果一個(gè)函數(shù)是循環(huán)輸出一串?dāng)?shù)字，也就是說(shuō)它始終在運(yùn)行，這時(shí)就無(wú)法替換。

總結(jié)

以上是生活随笔為你收集整理的lisp不是函授型语言_【神奇的函数式编程语言的独特功能】Lisp 的运行期修改、编译代码，并替换当前运行版本的试验...的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。