--- stack/stack.h 2003/08/04 11:22:02 1.22 +++ stack/stack.h 2003/08/04 14:13:16 1.24 @@ -57,6 +57,11 @@ struct cons_struct; struct symbol_struct; +struct environment_struct; + +/* A type for pointers to external functions */ +typedef void (*funcp)(struct environment_struct*); +/* funcp is a pointer to a void function (environment *) */ /* A value of some type */ typedef struct { @@ -86,6 +91,8 @@ FILE *p; /* ...or an I/O stream */ int i; /* ...or an integer */ float f; /* ...or a floating point number */ + funcp func; /* ...or a function pointer */ + char *string; /* ...or a string */ } content; /* Stores a pointer or an integer */ } value; @@ -133,9 +140,6 @@ int gc_count; /* Amount currently allocated */ } environment; -/* A type for pointers to external functions */ -typedef void (*funcp)(environment*); /* funcp is a pointer to a void - function (environment *) */ void init_env(environment*); void printerr(const char*);