Fixed length records: Difference between revisions

m (→‎{{header|REXX}}: changed whitespace and comments.)
Line 968:
NIGRAM TR 9 eniL
</pre>
 
=={{header|Nim}}==
<lang Nim>import algorithm
 
let input = "infile.dat".open(fmRead)
let output = "outfile.dat".open(fmWrite)
var buffer: array[80, byte]
 
while not input.endOfFile:
let countRead = input.readBytes(buffer, 0, 80)
if countRead < 80:
raise newException(IOError, "truncated data when reading")
buffer.reverse()
let countWrite = output.writeBytes(buffer, 0, 80)
if countWrite < 80:
raise newException(IOError, "truncated data when writing")</lang>
 
{{out}}
Contents of file “result.txt" created by command <code>dd if=outfile.dat of=result.txt cbs=80 conv=unblock</code>:
<pre>8.........7.........6.........5.........4.........3.........2.........1...1 eniL
2 eniL
3 eniL
4 eniL
 
6 eniL
7 eniL
............................................................8 enil detnednI
NIGRAM TR 9 eniL</pre>
 
=={{header|Pascal}}==
Anonymous user