1 files changed, 0 insertions, 151 deletions
diff --git a/alsa-lib/src/alisp/alisp_local.h b/alsa-lib/src/alisp/alisp_local.h
deleted file mode 100644
index 4558ebb..0000000
--- a/alsa-lib/src/alisp/alisp_local.h
+++ /dev/null
@@ -1,151 +0,0 @@
-/*
- *  ALSA lisp implementation
- *  Copyright (c) 2003 by Jaroslav Kysela <perex@perex.cz>
- *
- *  Based on work of Sandro Sigala (slisp-1.2)
- *
- *
- *   This library is free software; you can redistribute it and/or modify
- *   it under the terms of the GNU Lesser General Public License as
- *   published by the Free Software Foundation; either version 2.1 of
- *   the License, or (at your option) any later version.
- *
- *   This program is distributed in the hope that it will be useful,
- *   but WITHOUT ANY WARRANTY; without even the implied warranty of
- *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- *   GNU Lesser General Public License for more details.
- *
- *   You should have received a copy of the GNU Lesser General Public
- *   License along with this library; if not, write to the Free Software
- *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
- *
- */
-
-#include "list.h"
-
-enum alisp_tokens {
-	ALISP_IDENTIFIER,
-	ALISP_INTEGER,
-	ALISP_FLOAT,
-	ALISP_FLOATE,
-	ALISP_STRING
-};
-
-enum alisp_objects {
-	ALISP_OBJ_INTEGER,
-	ALISP_OBJ_FLOAT,
-	ALISP_OBJ_IDENTIFIER,
-	ALISP_OBJ_STRING,
-	ALISP_OBJ_POINTER,
-	ALISP_OBJ_CONS,
-	ALISP_OBJ_LAST_SEARCH = ALISP_OBJ_CONS,
-	ALISP_OBJ_NIL,
-	ALISP_OBJ_T,
-};
-
-struct alisp_object;
-
-#define ALISP_TYPE_MASK	0xf0000000
-#define ALISP_TYPE_SHIFT 28
-#define ALISP_REFS_MASK 0x0fffffff
-#define ALISP_REFS_SHIFT 0
-#define ALISP_MAX_REFS (ALISP_REFS_MASK>>ALISP_REFS_SHIFT)
-#define ALISP_MAX_REFS_LIMIT ((ALISP_MAX_REFS + 1) / 2)
-
-struct alisp_object {
-	struct list_head list;
-	unsigned int	type_refs;	/* type and count of references */
-	union {
-		char	*s;
-		long	i;
-		double	f;
-		const void *ptr;
-		struct {
-			struct alisp_object *car;
-			struct alisp_object *cdr;
-		} c;
-	} value;
-};
-
-static inline enum alisp_objects alisp_get_type(struct alisp_object *p)
-{
-	return (p->type_refs >> ALISP_TYPE_SHIFT);
-}
-
-static inline void alisp_set_type(struct alisp_object *p, enum alisp_objects type)
-{
-	p->type_refs &= ~ALISP_TYPE_MASK;
-	p->type_refs |= (unsigned int)type << ALISP_TYPE_SHIFT;
-}
-
-static inline int alisp_compare_type(struct alisp_object *p, enum alisp_objects type)
-{
-	return ((unsigned int)type << ALISP_TYPE_SHIFT) ==
-	       (p->type_refs & ALISP_TYPE_MASK);
-}
-
-static inline void alisp_set_refs(struct alisp_object *p, unsigned int refs)
-{
-	p->type_refs &= ~ALISP_REFS_MASK;
-	p->type_refs |= refs & ALISP_REFS_MASK;
-}
-
-static inline unsigned int alisp_get_refs(struct alisp_object *p)
-{
-	return p->type_refs & ALISP_REFS_MASK;
-}
-
-static inline unsigned int alisp_inc_refs(struct alisp_object *p)
-{
-	unsigned r = alisp_get_refs(p) + 1;
-	alisp_set_refs(p, r);
-	return r;
-}
-
-static inline unsigned int alisp_dec_refs(struct alisp_object *p)
-{
-	unsigned r = alisp_get_refs(p) - 1;
-	alisp_set_refs(p, r);
-	return r;
-}
-
-struct alisp_object_pair {
-	struct list_head list;
-	const char *name;
- 	struct alisp_object *value;
-};
-
-#define ALISP_LEX_BUF_MAX	16
-#define ALISP_OBJ_PAIR_HASH_SHIFT 4
-#define ALISP_OBJ_PAIR_HASH_SIZE (1<<ALISP_OBJ_PAIR_HASH_SHIFT)
-#define ALISP_OBJ_PAIR_HASH_MASK (ALISP_OBJ_PAIR_HASH_SIZE-1)
-#define ALISP_FREE_OBJ_POOL	512	/* free objects above this pool */
-
-struct alisp_instance {
-	int verbose: 1,
-	    warning: 1,
-	    debug: 1;
-	/* i/o */
-	snd_input_t *in;
-	snd_output_t *out;
-	snd_output_t *eout;	/* error output */
-	snd_output_t *vout;	/* verbose output */
-	snd_output_t *wout;	/* warning output */
-	snd_output_t *dout;	/* debug output */
-	/* lexer */
-	int charno;
-	int lineno;
-	int lex_buf[ALISP_LEX_BUF_MAX];
-	int *lex_bufp;
-	char *token_buffer;
-	int token_buffer_max;
-	int thistoken;
-	/* object allocator / storage */
-	long free_objs;
-	long used_objs;
-	long max_objs;
-	struct list_head free_objs_list;
-	struct list_head used_objs_list[ALISP_OBJ_PAIR_HASH_SIZE][ALISP_OBJ_LAST_SEARCH + 1];
-	/* set object */
-	struct list_head setobjs_list[ALISP_OBJ_PAIR_HASH_SIZE];
-};