Martin Dørum 3 роки тому
джерело
коміт
400172f03f
2 змінених файлів з 4 додано та 4 видалено
  1. 2
    2
      test/src/eval.t.c
  2. 2
    2
      test/src/namespace.t.c

+ 2
- 2
test/src/eval.t.c Переглянути файл

@@ -13,7 +13,7 @@ static struct l2_vm vm;

static struct l2_vm_value *var_lookup(const char *name) {
l2_word atom_id = l2_strset_get(&gen.atomset, name);
l2_word id = l2_vm_namespace_get(&vm, &vm.values[vm.nstack[0]], atom_id);
l2_word id = l2_vm_namespace_get(&vm, &vm.values[vm.nstack[1]], atom_id);
return &vm.values[id];
}

@@ -76,7 +76,7 @@ describe(eval) {
defer(l2_gen_free(&gen));

asserteq(l2_vm_value_type(var_lookup("foo")), L2_VAL_TYPE_BUFFER);
struct l2_vm_buffer *buf = var_lookup("foo")->data;
struct l2_vm_buffer *buf = var_lookup("foo")->buffer;
asserteq(buf->len, 11);
assert(strncmp(buf->data, "hello world", 11) == 0);
}

+ 2
- 2
test/src/namespace.t.c Переглянути файл

@@ -8,8 +8,8 @@ describe(l2_vm_namespace) {
struct l2_vm_value val = {0};

after_each() {
free(val.data);
val.data = NULL;
free(val.ns);
val.ns = NULL;
}

test("basic functionality") {

Завантаження…
Відмінити
Зберегти