home *** CD-ROM | disk | FTP | other *** search
- extern LispObject Fn_tablep(LispObject*);
- extern LispObject Fn_make_table(LispObject*);
- extern LispObject Fn_table_parameters(LispObject*);
- extern LispObject Fn_tref(LispObject*);
- extern LispObject tref_updator(LispObject*);
- extern LispObject Fn_table_keys(LispObject*);
- extern int hash(char *);
-
- #define TREF(tab,key) EUCALL_2(Fn_tref, tab,key)
- #define TREF_UPDATE(tab,key,val) EUCALL_3(tref_updator,tab,key,val)
- #define TABLE_PARAMS(tab) EUCALL_1(Fn_table_parameters,tab)
- #define TABLE_KEYS(tab) EUCALL_1(Fn_table_keys,tab)
-