newlisp - 在 Newlisp 中读取标准输入到字符串
问题描述
如何在 Newlisp 中将标准输入的全部内容读入字符串?(即当前读取位置之后的全部剩余内容 - 此操作通常称为“slurp文件”)
解决方案
你可以使用这个:
(define (read-all)
(let (r "" ch "")
(while (setf ch (read-char))
(setf r (append r (char ch))))
r))
另见: http: //www.newlisp.org/downloads/newlisp_manual.html#read-char
推荐阅读
- r - 无法从 R shell 连接到 Spark 1.6.0
- python - Python中的除法
- apache - 将语言页面重定向到根域
- visual-studio - VS CodedUI 无法为经典 Windows 应用程序启动 GUI
- linq - 使用 LINQ 在 ASP.Core 中排序的 ICollection 属性
- javascript - 我们如何在邮件模板中转换货币?
- python - Dropbox Python API 上传多个文件
- javascript - Javascript 搜索未按预期工作。如何解决?
- c++ - 调用exe文件时在MFC程序中查找相对路径出错
- vba - 将变量设置为指定的工作簿会生成超出范围的错误