bshell/bshell.runtime/compile/hashtable.c

#include "compile-node.h"

static const struct compile_value_type hashtable_type = {};
static const struct compile_value_type hashtable_item_type = {};

struct compile_result compile_hashtable(
	struct compile_ctx *ctx,
	struct bshell_ast_node *src)
{
	struct bshell_hashtable_ast_node *hashtable
		= (struct bshell_hashtable_ast_node *)src;
	size_t nr_items = fx_queue_length(&hashtable->n_items);
	for (size_t i = 0; i < nr_items; i++) {
		struct compile_value *item = compile_pop_value(ctx);
		compile_value_load(ctx, item);
		compile_value_destroy(item);
	}

	bshell_scriptblock_push_instruction(
		ctx->c_block,
		BSHELL_OPCODE_MK_HTAB,
		nr_items);
	compile_push_value(ctx, &hashtable_type, src);
	return COMPILE_OK(0);
}

struct compile_result compile_hashtable_item(
	struct compile_ctx *ctx,
	struct bshell_ast_node *src)
{
	struct compile_value *value = compile_pop_value(ctx);
	struct compile_value *key = compile_pop_value(ctx);
	compile_value_load(ctx, key);
	compile_value_load(ctx, value);
	compile_value_destroy(key);
	compile_value_destroy(value);

	compile_push_value(ctx, &hashtable_item_type, src);
	return COMPILE_OK(0);
}