diff options
| author | Aleksey Veresov <aleksey@veresov.pro> | 2021-03-05 16:24:47 +0300 |
|---|---|---|
| committer | Aleksey Veresov <aleksey@veresov.pro> | 2021-03-05 16:24:47 +0300 |
| commit | 098902cf27af845eff5855abb3e52ae1b3b52156 (patch) | |
| tree | ecc5dc19e3699889f8eafc9fb3ecb3776349bff1 | |
| parent | 55a0c44c907e5336a572c7fc622b75e602c31f94 (diff) | |
| download | suem-098902cf27af845eff5855abb3e52ae1b3b52156.tar suem-098902cf27af845eff5855abb3e52ae1b3b52156.tar.xz suem-098902cf27af845eff5855abb3e52ae1b3b52156.zip | |
Fix.
| -rw-r--r-- | src/Suem.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Suem.hs b/src/Suem.hs index 7a259a8..e279d42 100644 --- a/src/Suem.hs +++ b/src/Suem.hs @@ -309,10 +309,10 @@ doCommand cmd | (extractBits cmd [0..3]) == 0b1101 && (extractBits cmd [7]) == 0b1 && (extractBits cmd [10..11]) == 0b00 = - doAND (extractBits cmd [4..6]) - (extractBits cmd [8..9]) - (extractBits cmd [12]) - (extractBits cmd [13..15]) + doADDX (extractBits cmd [4..6]) + (extractBits cmd [8..9]) + (extractBits cmd [12]) + (extractBits cmd [13..15]) | (extractBits cmd [0..3]) == 0b1101 = doADD (extractBits cmd [4..6]) (extractBits cmd [7]) |