From: Adam Sampson <ats@offog.org>
Date: Sun, 22 Apr 2018 22:15:23 +0000 (+0100)
Subject: Disable the "purify high core" CORBLK (dubious).
X-Git-Url: https://jxself.org/git/?p=pdp10-muddle.git;a=commitdiff_plain;h=6f27ad88d33542ff7d945432aaa833af1b569bc7

Disable the "purify high core" CORBLK (dubious).

It still fails, so leave the pages writable for now.
---

diff --git a/<mdl.int>/initm.373 b/<mdl.int>/initm.373
index cf95472..e8ec252 100644
--- a/<mdl.int>/initm.373
+++ b/<mdl.int>/initm.373
@@ -468,8 +468,9 @@ PURIMP:	MOVE	A,FRETOP
 	SUB	A,B
 	HRLS	A
 	HRRI	A,PHIBOT
-	DOTCAL	CORBLK,[[1000,,210000],[1000,,-1],A]
-	 FATAL	INITM -- CAN'T PURIFY HIGH CORE
+;FIXME Disabled because this doesn't succeed...
+;	DOTCAL	CORBLK,[[1000,,210000],[1000,,-1],A]
+;	 FATAL	INITM -- CAN'T PURIFY HIGH CORE
 ]
 
 IFE ITS,[