v8080: align with upstream rsts

diff --git a/Kernel/platform-v8080/rst.s b/Kernel/platform-v8080/rst.s
index bec3466..0eafc07 100644 (file)
--- a/Kernel/platform-v8080/rst.s
+++ b/Kernel/platform-v8080/rst.s
@@ -7,6 +7,9 @@
 !     41 call .floadn4
 !     34 call .fload4
 !     28 call .fstoren2
+!
+! Also:
+!     48 call .cmps_mag
 
 .define .rst_init
 .rst_init:
@@ -18,6 +21,10 @@
     lxi h, .fload4
     call copy
     lxi h, .fstoren2
+    call copy
+    lxi h, .cmps_mag
+    jmp copy
+
 ! Copies eight bytes from HL to DE.
 copy:
     mvi c, 8
@@ -28,4 +35,4 @@ copy:
     inr e
     dcr c
     jnz .1
-    ret
\ No newline at end of file
+    ret