From 8df9f2ea7ea41132638ac4fe3a95d541486fed99 Mon Sep 17 00:00:00 2001
From: David du Colombier <0intro@gmail.com>
Date: Fri, 10 Jun 1994 00:00:00 +0000
Subject: [PATCH] Plan 9 from Bell Labs 1994-06-10

---
 carrera/dat.h  |   4 +-
 carrera/l.s    | 225 +++++++++++++++++++++++++++----------------------
 carrera/mem.h  |  44 +---------
 carrera/ureg.h |  78 +++++++++--------
 pc/clock.c     |   7 +-
 pc/l.s         |  11 +--
 pc/main.c      |   1 -
 7 files changed, 176 insertions(+), 194 deletions(-)

diff --git a/carrera/dat.h b/carrera/dat.h
index d7a43a27c8821d0279a9e9ce3c4cc30e3e720759..eb9be43835cdb535700ee3c6f3cfb607fdbb393f 100644
--- a/carrera/dat.h
+++ b/carrera/dat.h
@@ -15,7 +15,7 @@ typedef struct Ureg	Ureg;
 /*
  *  parameters for sysproc.c
  */
-#define AOUT_MAGIC	V_MAGIC || magic==M_MAGIC
+#define AOUT_MAGIC	V_MAGIC
 
 /*
  *  machine dependent definitions used by ../port/dat.h
@@ -81,7 +81,7 @@ struct PMMU
 struct Notsave
 {
 	ulong	svstatus;
-	uvlong	svr1;
+	ulong	svr1;
 };
 
 #include "../port/portdat.h"
diff --git a/carrera/l.s b/carrera/l.s
index e66047db8754d444baa92a2e2915a25e0c40613f..28d6bf92568f8795369cbc64a724ff2256fecd61 100644
--- a/carrera/l.s
+++ b/carrera/l.s
@@ -12,6 +12,10 @@
 /*
  *  R4000 instructions
  */
+#define	LD(offset, base, rt)	WORD	$((067<<26)|((base)<<21)|((rt)<<16)|((offset)&0xFFFF))
+#define	STD(rt, offset, base)	WORD	$((077<<26)|((base)<<21)|((rt)<<16)|((offset)&0xFFFF))
+#define	DSLL(sa, rt, rd)	WORD	$(((rt)<<16)|((rd)<<11)|((sa)<<6)|070)
+#define	DSRA(sa, rt, rd)	WORD	$(((rt)<<16)|((rd)<<11)|((sa)<<6)|073)
 #define	LL(base, rt)		WORD	$((060<<26)|((base)<<21)|((rt)<<16))
 #define	SC(base, rt)		WORD	$((070<<26)|((base)<<21)|((rt)<<16))
 
@@ -22,13 +26,16 @@
  */
 TEXT	start(SB), $-4
 
+DBG(0x55aa0000)
 	MOVW	$setR30(SB), R30
 	MOVW	$(CU1|INTR7|INTR6|INTR5|INTR4|INTR3|INTR2|INTR1|INTR0), R1
 	MOVW	R1, M(STATUS)
 	WAIT
+DBG(0x55aa0001)
 
 	MOVW	$TLBROFF, R1
 	MOVW	R1, M(WIRED)
+DBG(0x55aa0002)
 
 	MOVW	$((0x1C<<7)|(1<<24)), R1
 	MOVW	R1, FCR31	/* permit only inexact and underflow */
@@ -50,14 +57,19 @@ TEXT	start(SB), $-4
 	MOVD	F24, F18
 	MOVD	F24, F20
 	MOVD	F24, F22
+DBG(0x55aa0003)
 
 	MOVW	$MACHADDR, R(MACH)
 	ADDU	$(BY2PG-4), R(MACH), SP
 	MOVW	$0, R(USER)
+DBG(0x55aa0010)
+MOVW R(MACH),4(R20)
 	MOVW	R0, 0(R(MACH))
+DBG(0x55aa0011)
 
 	MOVW	$edata(SB), R1
 	MOVW	$end(SB), R2
+DBG(0x55aa0004)
 
 clrbss:
 	MOVB	$0, (R1)
@@ -85,7 +97,7 @@ TEXT	touser(SB), $-4
 	MOVW	R4, M(STATUS)
 	WAIT
 	MOVW	R1, SP
-	MOVV	R2, M(EPC)
+	MOVW	R2, M(EPC)
 	ERET
 
 TEXT	firmware(SB), $0
@@ -274,7 +286,6 @@ TEXT	gettlbvirt(SB), $0
 	NOOP
 	RET
 
-/* also vector80 */
 TEXT	vector0(SB), $-4
 	NOOP4
 	NOOP4
@@ -361,33 +372,34 @@ TEXT	vector180(SB), $-4
 	NOOP4
 	MOVW	$exception(SB), R26
 	JMP	(R26)
+	NOP
 
 TEXT	exception(SB), $-4
 	MOVW	M(STATUS), R26
 	WAIT
 	AND	$KUSER, R26
 	BEQ	R26, waskernel
-
 wasuser:
 	CONST	(MACHADDR, R27)		/* R27 = m-> */
 	MOVW	8(R27), R26		/* R26 = m->proc */
 	MOVW	8(R26), R27		/* R27 = m->proc->kstack */
-	MOVV	SP, R26			/* save user sp */
-	ADDU	$(KSTACK-UREGSIZE), R27, SP
+	MOVW	SP, R26			/* save user sp */
+	ADDU	$(KSTACK-UREGSIZE-2*BY2WD), R27, SP
 
-	MOVV	R26, Ureg_sp(SP)		/* user SP */
-	MOVV	R31, Ureg_r31(SP)
-	MOVV	R30, Ureg_r30(SP)
+	MOVW	R26, 0x10(SP)			/* user SP */
+	MOVW	R31, 0x28(SP)
+	MOVW	R30, 0x2C(SP)
 	MOVW	M(CAUSE), R26
-	MOVV	R25, Ureg_r25(SP)		/* R(USER), R(MACH) */
-	MOVV	R24, Ureg_r24(SP)
+	MOVW	R(MACH), 0x3C(SP)
+	MOVW	R(USER), 0x40(SP)
 	AND	$(EXCMASK<<2), R26
 	SUBU	$(CSYS<<2), R26
 
 	JAL	saveregs(SB)
 
 	MOVW	$setR30(SB), R30
-	CONST	(MACHADDR, R(MACH))		/* R(MACH) = m-> */
+	CONST	(MACHADDR, R1)
+	MOVW	R1, R(MACH)			/* R(MACH) = m-> */
 	MOVW	8(R(MACH)), R(USER)		/* up = m->proc */
 	MOVW	4(SP), R1			/* first arg for syscall/trap */
 	BNE	R26, notsys
@@ -395,60 +407,62 @@ wasuser:
 	JAL	syscall(SB)
 
 sysrestore:
-	MOVV	Ureg_r31(SP), R31
-	MOVW	Ureg_status(SP), R26
-	MOVV	Ureg_r30(SP), R30
+	MOVW	0x28(SP), R31
+	MOVW	0x08(SP), R26
+	MOVW	0x2C(SP), R30
 	MOVW	R26, M(STATUS)
 	WAIT
-	MOVV	Ureg_pc(SP), R26		/* old pc */
-	MOVV	Ureg_sp(SP), SP
-	MOVV	R26, M(EPC)
+	MOVW	0x0C(SP), R26		/* old pc */
+	MOVW	0x10(SP), SP
+	MOVW	R26, M(EPC)
 	ERET
 
 notsys:
 	JAL	trap(SB)
 restore:
 	JAL	restregs(SB)
-	MOVV	Ureg_r31(SP), R31
-	MOVV	Ureg_r30(SP), R30
-	MOVV	Ureg_r25(SP), R25			/* R(USER), R(MACH) */
-	MOVV	Ureg_r24(SP), R24
-	MOVV	Ureg_sp(SP), SP
-	MOVV	R26, M(EPC)
+	MOVW	0x28(SP), R31
+	MOVW	0x2C(SP), R30
+	MOVW	0x3C(SP), R(MACH)
+	MOVW	0x40(SP), R(USER)
+	MOVW	0x10(SP), SP
+	MOVW	R26, M(EPC)
 	ERET
 
 waskernel:
-	MOVV	SP, R26
-	SUBU	$UREGSIZE, SP
-	OR	$7, SP
-	XOR	$7, SP
-	MOVV	R26, Ureg_sp(SP)
-	MOVV	R31, Ureg_r31(SP)
 	MOVW	$1, R26			/* not syscall */
+	MOVW	SP, -(UREGSIZE-16)(SP)
+	SUBU	$UREGSIZE, SP
+	MOVW	R31, 0x28(SP)
 	JAL	saveregs(SB)
 	MOVW	4(SP), R1		/* first arg for trap */
 	JAL	trap(SB)
 	JAL	restregs(SB)
-	MOVV	Ureg_r31(SP), R31
-	MOVV	Ureg_sp(SP), SP
-	MOVV	R26, M(EPC)
+	MOVW	0x28(SP), R31
+	ADDU	$UREGSIZE, SP
+	MOVW	R26, M(EPC)
 	ERET
 
-TEXT	forkret(SB), $-4
-	MOVV	R0, R1			/* Fake out system call return */
+TEXT	forkret(SB), $0
+	MOVW	R0, R1			/* Fake out system call return */
 	JMP	sysrestore
 
 TEXT	saveregs(SB), $-4
-	MOVV	R1, Ureg_r1(SP)		/* save early to use as temp */
-	MOVV	R2, Ureg_r2(SP)
-
-	ADDU	$Uoffset,SP, R1
-	MOVW	R1, 4(SP)		/* arg to base of regs */
+	MOVW	R1, 0x9C(SP)
+	MOVW	R2, 0x98(SP)
+	/* save R5, R6 as 64 bits */
+	ADDU	$(UREGSIZE-16), SP, R1
+	MOVW	$~7, R2			/* don't let him use R28 */
+	AND		R2, R1
+	STD		(5, 0,(1))
+	STD		(6, 8,(1))
+	ADDU	$8, SP, R1
+	MOVW	R1, 0x04(SP)		/* arg to base of regs */
 	MOVW	M(STATUS), R1
-	MOVV	M(EPC), R2
+	MOVW	M(EPC), R2
 	WAIT
-	MOVW	R1, Ureg_status(SP)
-	MOVV	R2, Ureg_pc(SP)
+	MOVW	R1, 0x08(SP)
+	MOVW	R2, 0x0C(SP)
 
 	MOVW	$(~KMODEMASK),R2	/* don't let him use R28 */
 	AND	R2, R1
@@ -457,86 +471,93 @@ TEXT	saveregs(SB), $-4
 	BEQ	R26, return		/* sys call, don't save */
 
 	MOVW	M(CAUSE), R1
-	MOVV	M(BADVADDR), R2
+	MOVW	M(BADVADDR), R2
 	NOOP
-	MOVW	R1, Ureg_cause(SP)
-	MOVV	M(TLBVIRT), R1
+	MOVW	R1, 0x14(SP)
+	MOVW	M(TLBVIRT), R1
 	NOOP
-	MOVV	R2, Ureg_badvaddr(SP)
-	MOVV	R1, Ureg_tlbvirt(SP)
+	MOVW	R2, 0x18(SP)
+	MOVW	R1, 0x1C(SP)
 	MOVW	HI, R1
 	MOVW	LO, R2
-	MOVV	R1, Ureg_hi(SP)
-	MOVV	R2, Ureg_lo(SP)
+	MOVW	R1, 0x20(SP)
+	MOVW	R2, 0x24(SP)
 					/* LINK,SB,SP missing */
-	MOVV	R28, Ureg_r28(SP)
+	MOVW	R28, 0x30(SP)
 					/* R27, R26 not saved */
 					/* R25, R24 missing */
-	MOVV	R23, Ureg_r23(SP)
-	MOVV	R22, Ureg_r22(SP)
-	MOVV	R21, Ureg_r21(SP)
-	MOVV	R20, Ureg_r20(SP)
-	MOVV	R19, Ureg_r19(SP)
-	MOVV	R18, Ureg_r18(SP)
-	MOVV	R17, Ureg_r17(SP)
-	MOVV	R16, Ureg_r16(SP)
-	MOVV	R15, Ureg_r15(SP)
-	MOVV	R14, Ureg_r14(SP)
-	MOVV	R13, Ureg_r13(SP)
-	MOVV	R12, Ureg_r12(SP)
-	MOVV	R11, Ureg_r11(SP)
-	MOVV	R10, Ureg_r10(SP)
-	MOVV	R9, Ureg_r9(SP)
-	MOVV	R8, Ureg_r8(SP)
-	MOVV	R7, Ureg_r7(SP)
-	MOVV	R6, Ureg_r6(SP)
-	MOVV	R5, Ureg_r5(SP)
-	MOVV	R4, Ureg_r4(SP)
-	MOVV	R3, Ureg_r3(SP)
+	MOVW	R23, 0x44(SP)
+	MOVW	R22, 0x48(SP)
+	MOVW	R21, 0x4C(SP)
+	MOVW	R20, 0x50(SP)
+	MOVW	R19, 0x54(SP)
+	MOVW	R18, 0x58(SP)
+	MOVW	R17, 0x5C(SP)
+	MOVW	R16, 0x60(SP)
+	MOVW	R15, 0x64(SP)
+	MOVW	R14, 0x68(SP)
+	MOVW	R13, 0x6C(SP)
+	MOVW	R12, 0x70(SP)
+	MOVW	R11, 0x74(SP)
+	MOVW	R10, 0x78(SP)
+	MOVW	R9, 0x7C(SP)
+	MOVW	R8, 0x80(SP)
+	MOVW	R7, 0x84(SP)
+	MOVW	R6, 0x88(SP)
+	MOVW	R5, 0x8C(SP)
+	MOVW	R4, 0x90(SP)
+	MOVW	R3, 0x94(SP)
 return:
 	RET
 
 TEXT	restregs(SB), $-4
 					/* LINK,SB,SP missing */
-	MOVV	Ureg_r28(SP), R28
+	MOVW	0x30(SP), R28
 					/* R27, R26 not saved */
 					/* R25, R24 missing */
-	MOVV	Ureg_r23(SP), R23
-	MOVV	Ureg_r22(SP), R22
-	MOVV	Ureg_r21(SP), R21
-	MOVV	Ureg_r20(SP), R20
-	MOVV	Ureg_r19(SP), R19
-	MOVV	Ureg_r18(SP), R18
-	MOVV	Ureg_r17(SP), R17
-	MOVV	Ureg_r16(SP), R16
-	MOVV	Ureg_r15(SP), R15
-	MOVV	Ureg_r14(SP), R14
-	MOVV	Ureg_r13(SP), R13
-	MOVV	Ureg_r12(SP), R12
-	MOVV	Ureg_r11(SP), R11
-	MOVV	Ureg_r10(SP), R10
-	MOVV	Ureg_r9(SP), R9
-	MOVV	Ureg_r8(SP), R8
-	MOVV	Ureg_r7(SP), R7
-	MOVV	Ureg_r6(SP), R6
-	MOVV	Ureg_r5(SP), R5
-	MOVV	Ureg_r4(SP), R4
-	MOVV	Ureg_r3(SP), R3
-
-	MOVV	Ureg_lo(SP), R2
-	MOVV	Ureg_hi(SP), R1
+	MOVW	0x44(SP), R23
+	MOVW	0x48(SP), R22
+	MOVW	0x4C(SP), R21
+	MOVW	0x50(SP), R20
+	MOVW	0x54(SP), R19
+	MOVW	0x58(SP), R18
+	MOVW	0x5C(SP), R17
+	MOVW	0x60(SP), R16
+	MOVW	0x64(SP), R15
+	MOVW	0x68(SP), R14
+	MOVW	0x6C(SP), R13
+	MOVW	0x70(SP), R12
+	MOVW	0x74(SP), R11
+	MOVW	0x78(SP), R10
+	MOVW	0x7C(SP), R9
+	MOVW	0x80(SP), R8
+	MOVW	0x84(SP), R7
+	/*
+	 * restored below
+	 * MOVW	0x88(SP), R6
+	 * MOVW	0x8C(SP), R5
+	 */
+	MOVW	0x90(SP), R4
+	MOVW	0x94(SP), R3
+	MOVW	0x24(SP), R2
+	MOVW	0x20(SP), R1
 	MOVW	R2, LO
 	MOVW	R1, HI
-
-	MOVW	Ureg_status(SP), R1
-	MOVV	Ureg_r2(SP), R2
+	/* restore 64-bit R5, R6 */
+	ADDU	$(UREGSIZE-16), SP, R1
+	MOVW	$~7, R2			/* don't let him use R28 */
+	AND		R2, R1
+	LD		(0,(1), 5)
+	LD		(8,(1), 6)
+	MOVW	0x08(SP), R1
+	MOVW	0x98(SP), R2
 	MOVW	R1, M(STATUS)
 	WAIT
-	MOVV	Ureg_r1(SP), R1
-	MOVV	Ureg_pc(SP), R26		/* old pc */
+	MOVW	0x9C(SP), R1
+	MOVW	0x0C(SP), R26		/* old pc */
 	RET
 
-TEXT	rfnote(SB), $-4
+TEXT	rfnote(SB), $0
 	MOVW	R1, R26			/* 1st arg is &uregpointer */
 	SUBU	$(BY2WD), R26, SP	/* pc hole */
 	JMP	restore
diff --git a/carrera/mem.h b/carrera/mem.h
index 23feecd918cc66c8c40a16254caa72214d7b2ebc..e8d57bda03e4530a8b5a9a9e3865458fbfa7a894 100644
--- a/carrera/mem.h
+++ b/carrera/mem.h
@@ -99,48 +99,8 @@
  * Fundamental addresses
  */
 #define	MACHADDR	(KTZERO-MAXMACH*BY2PG)	/* warning: rdbg is near here */
-/* Sizeof(Ureg)+retpc & ur+16 bytes slop */
-#define	UREGSIZE	(36*8 + 2*4 + 2*4 + 16)
-#define	Uoffset		8
-
-#define	Ureg_status	(Uoffset+0)
-#define	Ureg_cause	(Uoffset+4)
-#define	Ureg_pc		(Uoffset+8)
-#define	Ureg_sp		(Uoffset+16)
-#define	Ureg_badvaddr	(Uoffset+24)
-#define	Ureg_tlbvirt	(Uoffset+32)
-#define	Ureg_hi		(Uoffset+40)
-#define	Ureg_lo		(Uoffset+48)
-#define	Ureg_r31	(Uoffset+56)
-#define	Ureg_r30	(Uoffset+64)
-#define	Ureg_r28	(Uoffset+72)
-#define	Ureg_r27	(Uoffset+80)
-#define	Ureg_r26	(Uoffset+88)
-#define	Ureg_r25	(Uoffset+96)
-#define	Ureg_r24	(Uoffset+104)
-#define	Ureg_r23	(Uoffset+112)
-#define	Ureg_r22	(Uoffset+120)
-#define	Ureg_r21	(Uoffset+128)
-#define	Ureg_r20	(Uoffset+136)
-#define	Ureg_r19	(Uoffset+144)
-#define	Ureg_r18	(Uoffset+152)
-#define	Ureg_r17	(Uoffset+160)
-#define	Ureg_r16	(Uoffset+168)
-#define	Ureg_r15	(Uoffset+176)
-#define	Ureg_r14	(Uoffset+184)
-#define	Ureg_r13	(Uoffset+192)
-#define	Ureg_r12	(Uoffset+200)
-#define	Ureg_r11	(Uoffset+208)
-#define	Ureg_r10	(Uoffset+216)
-#define	Ureg_r9		(Uoffset+224)
-#define	Ureg_r8		(Uoffset+232)
-#define	Ureg_r7		(Uoffset+240)
-#define	Ureg_r6		(Uoffset+248)
-#define	Ureg_r5		(Uoffset+256)
-#define	Ureg_r4		(Uoffset+264)
-#define	Ureg_r3		(Uoffset+272)
-#define	Ureg_r2		(Uoffset+280)
-#define	Ureg_r1		(Uoffset+288)
+/* Sizeof(Ureg)+R5,R6+16 bytes slop+retpc & ur */
+#define	UREGSIZE	0xC0		
 #define	MACHP(n)	((Mach *)(MACHADDR+(n)*BY2PG))
 
 /*
diff --git a/carrera/ureg.h b/carrera/ureg.h
index e3f37f5be4407a2707344b73a8933ff47fc83564..32cbfb3fc85f67d4204766ce48ca339d2d651916 100644
--- a/carrera/ureg.h
+++ b/carrera/ureg.h
@@ -1,46 +1,44 @@
-
 struct Ureg
 {
 	ulong	status;
-	ulong	cause;
-	uvlong	pc;
+	ulong	pc;
 	union{
-		uvlong	sp;
-		uvlong	usp;
+		ulong	sp;		/* r29 */
+		ulong	usp;		/* r29 */
 	};
-	uvlong	badvaddr;
-	uvlong	tlbvirt;
-
-	uvlong	hi;
-	uvlong	lo;
-	uvlong	r31;
-	uvlong	r30;
-	uvlong	r28;
-	uvlong	r27;
-	uvlong	r26;
-	uvlong	r25;
-	uvlong	r24;
-	uvlong	r23;
-	uvlong	r22;
-	uvlong	r21;
-	uvlong	r20;
-	uvlong	r19;
-	uvlong	r18;
-	uvlong	r17;
-	uvlong	r16;
-	uvlong	r15;
-	uvlong	r14;
-	uvlong	r13;
-	uvlong	r12;
-	uvlong	r11;
-	uvlong	r10;
-	uvlong	r9;
-	uvlong	r8;
-	uvlong	r7;
-	uvlong	r6;
-	uvlong	r5;
-	uvlong	r4;
-	uvlong	r3;
-	uvlong	r2;
-	uvlong	r1;
+	ulong	cause;
+	ulong	badvaddr;
+	ulong	tlbvirt;
+	ulong	hi;
+	ulong	lo;
+	ulong	r31;
+	ulong	r30;
+	ulong	r28;
+	ulong	r27;		/* unused */
+	ulong	r26;		/* unused */
+	ulong	r25;
+	ulong	r24;
+	ulong	r23;
+	ulong	r22;
+	ulong	r21;
+	ulong	r20;
+	ulong	r19;
+	ulong	r18;
+	ulong	r17;
+	ulong	r16;
+	ulong	r15;
+	ulong	r14;
+	ulong	r13;
+	ulong	r12;
+	ulong	r11;
+	ulong	r10;
+	ulong	r9;
+	ulong	r8;
+	ulong	r7;
+	ulong	r6;
+	ulong	r5;
+	ulong	r4;
+	ulong	r3;
+	ulong	r2;
+	ulong	r1;
 };
diff --git a/pc/clock.c b/pc/clock.c
index 5c78d6ab5e59ba9b14baae28b4c5cf175bc8ebd2..75c63e1667663fced2d2f95074b21a49547bb5a6 100644
--- a/pc/clock.c
+++ b/pc/clock.c
@@ -96,13 +96,13 @@ clock(Ureg *ur, void *arg)
 }
 
 /*
- *  experimentally determined and justified by counting cycles in
- *  delay()'s inner loop
+ *  experimentally determined
  */
 enum
 {
 	mul386=	380,
 	mul486=	121,
+	mul586=	121,
 };
 
 void
@@ -113,6 +113,9 @@ printcpufreq(void)
 
 	switch(cpu = x86()){
 	default:
+	case 586:
+		freq = mul586;
+		break;
 	case 486:
 		freq = mul486;
 		break;
diff --git a/pc/l.s b/pc/l.s
index 0617d9b163c37d571276b176db790e609ee5191f..cc8f08a96076c0e6eb3c190faab6130a0ad55bcd 100644
--- a/pc/l.s
+++ b/pc/l.s
@@ -566,15 +566,16 @@ TEXT	x86(SB),$0
 
 	PUSHFL
 	MOVL	0(SP),AX
-	ORL	$0x240000,AX
+	XORL	$0x240000,AX
 	PUSHL	AX
 	POPFL
 	PUSHFL
 	MOVL	0(SP),AX
-	ANDL	$0x40000,AX
+	XORL	4(SP),AX
+	MOVL	AX, BX
+	ANDL	$0x40000,BX	/* on 386 we can't change this bit */
 	JZ	is386
-	POPL	AX
-	ANDL	$0x200000,AX
+	ANDL	$0x200000,AX	/* on 486 we can't change this bit */
 	JZ	is486
 	MOVL	$586,AX
 	JMP	done
@@ -582,9 +583,9 @@ is486:
 	MOVL	$486,AX
 	JMP	done
 is386:
-	POPL	AX
 	MOVL	$386,AX
 done:
+	POPL	BX
 	POPFL
 	RET
 
diff --git a/pc/main.c b/pc/main.c
index 5ddc339d6bc627660bf1542a5d2611057c0a4180..9f3474ffa52de25a5fb1b589889299638e1299d5 100644
--- a/pc/main.c
+++ b/pc/main.c
@@ -63,7 +63,6 @@ main(void)
 	chandevreset();
 	swapinit();
 	userinit();
-print("CR0 %lux\n", getcr0());
 	schedinit();
 }