From f1bdedf938513ca22b8d31f39d0e6f3dfc671803 Mon Sep 17 00:00:00 2001
From: Dave Schmenk <dschmenk@gmail.com>
Date: Sun, 3 Dec 2017 20:17:42 -0800
Subject: [PATCH] Fix MUL opcode

---
 src/vmsrc/plvm802.s | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/vmsrc/plvm802.s b/src/vmsrc/plvm802.s
index 58d2740..4470e01 100644
--- a/src/vmsrc/plvm802.s
+++ b/src/vmsrc/plvm802.s
@@ -7,7 +7,7 @@
 ;**********************************************************
         !CPU    65816
 SELFMODIFY  =   0
-DEBUG   =       1
+DEBUG   =       0
 ;*
 ;* THE DEFAULT CPU MODE FOR EXECUTING OPCODES IS:
 ;*   16 BIT A/M
@@ -523,11 +523,11 @@ MUL     LDX     #$10
         EOR     #$FFFF
         STA     TMP
         LDA     #$0000
-MULLP   ASL     TMP             ;LSR     TMP             ; MULTPLR
+MULLP   ASL
+        ASL     TMP             ; MULTPLR
         BCS     +
         ADC     TOS,S           ; MULTPLD
-+       ASL                     ;ASL     TOS,S           ; MULTPLD
-        DEX
++       DEX
         BNE     MULLP
         STA     NOS,S           ; PROD
         JMP     DROP
@@ -1819,7 +1819,7 @@ STEP    STX     TMPL
         XBA
         LDA     $101,X
         LDX     TMPH
-        JSR     PRWORD        
+        JSR     PRWORD
         BRA     +++
 ++      LDX     TMPH
         LDA     #' '