From d431e548b85ba768deb82dd903f363d3754e775f Mon Sep 17 00:00:00 2001
From: Mikael Pettersson <mikpelinux@gmail.com>
Date: Sun, 5 Jul 2020 15:54:33 +0200
Subject: [PATCH] sim: sim_loader: convert entry point from byte to word
 address

---
 erlang/apps/sim/src/sim_loader.erl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/erlang/apps/sim/src/sim_loader.erl b/erlang/apps/sim/src/sim_loader.erl
index 4467d35..85f8abe 100644
--- a/erlang/apps/sim/src/sim_loader.erl
+++ b/erlang/apps/sim/src/sim_loader.erl
@@ -132,7 +132,8 @@ byte_address_to_global_byte_pointer(ByteAddress) ->
   PS = 8#70 + (ByteAddress band 3),
   (PS bsl 30) bor Y.
 
-load_phtab(_FP, Ehdr, _PhTab = [], _PhdrIx, _Mem) -> {ok, Ehdr#elf36_Ehdr.e_entry};
+load_phtab(_FP, Ehdr, _PhTab = [], _PhdrIx, _Mem) ->
+  {ok, byte_address_to_global_word_address(Ehdr#elf36_Ehdr.e_entry)};
 load_phtab(FP, Ehdr, [Phdr | PhTab], PhdrIx, Mem) ->
   case load_phdr(FP, Phdr, PhdrIx, Mem) of
     ok -> load_phtab(FP, Ehdr, PhTab, PhdrIx + 1, Mem);