Input loop: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (Fix Perl 6 -> Raku in comments) |
(Added Wren) |
||
Line 2,594: | Line 2,594: | ||
Loop |
Loop |
||
End Sub</lang> |
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}}== |
=={{header|x86 Assembly}}== |