pcw8256: add now required copy_common method

Lots more needed to make this platform work

diff --git a/Kernel/platform-pcw8256/pcw8256.s b/Kernel/platform-pcw8256/pcw8256.s
index 3e1807e..ce87625 100644 (file)
--- a/Kernel/platform-pcw8256/pcw8256.s
+++ b/Kernel/platform-pcw8256/pcw8256.s
@@ -15,6 +15,7 @@
            .globl map_save
            .globl map_restore
            .globl platform_interrupt_all
+           .globl _copy_common
 
             ; exported debugging tools
             .globl _platform_monitor
@@ -236,6 +237,23 @@ map_restore:push hl
             pop hl
             ret
 
+;
+;      Make a copy of common into a new page in order to use it for a
+;      process.
+;
+_copy_common:
+           pop hl
+           pop de
+           push de
+           push hl
+           ld a,e
+           out (0xf1),a        ; 4000-7FFF
+           ld hl,#0xF000
+           ld de,#0x7000
+           ld bc,#0x1000
+           ldir
+           jr map_kernel
+
 
 _bugout:    pop hl
            pop bc