#include <string.h>
#include <stddef.h>
#include <stdio.h>
#include <stdlib.h>
#include <errno.h>

#include "scheme48.h"
#define Alloc(type) 	((type *) malloc(sizeof(type)))
#define Malloc(type,n)	((type *) malloc(sizeof(type)*(n)))
#define Free(p)		(free((char *)(p)))
#define Realloc(type,p,n) ((type *) realloc(p, (n)*sizeof(type)))

/* String equality predicate. */
#define streq(a,b) (!strcmp((a),(b)))

s48_value char_pp_2_string_list(char **);
char *scheme2c_strcpy(s48_value sstr);

/* The rest is needed by dbm.c and ndbm.c only */
s48_value strlen_or_false(const char *s);
void cig_check_nargs(int arity, int nargs, const char *fn);