Hash from two arrays: Difference between revisions

Content added Content deleted
No edit summary
(Add Neko)
Line 968: Line 968:


[35] [21] [27]</pre>
[35] [21] [27]</pre>

=={{header|Neko}}==
<lang ActionScript>/**
<doc><h2>Hash from two arrays, in Neko</h2></doc>
**/

var sprintf = $loader.loadprim("std@sprintf", 2)

var array_keys = $array("one",2,"three",4,"five")
var array_vals = $array(6,7,8,9,0)
var elements = $asize(array_keys)

var table = $hnew(elements)

var step = elements
while (step -= 1) >= 0 $hadd(table, $hkey(array_keys[step]), array_vals[step])

/*
$hiter accepts a hashtable and a function that accepts two args, key, val
*/
var show = function(k, v) $print("Hashed key: ", sprintf("%10d", k), " Value: ", v, "\n")
$hiter(table, show)</lang>

{{out}}
<pre>prompt$ nekoc hash-two-arrays.neko
prompt$ neko hash-two-arrays.n
Hashed key: 13898426 Value: 8
Hashed key: 38662 Value: 6
Hashed key: 2 Value: 7
Hashed key: 4 Value: 9
Hashed key: 737454 Value: 0</pre>


=={{header|NetRexx}}==
=={{header|NetRexx}}==