* define R_SUBWHOLE as R_SUBW for 6502

compiler/mos6502/cpubase.pas

@@ -78,7 +78,7 @@ unit cpubase;
       {$i rmos6502sup.inc}
 
       { No Subregisters }
-      R_SUBWHOLE = R_SUBL;
+      R_SUBWHOLE = R_SUBW;
 
       { Available Registers }
       {$i rmos6502con.inc}