2 scm-hash.hh -- declare Scheme hasher.
4 source file of the GNU LilyPond music typesetter
6 (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
16 #include "lily-guile.hh"
17 #include "hash-table.hh"
23 bool operator () (SCM s1, SCM s2) const
25 return long(s1) < long (s2);
29 typedef map<SCM,SCM, SCM_less> Scm_stl_map;
32 auto resizing hash table. This should come from GUILE.
34 class Scheme_hash_table : private Scm_stl_map
37 bool try_retrieve (SCM key, SCM *val);
38 bool elem_b (SCM key) const;
41 WARNING: putting something in assumes responsibility for cleaning
43 void set (SCM k, SCM v);
44 SCM get (SCM k) const;
47 void operator = (Scheme_hash_table const &);
48 Scheme_hash_table (Scheme_hash_table const &);
49 virtual ~Scheme_hash_table ();
51 SCM to_alist () const;
54 #endif /* SCM_HASH_HH */