Input loop: Difference between revisions
Added Wren
Thundergnat (talk | contribs) m (Fix Perl 6 -> Raku in comments) |
(Added Wren) |
||
Line 2,594:
Loop
End Sub</lang>
=={{header|Wren}}==
<lang ecmascript>import "io" for File
File.open("input.txt") { |file|
var offset = 0
while (true) {
var line = ""
while(true) {
var b = file.readBytes(1, offset)
offset = offset + 1
if (b == "\n") {
// process 'line'
break
} else if (b == "\r") { // Windows
// wait for following "\n"
} else if (b == "") { // end of stream
return
} else {
line = line + b
}
}
}
}</lang>
=={{header|x86 Assembly}}==
|