小编Ped*_*ino的帖子

大多数提交都有 1 个父提交。但是，一些提交有多个父级。例如，在--no-ff（无快进）标志下创建的合并提交至少有 2 个父项。

git 中是否有一个命令可以显示特定提交具有的确切父级数量？

我在 Emacs 中使用 Common Lisp 和 Slime。与使用突变相比，我有更多避免突变的经验。

在 REPL 中，我可以执行以下操作：

CL-USER> (defvar so-example '())
SO-EXAMPLE

CL-USER> (push 7 so-example)
(7)

它有效。但是，如果我尝试：

CL-USER> (push 7 '())

我收到一条错误消息说：

未定义的函数：（SETF QUOTE）

好的。由于quote是一个问题，我也尝试过：

CL-USER> (push 7 nil)

这也会引发错误消息：

NIL 是一个常量，因此不能设置。

为什么会发生这种情况？为什么说有道理？

对我来说，这很奇怪。

我正在使用 Slime (Emacs) 和 Common Lisp (SBCL)。计算表达式后，REPL 返回 CL 对象列表：

    (#<BOOKMARK-ENTRY {1009AFB963}> #<BOOKMARK-ENTRY {1009AFD5A3}>
     #<BOOKMARK-ENTRY {1009AFDB53}> #<BOOKMARK-ENTRY {1009AFE0E3}>
     #<BOOKMARK-ENTRY {1009AFE683}> #<BOOKMARK-ENTRY {1009AFEC23}>
     #<BOOKMARK-ENTRY {1009AFF173}> #<BOOKMARK-ENTRY {1009AFF753}>
     #<BOOKMARK-ENTRY {1009AFFCD3}> #<BOOKMARK-ENTRY {1009B00233}>
     #<BOOKMARK-ENTRY {1009B00783}> #<BOOKMARK-ENTRY {1009B00CE3}>
     #<BOOKMARK-ENTRY {1009B01253}> #<BOOKMARK-ENTRY {1009B01823}>
     #<BOOKMARK-ENTRY {1009B01DD3}> #<BOOKMARK-ENTRY {1009B02393}>
     #<BOOKMARK-ENTRY {1009B028B3}> #<BOOKMARK-ENTRY {1009B02E13}>
     #<BOOKMARK-ENTRY {1009B03373}> #<BOOKMARK-ENTRY {1009B03903}>
     #<BOOKMARK-ENTRY {1009B03EB3}> #<BOOKMARK-ENTRY {1009B04453}>
     #<BOOKMARK-ENTRY {1009B049F3}> #<BOOKMARK-ENTRY {1009B04F23}>
     #<BOOKMARK-ENTRY {1009B054A3}> #<BOOKMARK-ENTRY {1009B05AB3}>
     #<BOOKMARK-ENTRY {1009B05FF3}> #<BOOKMARK-ENTRY {1009B06513}>
     #<BOOKMARK-ENTRY {1009B06A83}> #<BOOKMARK-ENTRY {1009B07133}>
     #<BOOKMARK-ENTRY {1009B076B3}> #<BOOKMARK-ENTRY {1009B07C13}>
     #<BOOKMARK-ENTRY {1009B08213}>)

如果我单击检查列表，则会打开一个新窗口，其中列出了所有对象：

#<CONS {1009AFCBB7}>
-------------------- …

我想从一个简单的列表转换：

'(1 2 3)

到一维数组（向量）：

#(1 2 3)

我发现这个问题很相似，但没有涵盖这个问题。

我也设法找到了实现它的方法。不确定它是否是最好的：

CL-USER> (coerce '(1 2 3) 'vector)
#(1 2 3)
CL-USER> (type-of *)
(SIMPLE-VECTOR 3)

我想知道是否可以使用make-array来达到相同的结果。我试过：

CL-USER> (make-array '() :initial-contents '(1 2 3)) 
#0A(1 2 3)
CL-USER> (type-of *)
(SIMPLE-ARRAY T NIL)

这是接近的，但我不明白#0A在#0A(1 2 3)。

出于某种我不明白的原因，此输出不适用于进一步的组合，例如aref：

CL-USER> (aref #0A(1 2 3) 0)
; Evaluation aborted on #<SIMPLE-ERROR "Wrong number of subscripts, ~W, for array of rank ~W." {1003C07793}>.

Is it possible …

我正在尝试通过《Common Lisp：符号计算的温和介绍》一书来学习 Common Lisp 。此外，我正在使用 SBCL、Emacs 和 Slime。

在第 7 章中，作者提出以下建议lambda expressions：

这让我感到困惑，因为 SBCL 的 REPL 返回：

CL-USER> #'lambda
#<CLOSURE (:MACRO LAMBDA) {1000D736DB}>

显然，作者使用了Lisp Works（不是 100% 确定）。我认为这与上述差异无关。不过，我觉得还是提一下比较好。

我的 SBCL 的 REPL 也返回macro了众所周知的宏，例如and：

CL-USER> #'and
#<CLOSURE (:MACRO AND) {1000D7365B}>

请注意，具有“普通”功能的行为例如append是不同的：

CL-USER> #'append
#<FUNCTION APPEND>

这里的这篇文章似乎稍微触及了lambda 表达式的非单一性质。但是，它没有提到任何有关标记的内容。

我是否遗漏了 lambda 表达式的本质？

我不明白 的行为git merge。有时，我合并一个分支，执行后git log --graph，我可以看到分支合并为绘图，如下所示：

    D  \n   / \\\n  C   B\n   \\ /\n    A\n

我已经做了

$ git merge feature1 develop \nUpdating 4c3dd3e..a90a849 Fast-forward \nfileA.txt | 1 +  1 file changed, 1 insertion(+)\n

有用。我什至可以删除主题分支，这表明该分支不再是不可或缺的并且合并成功：

$ git branch -d feature1 \nDeleted branch feature1 (was a90a849).\n

但是，我看不到图纸。我只有一行：

pedro (develop) second-final-project $ git log --graph \n\n* commit a90a84966040e36b994c0146bbd8a666954bee49 (HEAD -> develop)\n| Author: Pedro Delfino <p.delfino01@gmail.com>\n| Date:   Fri Jul 16 12:29:24 2021 -0300\n| \n| …

我正在阅读Sonja Keene 的《Common Lisp 中的面向对象编程》一书。

在第七章中，作者提出：

(class-name class-object)

这使得查询类对象的名称成为可能。

使用 SBCL 和 SLIME 的 REPL，我尝试了：

; SLIME 2.26.1
CL-USER> (defclass stack-overflow () 
           ((slot-1 :initform 1 )
            (slot-2 :initform 2)))
#<STANDARD-CLASS COMMON-LISP-USER::STACK-OVERFLOW>
CL-USER> (make-instance 'stack-overflow)
#<STACK-OVERFLOW {1002D188E3}>
CL-USER> (defvar test-one (make-instance 'stack-overflow))
TEST-ONE
CL-USER> (slot-value test-one 'slot-1)
1
CL-USER> (class-name test-one)
; Evaluation aborted on #<SB-PCL::NO-APPLICABLE-METHOD-ERROR {10032322E3}>.

上面的代码返回以下错误消息：

There is no applicable method for the generic function
  #<STANDARD-GENERIC-FUNCTION COMMON-LISP:CLASS-NAME (1)>
when called with arguments
  (#<STACK-OVERFLOW {1003037173}>).
   [Condition of type …

我正在阅读 Sonja Keene 所著的《Common Lisp 中的面向对象编程》一书。

在第9章中，作者给出了以下示例：

(defclass window ()
    ((x :initarg :x-position :accessor x-position)
     (y :initarg :y-position :accessor y-position)
     (height :initarg :height :accessor window-height)
     (width :initarg :width :accessor window-width)
     (exposed-p :initform nil :accessor exposed-p))
   (:documentation "Foundation of all windows"))

我知道在谈论包时，Common Lisp 中使用:或::不使用它超出了纯粹的符号范围。它的使用背后有一个逻辑！

CL-USER> …