initial commit
This commit is contained in:
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: env.c,v 1.17 2007-03-06 14:58:00 bacon Exp $
|
||||
* $Id: env.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: env.h,v 1.12 2007-02-10 13:52:22 bacon Exp $
|
||||
* $Id: env.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: err.c,v 1.15 2007-03-06 14:59:59 bacon Exp $
|
||||
* $Id: err.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: eval.c,v 1.29 2007-03-15 14:19:23 bacon Exp $
|
||||
* $Id: eval.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: lsp.c,v 1.28 2007-03-07 12:14:29 bacon Exp $
|
||||
* $Id: lsp.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: lsp.h,v 1.43 2007-03-06 14:59:59 bacon Exp $
|
||||
* $Id: lsp.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: lsp_i.h,v 1.10 2007-02-23 15:22:36 bacon Exp $
|
||||
* $Id: lsp_i.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
#
|
||||
# $Id: makefile.in,v 1.17 2007-04-10 07:26:06 bacon Exp $
|
||||
# $Id: makefile.in,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
#
|
||||
|
||||
NAME = aselsp
|
||||
@ -36,50 +36,50 @@ OBJ_FILES = \
|
||||
|
||||
lib: $(OUT_FILE)
|
||||
|
||||
$(OUT_FILE): $(TMP_DIR) $(OBJ_FILES) $(OUT_DIR)
|
||||
$(OUT_FILE): $(OBJ_FILES) $(OUT_DIR)
|
||||
$(AR) cr $(OUT_FILE) $(OBJ_FILES)
|
||||
if [ "$(RANLIB)" = "ranlib" ]; then ranlib $(OUT_FILE); fi
|
||||
|
||||
$(TMP_DIR)/lsp.o: lsp.c
|
||||
$(TMP_DIR)/lsp.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c lsp.c
|
||||
|
||||
$(TMP_DIR)/name.o: name.c
|
||||
$(TMP_DIR)/name.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c name.c
|
||||
|
||||
$(TMP_DIR)/mem.o: mem.c
|
||||
$(TMP_DIR)/mem.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c mem.c
|
||||
|
||||
$(TMP_DIR)/env.o: env.c
|
||||
$(TMP_DIR)/env.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c env.c
|
||||
|
||||
$(TMP_DIR)/err.o: err.c
|
||||
$(TMP_DIR)/err.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c err.c
|
||||
|
||||
$(TMP_DIR)/eval.o: eval.c
|
||||
$(TMP_DIR)/eval.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c eval.c
|
||||
|
||||
$(TMP_DIR)/read.o: read.c
|
||||
$(TMP_DIR)/read.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c read.c
|
||||
|
||||
$(TMP_DIR)/print.o: print.c
|
||||
$(TMP_DIR)/print.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c print.c
|
||||
|
||||
$(TMP_DIR)/misc.o: misc.c
|
||||
$(TMP_DIR)/misc.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c misc.c
|
||||
|
||||
$(TMP_DIR)/prim.o: prim.c
|
||||
$(TMP_DIR)/prim.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c prim.c
|
||||
|
||||
$(TMP_DIR)/prim_prog.o: prim_prog.c
|
||||
$(TMP_DIR)/prim_prog.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c prim_prog.c
|
||||
|
||||
$(TMP_DIR)/prim_let.o: prim_let.c
|
||||
$(TMP_DIR)/prim_let.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c prim_let.c
|
||||
|
||||
$(TMP_DIR)/prim_compar.o: prim_compar.c
|
||||
$(TMP_DIR)/prim_compar.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c prim_compar.c
|
||||
|
||||
$(TMP_DIR)/prim_math.o: prim_math.c
|
||||
$(TMP_DIR)/prim_math.o: $(TMP_DIR)
|
||||
$(CC) $(CFLAGS) -o $@ -c prim_math.c
|
||||
|
||||
$(OUT_DIR):
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: mem.c,v 1.36 2007-04-14 15:30:14 bacon Exp $
|
||||
* $Id: mem.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
@ -326,7 +326,7 @@ static void __mark_objs_in_use (ase_lsp_mem_t* mem)
|
||||
if (mem->macro != ASE_NULL) __mark_obj (mem->lsp, mem->macro);
|
||||
}
|
||||
|
||||
//#include <ase/utl/stdio.h>
|
||||
#include <ase/utl/stdio.h>
|
||||
static void __sweep_unmarked_objs (ase_lsp_mem_t* mem)
|
||||
{
|
||||
ase_lsp_obj_t* obj, * prev, * next;
|
||||
@ -350,7 +350,6 @@ static void __sweep_unmarked_objs (ase_lsp_mem_t* mem)
|
||||
ASE_LSP_PERM(obj) == 0)
|
||||
{
|
||||
/* dispose of unused objects */
|
||||
/*
|
||||
if (i == ASE_LSP_OBJ_INT)
|
||||
ase_printf (ASE_T("disposing....%d [%d]\n"), i, (int)ASE_LSP_IVAL(obj));
|
||||
if (i == ASE_LSP_OBJ_REAL)
|
||||
@ -361,7 +360,6 @@ else if (i == ASE_LSP_OBJ_STR)
|
||||
ase_printf (ASE_T("disposing....%d [%s]\n"), i, ASE_LSP_STRPTR(obj));
|
||||
else
|
||||
ase_printf (ASE_T("disposing....%d\n"), i);
|
||||
*/
|
||||
ase_lsp_dispose (mem, prev, obj);
|
||||
}
|
||||
else
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: mem.h,v 1.18 2007-02-10 13:52:23 bacon Exp $
|
||||
* $Id: mem.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: misc.c,v 1.12 2007-03-07 12:14:29 bacon Exp $
|
||||
* $Id: misc.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: misc.h,v 1.4 2007-02-03 10:51:52 bacon Exp $
|
||||
* $Id: misc.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: name.c,v 1.16 2007-03-07 12:14:29 bacon Exp $
|
||||
* $Id: name.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: name.h,v 1.10 2007-03-06 14:16:53 bacon Exp $
|
||||
* $Id: name.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: obj.h,v 1.18 2007-03-15 14:19:23 bacon Exp $
|
||||
* $Id: obj.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: prim.c,v 1.25 2007-03-15 14:19:23 bacon Exp $
|
||||
* $Id: prim.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: prim.h,v 1.15 2007-02-13 06:00:20 bacon Exp $
|
||||
* $Id: prim.h,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: prim_compar.c,v 1.16 2007-03-08 13:58:52 bacon Exp $
|
||||
* $Id: prim_compar.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: prim_let.c,v 1.13 2007-02-13 06:00:20 bacon Exp $
|
||||
* $Id: prim_let.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: prim_math.c,v 1.20 2007-03-08 13:58:52 bacon Exp $
|
||||
* $Id: prim_math.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: prim_prog.c,v 1.8 2007-02-10 13:52:23 bacon Exp $
|
||||
* $Id: prim_prog.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: print.c,v 1.26 2007-02-24 14:32:11 bacon Exp $
|
||||
* $Id: print.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
@ -1,5 +1,5 @@
|
||||
/*
|
||||
* $Id: read.c,v 1.33 2007-03-06 14:58:00 bacon Exp $
|
||||
* $Id: read.c,v 1.1 2007/03/28 14:05:24 bacon Exp $
|
||||
*
|
||||
* {License}
|
||||
*/
|
||||
|
Reference in New Issue
Block a user