Mercurial > lbo > hg > ylisp
changeset 137:08d010255027
base: add some little doc bits
author | Lewin Bormann <lbo@spheniscida.de> |
---|---|
date | Sun, 01 Sep 2019 22:57:51 +0200 |
parents | b930e16125fb |
children | 74fadb9ea35f |
files | src/base/str.h src/base/vec.h src/eval.c |
diffstat | 3 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/base/str.h Sun Sep 01 19:35:40 2019 +0200 +++ b/src/base/str.h Sun Sep 01 22:57:51 2019 +0200 @@ -14,6 +14,7 @@ static const size_t YSTR_SMALL_THRESHOLD = sizeof(yvec_t) - 2; +/// ystr_t is a dynamically allocated, growable, NULL-terminated string. typedef struct { /// The string value. union {
--- a/src/base/vec.h Sun Sep 01 19:35:40 2019 +0200 +++ b/src/base/vec.h Sun Sep 01 22:57:51 2019 +0200 @@ -47,6 +47,7 @@ #define YVEC_PUSH(vecp, elemp) \ (assert((vecp)->size == sizeof(*(elemp))), yvec_push(vecp, (void *)(elemp))) +/// Create a new vector from `src` with `len` elements of `TYPE`. #define YVEC_NEW(src, len, TYPE) yvec_new(src, sizeof(TYPE), len) /**
--- a/src/eval.c Sun Sep 01 19:35:40 2019 +0200 +++ b/src/eval.c Sun Sep 01 22:57:51 2019 +0200 @@ -18,7 +18,6 @@ return exc; } yvec_t* args = &ref->args; - size_t stack_start = state->call_stack.len - 1; for (size_t i = 0; i < args->len; i++) { yexpr_t evald = yeval(state, YVEC_AT(&call->value.list, i + 1, yexpr_t), false);