From 8f5304ad90d7d7e0cd282344b3358defa07ba1d4 Mon Sep 17 00:00:00 2001 From: mfranz <mfranz> Date: Sun, 15 Feb 2009 14:13:49 +0000 Subject: [PATCH] add values() function as a counterpiece to keys() (see Perl) --- Nasal/globals.nas | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/Nasal/globals.nas b/Nasal/globals.nas index e0e5a73f1..f0001f5a7 100644 --- a/Nasal/globals.nas +++ b/Nasal/globals.nas @@ -12,7 +12,7 @@ var M2NM = 1 / NM2M; var KT2MPS = 0.5144444444; # knots to m/s var MPS2KT = 1 / KT2MPS; -var LB2KG = 0.45359237; # pounds to kilogram +var LB2KG = 0.45359237; # pounds to kg var KG2LB = 1 / LB2KG; var GAL2L = 3.785411784; # US gallons to liter @@ -133,6 +133,16 @@ var thisfunc = func caller(1)[1]; var printf = func print(call(sprintf, arg)); +## +# Returns vector of hash values. +# +var values = func(hash) { + var vec = []; + foreach(var key; keys(hash)) append(vec, hash[key]); + return vec; +} + + ## # Print log messages in appropriate --log-level. # Usage: printlog("warn", "...");