diff --git a/src/mon_m65/bsmon.s b/src/mon_m65/bsmon.s
index b1882c6b..cfeb070b 100644
--- a/src/mon_m65/bsmon.s
+++ b/src/mon_m65/bsmon.s
@@ -219,30 +219,6 @@ Mon_Exit:
 
          JMP  (X_Vector)
 
-; ********
-LAC_To_PC: ; XXX to be adapted
-; ********
-
-   inc $D020 ; XXX for debug only
-
-; called from Mon_Set_Register, Mon_Go and Mon_JSR
-; as the first instruction. The carry flag was set from
-; the routine Got_LAC if an error occured.
-; Notice that the Bank, PCH and PCL values are stored
-; high to low, reverse to the standard order.
-
-; Bank, PCH and PCL are part of a list, that is used by
-; the routines FAR_JMP and FAR_JSR of the operating system
-
-         BCS  @error
-         ;LDA  Long_AC
-         ;STA  Bank+2
-         ;LDA  Long_AC+1
-         ;STA  Bank+1
-         ;LDA  Long_AC+2
-         ;STA  Bank
-@error   RTS
-
 ; *********
 LAC_To_LPC:
 ; *********
@@ -666,8 +642,6 @@ Mon_Assemble:
 
 @found   STX  Ix_Mne
 
-; XXX start debugging from here
-
 ;        find 1st. opcode for this mnemonic
 
          TXA
@@ -703,6 +677,8 @@ Mon_Assemble:
 
 ;        read operand
 
+; XXX start debugging from here
+
 @labc    LDA  #0
 @labd    STA  Mode_Flags
          JSR  Read_Number