common-lisp

    2熱度

    1回答

    在sbcl中,我知道在defun中同時使用&可選鍵和&鍵時,我可以消除預期的消息,但這似乎在defmacro中不起作用。 (我應該重新設計/重寫,我知道,但是這是遺留代碼) 當我編譯這個文件...... (declaim (sb-ext:muffle-conditions style-warning)) (defun wilma (&optional wilma1 &key wilma2 wi

    -1熱度

    2回答

    如果我有一個列表如下: (((X))) 我想只是X,並沒有得到括號 在LISP,如果我這樣做CAR,我仍然會得到括號。 有什麼功能可以爲我做這個嗎?

    1熱度

    1回答

    這只是一個快速問題,但是如何在Git Bash中運行「clisp」命令。它適用於Windows Powershell,但不適用於Git Bash。 (以下簡稱「CLISP」命令是用於Common Lisp的。) 這是所有我寫這兩個控制檯: 是有辦法解決這一問題? P.S.我知道這似乎是一個愚蠢的問題,但我更喜歡Git Bash來Powershell(因爲我使用git很多),所以我想讓它在Git B

    -1熱度

    1回答

    欲限定在共同口齒不清一個功能,它使用不知道口齒不清一些字/符號,對於具有這樣的功能/宏例如: (my-func-or-macro lst key-word idx) 其返回在lst項目高達的idx如果key-word是到從idx到最後,如果key-word是從。 所以實際上它應該像: (my-func-or-macro '(1 2 3 4 5 6) from 3) => '(4 5 6)

    1熱度

    1回答

    我來自Python世界的Lisp,它本質上運行於virtualenv和pip,作爲創建容器和管理依賴關係的方式。 目前,我正在更詳細地學習Common Lisp,並想知道它的社區理念是如何管理依賴和包。 舉例來說,如果我跑: (ql:quickload '(cl-who hunchentoot parenscript elephant fiveam css-lite cl-json)) 這是我的理

    0熱度

    1回答

    我有這樣的功能: (defun test (variable) (cond ((null variable) nil) ((< (- 12 (other-function variable) 3) 0) 1) (t (- 12 (other-function variable) 3)) ) ) 的想法是,如果12的與3的函數的值的減法運算的結果小於0

    1熱度

    1回答

    我學習口齒不清,我不明白這個問題 修改,使其返回根的實部和虛部返回一元二次方程的根的功能,在 的情況下,它們很複雜。假設係數是真實的。 ;;;gnu clisp 2.49 (defun root(a b c) (let ((root1 (/ (+ (* -1 b) (sqrt (- (expt b 2) (* 4 a c)))) (* 2 a))) (root2 (/ (

    3熱度

    1回答

    我認爲Common Lisp中利弊細胞的大多數實現通常/總是堆上分配(見Why is consing in Lisp slow?) Common Lisp中確實提供用於從函數返回多個值的設施(返回時使用values和在呼叫地點的multiple-value-bind)。我在這裏猜測了一下,但我認爲這種結構的動機有兩方面:1)在不關心丟棄值的典型情況下,使truncate等功能更易於使用; 2)使之

    0熱度

    2回答

    這個問題是關於sbcl - 或者我原本以爲。問題:什麼時候角色不是角色?請看下面的代碼: (defconstant +asc-lf+ #\Newline) (defconstant +asc-space+ #\Space) (prin1 (type-of #\Newline )) (terpri) (prin1 (type-of #\Space )) (terpri) (prin1 (ty

    0熱度

    1回答

    假設我想從狀態列表中刪除一個步驟(元素)。 (defparameter *states* '((:top nil nil) (:subjects nil nil))) ;predicate (defun equal-state? (step state) (equal (car step) state)) 如果我使用(delete-if #'equal-state? *state