chicken-scheme

    0热度

    1回答

    #;2> (topological-sort '((i am) (not trying) (confuse the) (am trying) (trying to) (am not) (trying the) (to confuse) (the issue)) eqv?) (not i am trying

    -2热度

    4回答

    我如何追加(1 2 3)到()末,使((1 2 3)) 我如何追加(4 5 6)至是末,使((1 2 3) (4 5 6)) 我如何追加"|"到即即将制作的末尾((1 2 3) (4 5 6) "|") 没有虚线对。 我正在与鸡计划,但我会采取任何方案在这一点上的答案。请注意,这些列表中的任何一个都可能是嵌套列表,谁知道什么......我只是写了一个简单的例子。 注意:@sjamaan显示a使用a

    0热度

    1回答

    我试图找出如何使用 > (import (prefix some-module :some-module)) 文档是here 我发现定义here的例子中使用(导入(前缀...))。 现在,我该如何引用它的定义? 这里有一些事情我想: :some-module.baz some-module.baz :some-module:baz some-module:baz 他们没有工作

    0热度

    2回答

    我想在我的程序中有多个模块。例如。模块foo和模块bar。模块foo将参考模块bar。然后我希望能够在csi(解释)repl中测试这些模块。这个问题的根源在于如果我可以运行我的代码而不必编译它。以下是我的例子。 注:我是一个计划新手,所以这个代码可能有其他问题。随意指出任何事情,我会尽力纠正。 foo.scm (use r7rs) (define-library (foo) (impo

    1热度

    2回答

    有没有一种方法来创建Python的虚拟环境(的virtualenv)的等效?随着virtualenvs,可以不搞乱全球蟒蛇环境中安装虚拟环境中的Python包(一个单独的目录)。人们可以删除一个决定他们并不需要,而不用担心删除是在另一个Python项目依赖包的包。我确信现在还没有其他的好处。我注意到,当我用鸡安装,它安装所有的鸡蛋放在我/usr/local/Cellar/chicken/4.12.

    2热度

    1回答

    这里是我的方案代码: (define (fact n) (if (= n 1) 1 (* n (fact (- n 1))))) (define (main args) (fact (car args))) 然后我运行这段代码的脚本在bash命令: csi -ss test.scm 4 然而,口译员得到这个错误信息: Error: (=) bad

    0热度

    1回答

    为了在Chicken计划中使用iup,我需要提供一些依赖关系。其中之一是IM(imtoolkit),我在https://webserver2.tecgraf.puc-rio.br/cd/en/building.html上找到它,它将我链接到sourceforge。从那里我可以下载源代码来编译自己,但没有说明我可以找到如何做到这一点,并且没有典型的结构,因为没有可运行的configure。所以我决定

    0热度

    1回答

    我有(load "foo.import.scm")当我编译一切工作,只要我从同一个目录执行程序。否则,它抱怨不能够找到 “foo.import.scm” Error: (open-input-file) cannot open file - No such file or directory: "foo.import.scm" ,如果我做 csc -s foo.scm -emit-import

    2热度

    1回答

    我创建了以下在球拍码(选择球拍,而不是GRacket)的可执行文件: #lang racket (print "Hello World!") 它创造的3.6 MB与6.2 MB的可执行文件的TGZ。这对于这个最简单的程序来说似乎非常大。由Chicken Scheme创建的具有相同代码(print "Hello World!")的可执行文件的大小仅为16984字节(16.6 kb)。 我认为我

    -1热度

    1回答

    我正在关注麻省理工学院的SICP讲座,而这正是我试图通过亚历山大方法的Heron找到一个数的平方根近似值。这是我第一次尝试lisp,很抱歉做出了noobie错误。 (define guess 1) (define (avg a b) (/ (+ a b) 2)) (define (try guess x) (if (goodEnough guess x) g