diff --git a/test/Makefile b/test/Makefile index 6e1b14d..4afb8a9 100644 --- a/test/Makefile +++ b/test/Makefile @@ -1,36 +1,54 @@ CC = clang CFLAGS := -Wall -g -I../src OBJS = ../build/liblake.a -TESTS = test_comment test_dlist test_env test_eval test_fn test_int test_lake +TESTS = test_comment \ + test_dlist \ + test_env \ + test_eval \ + test_fn \ + test_int \ + test_lake \ + test_list + all: $(TESTS) - @for test in $(TESTS); do \ - echo; \ - ./$$test; \ - done test: all test_comment: laketest.o test_comment.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_comment + @echo test_dlist: laketest.o test_dlist.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_dlist + @echo test_env: laketest.o test_env.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_eval + @echo test_eval: laketest.o test_eval.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_eval + @echo test_fn: laketest.o test_fn.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_fn + @echo test_int: laketest.o test_int.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_int + @echo test_lake: laketest.o test_lake.o $(CC) $(CFLAGS) $^ $(OBJS) -o $@ + @./test_lake + @echo clean: -rm -f *.o $(TESTS) diff --git a/test/test_list.c b/test/test_list.c new file mode 100644 index 0000000..1dd6d5c --- /dev/null +++ b/test/test_list.c @@ -0,0 +1,148 @@ +/** + * test_lake.c + * Lake Scheme + * + * Copyright 2011 Sami Samhuri + * MIT License + * + */ + +#include +#include "laketest.h" +#include "lake.h" +#include "list.h" + +void setup(void); +static char *test_list_make(void); +static char *test_list_cons(void); +static char *test_list_make_with_capacity(void); +static char *test_list_from_array(void); +static char *test_list_copy(void); +static char *test_list_set(void); +static char *test_list_append(void); +static char *test_list_get(void); +static char *test_list_len(void); +static char *test_list_pop(void); +static char *test_list_shift(void); +static char *test_list_unshift(void); +static char *test_list_equal(void); +static char *test_list_to_str(void); +static char *test_list_repr(void); + +int main(int argc, char const *argv[]) +{ + setup(); + return !lt_run_tests("List", (test_fn[]){ + test_list_make, + test_list_cons, + test_list_make_with_capacity, + test_list_from_array, + test_list_copy, + test_list_set, + test_list_append, + test_list_get, + test_list_len, + test_list_pop, + test_list_shift, + test_list_unshift, + test_list_equal, + test_list_to_str, + test_list_repr, + NULL + }); +} + +void setup(void) +{ + // TODO +} + +/* LakeList *list_make(void) */ +static char *test_list_make(void) +{ + return 0; +} + +/* LakeList *list_cons(LakeVal *car, LakeVal *cdr) */ +static char *test_list_cons(void) +{ + return 0; +} + +/* LakeList *list_make_with_capacity(size_t cap) */ +static char *test_list_make_with_capacity(void) +{ + return 0; +} + +/* LakeList *list_from_array(size_t n, LakeVal *vals[]) */ +static char *test_list_from_array(void) +{ + return 0; +} + +/* LakeList *list_copy(LakeList *list) */ +static char *test_list_copy(void) +{ + return 0; +} + +/* LakeVal *list_set(LakeList *list, size_t i, LakeVal *val) */ +static char *test_list_set(void) +{ + return 0; +} + +/* LakeVal *list_append(LakeList *list, LakeVal *val) */ +static char *test_list_append(void) +{ + return 0; +} + +/* LakeVal *list_get(LakeList *list, LakeInt *li) */ +static char *test_list_get(void) +{ + return 0; +} + +/* LakeInt *list_len(LakeList *list) */ +static char *test_list_len(void) +{ + return 0; +} + +/* LakeVal *list_pop(LakeList *list) */ +static char *test_list_pop(void) +{ + return 0; +} + +/* LakeVal *list_shift(LakeList *list) */ +static char *test_list_shift(void) +{ + return 0; +} + +/* LakeVal *list_unshift(LakeList *list, LakeVal *val) */ +static char *test_list_unshift(void) +{ + return 0; +} + +/* int list_equal(LakeList *a, LakeList *b) */ +static char *test_list_equal(void) +{ + return 0; +} + +/* LakeStr *list_to_str(LakeList *list) */ +static char *test_list_to_str(void) +{ + return 0; +} + +/* char *list_repr(LakeList *list) */ +static char *test_list_repr(void) +{ + return 0; +}