高手请进！

leeyuan · 发表于 2005-4-18 15:29

程序中 (setq f (open "tfjs.dat" "r"))
(setq tuto (read (read-line f)))
(close f) 这段函数在的作用是什么？

ljpnb · 发表于 2005-4-18 17:30

程序中 (setq f (open "tfjs.dat" "r"));_只读方式打开一个dat文件
(setq tuto (read (read-line f)));_读取一行数据，并用read函数返回它的参数转换的相对应数据类型
(close f);_关闭文件

leeyuan · 发表于 2005-4-18 17:48

请问如果去掉这段函数对主程序有何影响？

ljpnb · 发表于 2005-4-18 18:22

直接去掉当然有影响，tuto没有什赋值，程序会出错！

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