common-lisp

1热度

1回答

我想创建一个函数，在AllegroCL中执行阻塞矩阵乘法，但我不断收到数组索引错误。我相信这是由于20×20块矩阵的边界为0-19，但我不确定如何解决它。错误：在访问＃时数组索引20对于维数20来说太大。 [condition type：type-error] 任何帮助或方向是非常感谢。以下是我的代码到目前为止。 (defun bmmul (A B) (let* ((m (car (

0热度

1回答

解释Lisp的点子：什么是结果形式？

我正在查看dotimes上的LispWorks Hyperspec，但我不明白第三个变量[result-form]正在做什么。例子如下： (dotimes (temp-one 10 temp-one)) => 10 (setq temp-two 0) => 0 (dotimes (temp-one 10 t) (incf temp-two)) => T temp-two => 10 的H

1热度

1回答

跨包

我有一个包my-package定义的函数foo共享Lisp的符号： (in-package :my-package) (defun foo (a) (if (eql a 'value1) (do-this) (do-the-other))) 当我把这个功能从不同的包我有资格与包名称的参数： (in-package :cl-user) (my-package:f

3热度

1回答

偏离规范的未读字符行为？

论unread-char的Common Lisp的HyperSpec页面 - 见 here - 它说以下两个方面： “未读炭旨在成为一个有效的机制，以允许Lisp的读卡器等解析器在输入流中执行单字符预览。“ “这是一个错误在相同流连续两次调用未读炭没有居间调用读取炭（或隐含地读取字符某种其它输入动作）在该流 ”。我研究如何增加对多字符先行支持CL的解析器我打算写的，只是为了确认上述溪流，我

0热度

2回答

与从字符串读取clisp相反

我想定义一个与以下相反的函数to-string。 > (read-from-string "(foo a b)") (FOO A B) ;

1热度

1回答

如何从JSCL方法调用Common Lisp代码

JSCL是Common Lisp（CL）的实现之一。它涵盖许多的CL特征除了CLOS，格式等它有其REPL其他CL实现。我想知道如何从JS端调用CL代码。我想这样做： // set the CL codes as string var codes = "(defun f1(x) (+ x 1)) (f1 99)"; // call CL codes from JSCL JSCL.

2热度

2回答

如何在quicklisp中升级asdf版本？

我想编译并运行一个lisp源代码来解析Peercoin区块链，这样我就可以获得前100个最丰富的地址。我正在使用lisp源代码https://github.com/glv2/peercoin-blockchain-parser。我已经安装quicklisp我的系统上，但在运行下面的错误代码被抛出： debugger invoked on a LOAD-SYSTEM-DEFINITION-ERRO

1热度

1回答

包EXT不存在

我目前通过的Lisp的例子土地工作，并已经运行到一个编译例外：包EXT不会从该行存在我怀疑： (ext:shell (concatenate 'string "dot -Tpng -O" fname)) 我里面运行我的REPL emacs与粘液，我不确定如何补救这一点后，一些谷歌搜索错误。任何帮助将不胜感激。

0热度

1回答

SBCL - 通用Lisp的错误

我试图运行从以下链接库： https://github.com/JafferWilson/test-program 我收到此错误： sbcl --script paraphrasing.lisp Unhandled SB-KERNEL:SIMPLE-PACKAGE-ERROR in thread #<SB-THREAD:THREAD "main thread"

7热度

1回答

如何撤消“声明”宣言？

看来，大多数（如果不是全部的话）全局declarations不能以ANSI CL标准方式恢复。例如，当你评估（直接或通过加载一个文件）形式像(proclaim '(declaration my-decl))或(declaim (special *my-var*))有使(declare (my-decl ...))非法或*my-var*词汇没有便携式方式。各种实施方案提供非便携式方式来恢复spe