小编Fre*_*chi的帖子

如何在Lisp中读取输入直到EOF

如何在Lisp中读取输入流直到EOF?在C中,你可以这样做:

while ((c = getchar()) != EOF)
{
  // Loop body...
}       
Run Code Online (Sandbox Code Playgroud)

我希望能够将数据传输到我的Lisp程序,而无需事先指定数据大小.这是我现在正在做的一个例子:

(dotimes (i *n*)
  (setf *t* (parse-integer (read-line) :junk-allowed T))
  (if (= (mod *t* *k*) 0) (incf *count*)))
Run Code Online (Sandbox Code Playgroud)

在这个循环中,变量*n*指定了我输出到程序的行数(从第一行输入读取的值),但我想只处理一个任意和未知数量的行,当它到达时停止流的结尾.

lisp common-lisp eof

8
推荐指数
2
解决办法
8238
查看次数

保存电池寿命的最佳背景颜色是什么?

我正在开发一个基于Web的移动应用程序,我正在考虑默认的背景颜色.

不同颜色的背景是否使用不同的电池寿命?为了获得最佳电池寿命,我应该选择黑色还是白色还是其他颜色?

我会假设因为液晶显示器后面有一个背光,那么白色会使用最少的功率,因为​​没有像素必须打开,这个假设是否正确?

mobile colors

7
推荐指数
1
解决办法
1万
查看次数

标签 统计

colors ×1

common-lisp ×1

eof ×1

lisp ×1

mobile ×1