aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Suem.hs8
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])