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}}== |