[Gimp-user] [script-fu] hset and href functions

[beppu@binq.org (John Beppu)]

I would like to use the href and hset functions to manipulate
hash tables.  The documentation for them on the SIOD home page[0]
is as follows:


    (href table key)
    The hash table is a one dimensional array of association lists.

	(define (href table key)
	  (cdr (assoc key
		  (aref table (sxhash key (length table))))))


    (hset table key value)
    Stores the value into the hash table slot indicated by key.


Unfortunately, I don't know how to create a hash table in the
first place.

While we're at it, if anyone knows how to create an array for
use with the aset and aref functions, that would be cool, too.

Sorry for not being a functional-super-hero, but I'm trying to
ease my way into this scheme thing.

Thanks!

[0] http://people.delphi.com/gjc/siod.html

-- 
package wuv'apqvjgt;($_=join('',(*PgtnHcemgt))) # print map "beppu\@$_\n", qw(
=~ s/([HaP])(?!e)/ \U>$1/g;s/^.|:| (?=A)|>//g;y # cpan.org  lbox.org  binq.org
/c-z/a-u/;print"J$_\n";#$^%$^X@.^ <!-- japh --> # oss.lineo.com codepoet.org);