[求助]：关于read-line的用法！

superxzg · 发表于 2006-11-9 17:18:28

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

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

×

关于read-line的用法！
我想按行读取文件的内容，可是每次read－line只能读取第一行，
用了（while（setq str（read－line fn））****）也不行，请高手指点，如何实现全文件的按行读取！

Dallas_whu · 发表于 2006-11-9 17:59:28

把你的代码帖全！

superxzg · 发表于 2006-11-9 18:26:33

(DEFUN c:test ()
  (SETQ
filename "TEST.txt"
fn       (OPEN (STRCAT "e:\\My Work\\" filename) "R")
  )
  (WHILE (SETQ str (READ-LINE fn))
   (PRINC str)
  )

)
这样做是可行的，刚才是系统的设置有点问题，我还以为实现不了！

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

[求助] [求助]：关于read-line的用法！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

浏览过的版块