26 lines
766 B
C
26 lines
766 B
C
/*
|
|
* SPDX-FileCopyrightText: 2025 William Bell
|
|
*
|
|
* SPDX-License-Identifier: GPL-3.0-or-later
|
|
*/
|
|
|
|
#include "../translator.h"
|
|
#include "number.h"
|
|
#include <gmp.h>
|
|
#include <stddef.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
size_t translate_parsed_number(Translated *translated, char *number_str, size_t to_register) {
|
|
size_t length = strlen(number_str)+1;
|
|
size_t number_pos = arena_push(&translated->constants, number_str, length);
|
|
set_registers(translated, to_register+1);
|
|
|
|
size_t start = push_instruction_byte(translated, OP_LOAD_CONST);
|
|
push_instruction_byte(translated, to_register);
|
|
|
|
push_instruction_byte(translated, TYPE_OP_NUMBER);
|
|
push_instruction_code(translated,length);
|
|
push_instruction_code(translated, number_pos);
|
|
return start;
|
|
} |