小编bab*_*l92的帖子

我发现MSVC和GCC中的lambdas都是实现一个的函子operator().他们更喜欢函子函数指针的原因是什么？

我正在使用GCC开发自己的内核,当从asm代码调用C函数时,我必须自己做add esp,xx.经过一番搜索,我发现这stdcall是微软的一项发明,不能在GCC中使用它.有没有方便的方法来完成这项工作？

我正在阅读Lua的源代码,并且惊奇地发现它被实现为生成一些奇怪的指令(例如GETUPVAL,FORLOOP等).然后这些操作码由虚拟机执行.这样做有什么好处(与基于AST的纯解释器相比？)

谢谢.

我只是想知道这个问题：如果我可以使用“ls -al | less”之类的东西，那么 less 应该能够等待来自标准输入的输入。我期望发生的是运行“less”命令后，程序挂起并等待输入（由于调用 gets() 或类似的东西。）

但为什么实际上它显示错误消息“缺少文件名（“less --help”寻求帮助）”结束退出？

谢谢。

这就是我所做的:

(define qsort
  (lambda (l)
    (let ((lesser '()))
      (let ((greater '()))
        (cond
          ((null? l) '())
          (else (map (lambda (ele)
                       (if (> (car l) ele)
                           (set! lesser (cons ele lesser))
                           (set! greater (cons ele greater)))) (cdr l))
                (append (qsort lesser) (cons (car l) (qsort greater))))
        )))))

我注意到,当提供已经排序的列表时,它变得极其缓慢.经过一番搜索后,我发现如果以随机方式选择"枢轴",可以提高性能.然而,我知道实现这一目标的唯一方法是list-ref,它似乎是O(n).更糟糕的是,我必须实现一个类似cdr的函数来删除列表中的第n个元素,这可能也是非常低效的.

也许我的方向错了.你能给我一些建议吗？

我在读The Little Schemer.由于我的英语不好,我对这一段感到困惑:

(cond ...)也有不考虑其所有论点的财产.然而,由于这个属性,(和......)和(或......)都不能被定义为(cond ...)方面的函数,尽管两者(和......)和(或......) )可以表示为(cond ...) - 表达式的缩写:

(and a b) = (cond (a b) (else #f) 
    and 
(or a b) = (cond (a #t) (else (b))

Run Code Online (Sandbox Code Playgroud)

如果我理解正确,它说(和......)和(或......)可以用(cond ...)表达式替换,但不能定义为包含(cond ...)的函数.为什么会这样？它与变量参数有什么关系吗？谢谢.

ps我做了一些搜索,但只发现(cond ...)在其中一个条件评估为#f时忽略表达式.

我正在尝试使用perl编写多线程服务器(Windows x64).当试图从另一台计算机连接到它时,我发现内存和句柄使用率一直在上升,即使我一次只维护一个连接.经过数千次试验后,它耗尽了几乎所有的系统内存.我无法弄清楚原因.

这是服务器端:

use IO::Socket::INET;
use threads;

sub session_thread
{
    my $client_socket=$_[0];

    my $client_address = $client_socket->peerhost();
    my $client_port = $client_socket->peerport();
    print "connection from $client_address:$client_port\n";

    my $data = "";
    $client_socket->recv($data, 1024);
    print "$client_address:$client_port says: $data";

    $data = "ok";
    $client_socket->send($data);

    shutdown($client_socket, 1);
    $client_socket->close();
    threads->exit();
}

$| = 1;

my $socket = new IO::Socket::INET (
    LocalHost => '0.0.0.0',
    LocalPort => '7777',
    Proto => 'tcp',
    Listen => 5,
    ReuseAddr => 1
);
die "cannot create socket $!\n" unless $socket;
print "server waiting for client …

我使用fftw/C++和在线计算器计算了数组{1,2,3,4,5,6}的FFT(http://calculator-fx.com/calculator/fast-fourier-transform-calculator-fft/ 1d离散傅立叶变换).结果似乎有点不同.

fftw输出:

0     21.000000      0.000000
1     -3.000000      5.196152
2     -3.000000      1.732051
3     -3.000000      0.000000
4      0.000000      0.000000
5      0.000000      0.000000

Run Code Online (Sandbox Code Playgroud)

在线计算器输出:

 21 + 0j
 -3 + 5.196152j
 -3 + 1.732051j
 -3 + 0j
 -3 - 1.732051j
 -3 - 5.196152j

Run Code Online (Sandbox Code Playgroud)

如上所示,fftw的后两个结果变为零.无法弄清楚为什么.有人可以帮帮我吗？谢谢.

[编辑] cpp代码:

int main()
{
    fftw_complex *out;
    fftw_plan plan;

    double arr[]={1,2,3,4,5,6};
    int n = sizeof(arr)/sizeof(double);

    out = (fftw_complex*)fftw_malloc ( sizeof ( fftw_complex ) * n );
    plan = fftw_plan_dft_r2c_1d ( n, arr, out, FFTW_ESTIMATE );
    fftw_execute ( …

我正在和The Little Schemer一起学习Scheme,遇到了一个奇怪的麻烦.这是我的代码:

(define rember
  (lambda (a lat)
    ((if (null? lat)
         '()
         (cond
           ((eq? a (car lat)) (cdr lat))
           (else (rember a (cdr lat))))))))

(rember 'aaa '(bbb aaa))

我在教科书中使用了"if"而不是"cond".从尾递归返回时,它显示以下错误:

application: not a procedure;
 expected a procedure that can be applied to arguments
  given: '()
  arguments...: [none]

我想这是因为它将if语句中的'()视为函数,尾递归的返回值作为参数.但由于这本书没有给我这么多关于语言的细节,你能否为我解释一下这个？(例如,这实际上是某种语言特征吗？在这段代码中我有什么办法可以坚持"if"吗？我什么时候可以安全地使用"if"？)

谢谢.