User input/Text: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 2,424:
=={{header|SparForte}}==
As a structured script.
<syntaxhighlight lang="ada">#!/usr/local/bin/spar
pragma annotate( summary, "get_string" )
Line 2,445 ⟶ 2,444:
exception when others =>
put_line( standard_error, "the value is not valid" );
end get_string;</syntaxhighlight>
As a unstructured script and no exception handling.▼
▲As a unstructured script and no exception handling
<syntaxhighlight lang="ada">
s : universal_string := get_line;
i : universal_numeric := numerics.value( get_line );
? s @ i;</syntaxhighlight>
=={{header|Standard ML}}==
| |||