mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-12-04 07:38:09 +00:00
Code Issues 1 Releases Wiki Activity

file/linex now only acceps a file, not a path name

Browse Source
This commit is contained in:
Ico Doornekamp
2023-05-26 17:50:26 +02:00
parent 64e3cdeb2b
commit 09345ec786
2 changed files with 9 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
src/boot/boot.janet
View File

@@ -1749,18 +1749,13 @@
(printf (dyn *pretty-format* "%q") x)
(flush))
(defn file/lines
"Return an iterator over the lines of a file"
[file-or-path &opt mode]
(default mode :r)
(if (bytes? file-or-path)
(coro
(with [f (file/open file-or-path mode)]
(while (def line (file/read f :line))
(yield line))))
(coro
(while (def line (file/read file-or-path :line))
(yield line)))))
"Return an iterator over the lines of a file."
[file]
(coro
(while (def line (file/read file :line))
(yield line))))
###
###