github.com/mikpe.pdp10-tools
1
0
Fork 0
mirror of https://github.com/mikpe/pdp10-tools.git synced 2026-05-04 23:16:14 +00:00
Code Issues Projects Releases Wiki Activity

sim: sim_boolean: handle SETMM, add unit test

Browse Source
This commit is contained in:
Mikael Pettersson
2020-07-23 19:16:46 +02:00
parent 40c36a5f6e
commit 45c852e4fe
3 changed files with 27 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
erlang/apps/sim/src/sim_boolean.erl
View File

@@ -33,6 +33,7 @@
, handle_ANDI/4
, handle_ANDM/4
, handle_SETMI/4
, handle_SETMM/4
, handle_SETZ/4
, handle_SETZB/4
, handle_SETZM/4
@@ -206,6 +207,18 @@ handle_SETMI(Core, Mem, IR, #ea{section = Section0, offset = Offset, islocal = I
Word = (Section1 bsl 18) bor Offset,
sim_core:next_pc(sim_core:set_ac(Core, AC, Word), Mem).
-spec handle_SETMM(#core{}, sim_mem:mem(), IR :: word(), #ea{})
-> {#core{}, sim_mem:mem(), {ok, integer()} | {error, {module(), term()}}}.
handle_SETMM(Core, Mem, IR, EA) ->
%% SETMM only checks that E is readable and writable.
case sim_core:c(Core, Mem, EA) of
{ok, CE} ->
handle_ANDM_1(Core, Mem, EA, CE);
{error, Reason} ->
sim_core:page_fault(Core, Mem, ea_address(EA), read, Reason,
fun(Core1, Mem1) -> handle_SETMM(Core1, Mem1, IR, EA) end)
end.
%% Miscellaneous ===============================================================
ea_address(#ea{section = Section, offset = Offset}) ->