Letter frequency: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 5,843: | Line 5,843: | ||
Because S-BASIC lacks an EOF function, some extra care is required to avoid reading beyond the end of file. (CP/M text files are by convention terminated with a Ctrl-Z byte, but not all text editors enforce this if the file would otherwise end on a sector boundary.) |
Because S-BASIC lacks an EOF function, some extra care is required to avoid reading beyond the end of file. (CP/M text files are by convention terminated with a Ctrl-Z byte, but not all text editors enforce this if the file would otherwise end on a sector boundary.) |
||
<lang S-BASIC> |
<lang S-BASIC> |
||
$constant EOF = 1AH rem |
$constant EOF = 1AH rem End-of-file marker |
||
rem Convert character to upper case |
rem Convert character to upper case |
||
Line 5,946: | Line 5,946: | ||
Z 0 0.0 |
Z 0 0.0 |
||
</pre> |
</pre> |
||
=={{header|Scala}}== |
=={{header|Scala}}== |
||