[LISP程序]：请高手帮我分析一下

leeyuan · 发表于 2005-4-19 08:50:48

您需要登录才可以下载或查看，没有账号？立即注册

×

(setq f (open "tfjs.dat" "r"))
(setq tuto (read (read-line f)))
(close f)
请哪位帮我分析一下这段语句在主程序中的作用？

mkhsj927 · 发表于 2005-4-19 10:46:09

这句是读出tfjs.dat文件中的第一行，肯定是数字数据或者是表（如（"aaa" 12.90...）），字符串的话就不能用read去掉引号

leeyuan · 发表于 2005-4-20 08:49:42

如何得知tfjs.dat的数据，该数据是自己创建的吗？然后通过这种方式来调用

狂刀 · 发表于 2005-4-20 09:50:49

该数据不能自己创建，数据是人创建的

zxq0220 · 发表于 2005-4-21 08:43:33

最初由狂刀发布
[B]该数据不能自己创建，数据是人创建的 [/B]

在玩文字游戏！

该文件是文本文件，可以用记事本写一个。也可以用程序建立。

一生有你 · 发表于 2005-4-21 21:39:21

(read [string])

read 函数分析字符串，并将字符串中的第一个“词”转换为对应的数据类型并返回。
read-line是只读取该文件的第一行吧？
然后read读取该行的第一个词！

账号		自动登录	找回密码
密码			立即注册