Anonymous user
Bitwise IO: Difference between revisions
→{{header|PL/I}}
Line 610:
end;
ending:
bs = bs || copy('0'b, mod(length(bs), 8) );
/* pad length to a multiple of 8 */
put edit (bs) (b);
</lang>
| |||
Line 610:
end;
ending:
bs = bs || copy('0'b, mod(length(bs), 8) );
/* pad length to a multiple of 8 */
put edit (bs) (b);
</lang>
| |||