SHA-1: Difference between revisions
Content added Content deleted
(SHA-1: Add Emacs Lisp example) |
(Added Hare) |
||
Line 1,624:
<lang halon>$var = "Rosetta Code";
echo sha1($var);</lang>
{{out}}
<pre>
48c98f7e5a6e736d790ab740dfc3f51a61abe2b5
</pre>
=={{header|Hare}}==
<lang hare>use crypto::sha1;
use encoding::hex;
use fmt;
use hash;
use os;
use strings;
export fn main() void = {
const sha = sha1::sha1();
hash::write(&sha, strings::toutf8("Rosetta Code"));
let sum: [sha1::SIZE]u8 = [0...];
hash::sum(&sha, sum);
hex::encode(os::stdout, sum)!;
fmt::println()!;
};</lang>
{{out}}
<pre>
| |||