mirror of
https://github.com/TomHarte/CLK.git
synced 2024-12-11 15:49:38 +00:00
Correct EXT, STOP, LINK output.
This commit is contained in:
parent
716153cf0a
commit
f8eb7dd015
@ -1065,8 +1065,8 @@ struct ProcessorStorageConstructor {
|
|||||||
case Operation::BSETl: opname = "BSET"; break;
|
case Operation::BSETl: opname = "BSET"; break;
|
||||||
|
|
||||||
DirectMap(TAS);
|
DirectMap(TAS);
|
||||||
DirectMap(EXTbtow);
|
case Operation::EXTbtow: opname = "EXT.w"; break;
|
||||||
DirectMap(EXTwtol);
|
case Operation::EXTwtol: opname = "EXT.l"; break;
|
||||||
DirectMap(LINK);
|
DirectMap(LINK);
|
||||||
DirectMap(UNLINK);
|
DirectMap(UNLINK);
|
||||||
DirectMap(STOP);
|
DirectMap(STOP);
|
||||||
@ -1188,6 +1188,7 @@ struct ProcessorStorageConstructor {
|
|||||||
switch(mapping.decoder) {
|
switch(mapping.decoder) {
|
||||||
case Decoder::STOP: {
|
case Decoder::STOP: {
|
||||||
program.set_requires_supervisor(true);
|
program.set_requires_supervisor(true);
|
||||||
|
dumper.set_source(Imm);
|
||||||
op(Action::None, seq("n"));
|
op(Action::None, seq("n"));
|
||||||
op(Action::PerformOperation);
|
op(Action::PerformOperation);
|
||||||
} break;
|
} break;
|
||||||
@ -1195,6 +1196,7 @@ struct ProcessorStorageConstructor {
|
|||||||
case Decoder::LINK: {
|
case Decoder::LINK: {
|
||||||
program.set_source(storage_, An, ea_register);
|
program.set_source(storage_, An, ea_register);
|
||||||
dumper.set_source(An, ea_register);
|
dumper.set_source(An, ea_register);
|
||||||
|
dumper.set_dest(Imm);
|
||||||
op(Action::PerformOperation, seq("np nW+ nw np", { ea(1), ea(1) }));
|
op(Action::PerformOperation, seq("np nW+ nw np", { ea(1), ea(1) }));
|
||||||
} break;
|
} break;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user