hare

commit 00aecf1ed02d2a1c2a2cdda588f1f9eebbdf1c8d
parent 917f24dae32ad42b6d86848c0b2804cd26f150e0
Author: Drew DeVault <sir@cmpwn.com>
Date:   Fri,  3 Sep 2021 09:23:58 +0200

hare::unit: add test for access exprs

Signed-off-by: Drew DeVault <sir@cmpwn.com>

Diffstat:
M
hare/unit/process.ha
 | 
19
+++++++++++++++++++

1 file changed, 19 insertions(+), 0 deletions(-)
diff --git a/hare/unit/process.ha b/hare/unit/process.ha
@@ -124,6 +124,25 @@ fn process_access(ctx: *context, aexpr: *ast::expr) (*expr | error) = {
 	});
 };
 
+@test fn access() void = {
+	// TODO: Test error cases, more access types
+	const ctx = mktestctx();
+	defer freetestctx(&ctx);
+	const object = scope_insert(&ctx, object {
+		kind = object_kind::BIND,
+		ident = ["hello"],
+		name = ["hello"],
+		_type = &types::builtin_u32,
+	});
+	const aexpr = parse_expr("hello");
+	defer ast::expr_free(aexpr);
+	const expr = process_access(&ctx, aexpr)!;
+	const access = expr.expr as access;
+	const ao = access as access_object;
+	assert(ao == object);
+	assert(expr.result == &types::builtin_u32);
+};
+
 fn process_binding(ctx: *context, aexpr: *ast::expr) (*expr | error) = {
 	const bind = aexpr.expr as ast::binding_expr;
 	assert(!bind.is_static && !bind.is_const); // TODO