Bläddra i källkod

+ added cpu_sys_z80 to the tsystemcpu enum. Name is not cpu_z80, because that
conflicts with tcputype.

git-svn-id: branches/z80@44393 -

nickysn 5 år sedan
förälder
incheckning
fd9f3a43ce
3 ändrade filer med 5 tillägg och 3 borttagningar
  1. 2 1
      compiler/systems.inc
  2. 2 1
      compiler/systems.pas
  3. 1 1
      compiler/systems/i_embed.pas

+ 2 - 1
compiler/systems.inc

@@ -55,7 +55,8 @@
              cpu_sparc64,                  { 18 }
              cpu_riscv32,                  { 19 }
              cpu_riscv64,                  { 20 }
-             cpu_xtensa                    { 21 }
+             cpu_xtensa,                   { 21 }
+             cpu_sys_z80                   { 22 }
        );
 
        tasmmode= (asmmode_none

+ 2 - 1
compiler/systems.pas

@@ -390,7 +390,8 @@ interface
        cpu2str : array[TSystemCpu] of string[10] =
             ('','i386','m68k','alpha','powerpc','sparc','vm','ia64','x86_64',
              'mips','arm', 'powerpc64', 'avr', 'mipsel','jvm', 'i8086',
-             'aarch64', 'wasm', 'sparc64', 'riscv32', 'riscv64', 'xtensa');
+             'aarch64', 'wasm', 'sparc64', 'riscv32', 'riscv64', 'xtensa',
+             'z80');
 
        abiinfo : array[tabi] of tabiinfo = (
          (name: 'DEFAULT'; supported: true),

+ 1 - 1
compiler/systems/i_embed.pas

@@ -495,7 +495,7 @@ unit i_embed;
             shortname    : 'embedded';
             flags        : [tf_needs_symbol_size,tf_files_case_sensitive,
                             tf_smartlink_sections];
-            cpu          : cpu_avr;
+            cpu          : cpu_sys_z80;
             unit_env     : '';
             extradefines : '';
             exeext       : '';