github.com/mikpe.pdp10-tools
1
0
Fork 0
mirror of https://github.com/mikpe/pdp10-tools.git synced 2026-01-22 02:26:24 +00:00
Code Issues Projects Releases Wiki Activity

sim_core: export calculate_ea/5

Browse Source
This commit is contained in:
Mikael Pettersson 2020-10-17 16:32:57 +02:00
parent 0e7ff775f7
commit 95495580cd
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
erlang/apps/sim/src/sim_core.erl
View File

@ -28,6 +28,7 @@
, run/2
, next_pc/2
, skip/2
, calculate_ea/5
, page_fault/6
, c/3
, cset/4
@ -142,6 +143,13 @@ insn_fetch2(Core, Mem, MB) ->
calculate_ea(Core, Mem, MB, ESection,
fun(Core1, Mem1, EA) -> dispatch(Core1, Mem1, IR, EA) end).
-spec calculate_ea(Core :: #core{},
Mem :: sim_mem:mem(),
MB :: word(),
ESection :: word(),
Cont :: fun((#core{}, sim_mem:mem(), #ea{})
-> {#core{}, sim_mem:mem(), {ok, integer()} | {error, {module(), term()}}}))
-> {#core{}, sim_mem:mem(), {ok, integer()} | {error, {module(), term()}}}.
calculate_ea(Core, Mem, MB, ESection, Cont) ->
local_format_address_word(Core, Mem, MB, ESection, Cont).

1
erlang/rebar.config
View File

@ -71,6 +71,7 @@
%% actual unused exports
, {pdp10_opcodes, cpu_device_from_name, 2}
, {pdp10_opcodes, models_from_name, 1}
, {sim_core, calculate_ea, 5}
]}.
{escript_emu_args, "%%! +sbtu +A1 +Bd -noshell -smp auto\n"}.