diff options
| author | Alasdair Armstrong | 2018-06-19 18:40:50 +0100 |
|---|---|---|
| committer | Alasdair Armstrong | 2018-06-19 18:40:50 +0100 |
| commit | 4a09a35164be81467feea154ef7651ef96eaad88 (patch) | |
| tree | f63a1b118a1a3f9b099a34bae89a707a81341ba9 /lib/rts.c | |
| parent | 0dd140219040664000573cbcf8c8a4d26629feeb (diff) | |
Add elf parsing from Alastair
Diffstat (limited to 'lib/rts.c')
| -rw-r--r-- | lib/rts.c | 7 |
1 files changed, 5 insertions, 2 deletions
@@ -2,6 +2,7 @@ #include"sail.h" #include"rts.h" +#include"elf.h" void sail_match_failure(sail_string msg) { @@ -303,11 +304,13 @@ void trace_end(void) /* ***** ELF functions ***** */ -void elf_entry(mpz_t *rop, const unit u) { +void elf_entry(mpz_t *rop, const unit u) +{ mpz_set_ui(*rop, g_elf_entry); } -void elf_tohost(mpz_t *rop, const unit u) { +void elf_tohost(mpz_t *rop, const unit u) +{ mpz_set_ui(*rop, 0x0ul); } |
