mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-25 22:34:26 +00:00
8520a4c88c
Estimated hours taken: 6
A general cleanup of the code in the runtime directory, aimed at
formulating a more coherent header file inclusion policy. This change
fixes a couple of bugs that prevented the runtime from compiling in
certain configurations (e.g. on muse) due to missing #includes, and
also fixes a few minor unrelated things such as the use of `size_t'
instead of `unsigned'.
Our header file inclusion policy is that every header file should
#include any other header files needed by the declarations or by the
macros it defines. Cyclic interface dependencies, where two header
files each #include the other, must be avoided (by splitting up header
files into smaller indepdent units, if necessary).
At some stage in the future we should rename all the header files to
`mercury_*.h', to avoid any possible name clashes with system or user
header files.
runtime/Mmake:
Add a new target `check_headers' to check that each
header file is syntactically valid in isolation.
runtime/imp.h:
runtime/mercury_float.h:
runtime/mercury_string.h:
runtime/mercury_types.h:
runtime/calls.h:
Move the code in "imp.h" into new header files.
"imp.h" now contains nothing but #includes.
runtime/conf.h.in:
runtime/*.h:
runtime/{label,prof,prof_mem}.c:
runtime/*.mod:
Update the #includes to reflect the new header file structure.
Add some missing header guards. Add some comments.
Put the correct years in most of the copyright notices.
runtime/heap.h:
Fix a bug: add #include "context.h", needed for
min_heap_reclamation_point.
runtime/context.h:
Fix a bug: add #include "memory.h", needed for MemoryZone.
Move the general description comment to the top of the file.
Fix the indentation of some comments. Add a couple of new comments.
runtime/context.mod:
Delete a couple of unnecessary declarations.
runtime/wrapper.mod:
Change the type used for memory sizes from `unsigned' to `size_t'.
Change the `-p' (primary cache size) option so that it is always
a size in kilobytes, rather than being schitzophrenic about
whether it is bytes or kilobytes.
runtime/regorder_base.h:
Removed, since it not used (and constitutes a
double-maintenance problem).
44 lines
1.3 KiB
C
44 lines
1.3 KiB
C
/*
|
|
** Copyright (C) 1993-1995, 1997 University of Melbourne.
|
|
** This file may only be copied under the terms of the GNU Library General
|
|
** Public License - see the file COPYING.LIB in the Mercury distribution.
|
|
*/
|
|
|
|
/*
|
|
** table.h - defines the interface to the hash table module.
|
|
*/
|
|
|
|
#ifndef TABLE_H
|
|
#define TABLE_H
|
|
|
|
#include "std.h" /* for bool */
|
|
#include "dlist.h" /* for List */
|
|
|
|
typedef struct s_table
|
|
{
|
|
int ta_size;
|
|
List **ta_store;
|
|
const void * (*ta_key)(const void *); /* applied to entries */
|
|
int (*ta_hash)(const void *); /* applied to keys */
|
|
bool (*ta_equal)(const void *, const void *);
|
|
/* applied to two keys */
|
|
} Table;
|
|
|
|
#define init_table(t) tab_init_table(&t)
|
|
#define lookup_table(t, k) tab_lookup_table(&t, (const void *) k)
|
|
#define insert_table(t, e) tab_insert_table(&t, (void *) e)
|
|
#define get_all_entries(t) tab_get_all_entries(&t)
|
|
#define str_to_int(val) tab_str_to_int(val)
|
|
|
|
#define tablekey(table) (*(table->ta_key))
|
|
#define tablehash(table) (*(table->ta_hash))
|
|
#define tableequal(table) (*(table->ta_equal))
|
|
|
|
extern void tab_init_table(Table *);
|
|
extern void * tab_lookup_table(const Table *, const void *);
|
|
extern bool tab_insert_table(const Table *, void *);
|
|
extern List *tab_get_all_entries(const Table *);
|
|
extern int tab_str_to_int(const char *);
|
|
|
|
#endif
|