new macros supporting 6502DTV cpu

src/ca65/condasm.c

@@ -416,6 +416,16 @@ void DoConditionals (void)
                 CalcOverallIfCond ();
                 break;
 
+            case TOK_IFPDTV:
+                D = AllocIf (".IFPDTV", 1);
+                NextTok ();
+                if (IfCond) {
+                    SetIfCond (D, GetCPU() == CPU_6502DTV);
+                }
+                ExpectSep ();
+                CalcOverallIfCond ();
+                break;
+
             case TOK_IFPSC02:
                 D = AllocIf (".IFPSC02", 1);
                 NextTok ();
@@ -470,6 +480,7 @@ int CheckConditionals (void)
         case TOK_IFP4510:
         case TOK_IFP816:
         case TOK_IFPC02:
+        case TOK_IFPDTV:
         case TOK_IFPSC02:
         case TOK_IFREF:
             DoConditionals ();

src/ca65/pseudo.c

@@ -1552,6 +1552,14 @@ static void DoP4510 (void)
 
 
 
+static void DoPDTV (void)
+/* Switch to C64DTV CPU */
+{
+    SetCPU (CPU_6502DTV);
+}
+
+
+
 static void DoPageLength (void)
 /* Set the page length for the listing */
 {
@@ -2058,6 +2066,7 @@ static CtrlDesc CtrlCmdTab [] = {
     { ccKeepToken,      DoConditionals  },      /* .IFP4510 */
     { ccKeepToken,      DoConditionals  },      /* .IFP816 */
     { ccKeepToken,      DoConditionals  },      /* .IFPC02 */
+    { ccKeepToken,      DoConditionals  },      /* .IFPDTV */
     { ccKeepToken,      DoConditionals  },      /* .IFPSC02 */
     { ccKeepToken,      DoConditionals  },      /* .IFREF */
     { ccNone,           DoImport        },
@@ -2091,6 +2100,7 @@ static CtrlDesc CtrlCmdTab [] = {
     { ccNone,           DoPageLength    },
     { ccNone,           DoUnexpected    },      /* .PARAMCOUNT */
     { ccNone,           DoPC02          },
+    { ccNone,           DoPDTV          },
     { ccNone,           DoPopCPU        },
     { ccNone,           DoPopSeg        },
     { ccNone,           DoProc          },

src/ca65/scanner.c

@@ -219,6 +219,7 @@ struct DotKeyword {
     { ".IFP4510",       TOK_IFP4510             },
     { ".IFP816",        TOK_IFP816              },
     { ".IFPC02",        TOK_IFPC02              },
+    { ".IFPDTV",        TOK_IFPDTV              },
     { ".IFPSC02",       TOK_IFPSC02             },
     { ".IFREF",         TOK_IFREF               },
     { ".IMPORT",        TOK_IMPORT              },
@@ -258,6 +259,7 @@ struct DotKeyword {
     { ".PAGELENGTH",    TOK_PAGELENGTH          },
     { ".PARAMCOUNT",    TOK_PARAMCOUNT          },
     { ".PC02",          TOK_PC02                },
+    { ".PDTV",          TOK_PDTV                },
     { ".POPCPU",        TOK_POPCPU              },
     { ".POPSEG",        TOK_POPSEG              },
     { ".PROC",          TOK_PROC                },

src/ca65/token.h

@@ -196,6 +196,7 @@ typedef enum token_t {
     TOK_IFP4510,
     TOK_IFP816,
     TOK_IFPC02,
+    TOK_IFPDTV,
     TOK_IFPSC02,
     TOK_IFREF,
     TOK_IMPORT,
@@ -229,6 +230,7 @@ typedef enum token_t {
     TOK_PAGELENGTH,
     TOK_PARAMCOUNT,
     TOK_PC02,
+    TOK_PDTV,
     TOK_POPCPU,
     TOK_POPSEG,
     TOK_PROC,