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 ALWAYS USE THIS AS VIA A POINTER, i.e.
37 Scheme_hash_table * tab;
43 Scheme_hash_table tab;
46 class Scheme_hash_table : private Scm_stl_map
49 bool try_retrieve (SCM key, SCM *val);
50 bool elem_b (SCM key) const;
53 WARNING: putting something in assumes responsibility for cleaning
55 void set (SCM k, SCM v);
56 SCM get (SCM k) const;
59 void operator = (Scheme_hash_table const &);
60 Scheme_hash_table (Scheme_hash_table const &);
61 virtual ~Scheme_hash_table ();
63 SCM to_alist () const;
66 #endif /* SCM_HASH_HH */