the memory management stuff is not working on the XT. and it is odd in xcroll.exe

diff --git a/bcexmm.dsk b/bcexmm.dsk
index 44f458fe7727af05a4eab906d2c6bfab6feb5953..cd351bc416b8406ba21caf3a523df9e99737b9df 100755 (executable)
Binary files a/bcexmm.dsk and b/bcexmm.dsk differ

diff --git a/bcexmm.exe b/bcexmm.exe
index 183a0a7b3e75bc5aa56f0cabe58c47867e7234e3..36a8a1f460122cce3fe9006e0be7a399eed92742 100755 (executable)
Binary files a/bcexmm.exe and b/bcexmm.exe differ

diff --git a/bcexmm.prj b/bcexmm.prj
index 09284e0805b0df3dcca08eb88c5b192ea7ec28d2..c185ea31d9140eed40c5c45f2594c76c1a41ed2f 100755 (executable)
Binary files a/bcexmm.prj and b/bcexmm.prj differ

diff --git a/src/exmmtest.h b/src/exmmtest.h
index aa63cd4f21dbf3abfc2ca72cb8e101acb0b89dd4..463932eb2afb7e08db5d1da582641d2f4f87c255 100755 (executable)
--- a/src/exmmtest.h
+++ b/src/exmmtest.h
@@ -42,7 +42,7 @@
 #define FILEREADLOAD\r
 #define FILEREAD\r
 //#define EXMMVERBOSE\r
-//#define BUFFDUMPPAUSE\r
+#define BUFFDUMPPAUSE\r
 //#define EXMMVERBOSE__\r
 //     #define PRINTBBDUMP\r
 #define BUFFDUMP\r

diff --git a/src/lib/16_mm.c b/src/lib/16_mm.c
index 18c02bbb7da332a4260ca928391fd4d0cad08888..dc807cbd1a0daf49985c0b743e0838e48908fcc6 100755 (executable)
--- a/src/lib/16_mm.c
+++ b/src/lib/16_mm.c
@@ -1505,6 +1505,7 @@ reset:
        }\r
 \r
        CA_CloseDebug (gvar);\r
+       if (gvar->video.VL_Started) IN_Ack(gvar);\r
 \r
 #ifdef MMSMPANVID\r
        {\r
@@ -1549,8 +1550,10 @@ reset:
        else q = 0;\r
        restarted = false;\r
 \r
-       IN_Ack(gvar);\r
-//     VL_ClearVideo (8);\r
+       while (!(scancode = gvar->in.inst->LastScan)){}\r
+//     IN_ClearKey(scancode);\r
+//     IN_Ack(gvar);\r
+\r
        for (done = false;!done;)\r
        {\r
                if(scaninfo[q].scan->attributes & PURGEBITS)\r
@@ -1683,8 +1686,8 @@ reset:
                        break;\r
                }\r
        }\r
-#else\r
-       if(gvar->video.VL_Started) IN_Ack(gvar);\r
+//#else\r
+//     if(gvar->video.VL_Started) IN_Ack(gvar);\r
 #endif\r
 \r
        gvar->video.BOFS = (byte __far *)temp;\r