sam/klisp
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Added equality comparisons == and !=

Browse Source
This commit is contained in:
Sam Stevens
2014-05-29 15:28:07 +01:00
parent 3df5b9ae84
commit d4e84782ef
9 changed files with 106 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lval.h
View File

@@ -19,6 +19,7 @@ typedef struct lval lval;
struct lval_func;
typedef struct lval_func lval_func;
#include "main.h"
#include "lenv.h"
enum VAL_TYPE { LVAL_ERR, LVAL_NUM, LVAL_SYM, LVAL_FUNC, LVAL_S_EXPR, LVAL_Q_EXPR, LVAL_EXIT };
@@ -67,7 +68,9 @@ lval* lval_add(lval* val, lval* x);
lval* lval_pop(lval* val, int i);
lval* lval_take(lval* val, int i);
lval* lval_join(lval* a, lval* b);
lval* lval_call(lenv* env, lval* function, lval* args);
BOOL lval_equal(lval* a, lval* b);
void lval_delete(lval* val);
lval* lval_copy(lval* current);