From 63239854398b5d8c7a962008cc108611450e084b Mon Sep 17 00:00:00 2001
From: David du Colombier <0intro@gmail.com>
Date: Tue, 24 Nov 1992 00:00:00 +0000
Subject: [PATCH] Plan 9 from Bell Labs 1992-11-24

---
 pc/devvga.c       |  9 ++++++++-
 power/faultmips.c | 10 +++++++---
 power/trap.c      |  8 ++++----
 3 files changed, 19 insertions(+), 8 deletions(-)

diff --git a/pc/devvga.c b/pc/devvga.c
index 58ba216557d9ba0625214300781b0c1c223e0b69..7cbeb291e25bb54b9750249aa93801341840dbb5 100644
--- a/pc/devvga.c
+++ b/pc/devvga.c
@@ -102,7 +102,7 @@ VGAmode mode13 =
 
 static	Rectangle mbb;
 static	Rectangle NULLMBB = {10000, 10000, -10000, -10000};
-static	void nopage(int), tsengpage(int);;
+static	void nopage(int), tsengpage(int), parapage(int);
 
 /*
  *  definitions of known cards
@@ -117,11 +117,13 @@ struct Vgacard
 enum
 {
 	Tseng,		/* tseng labs te4000 */
+	Pvga1a,		/* paradise */
 	Generic,
 };
 
 Vgacard vgacards[] =
 {
+[Pvga1a]	{ "pvga1a", parapage, },
 [Tseng]		{ "tseng", tsengpage, },
 [Generic]	{ "generic", nopage, },
 		{ 0, 0, },
@@ -615,6 +617,11 @@ tsengpage(int page)
 {
 	outb(0x3cd, (page<<4)|page);
 }
+static void
+parapage(int page)
+{
+	grout(9, page<<4);
+}
 
 /*
  *  copy litte endian soft screen to big endian hard screen
diff --git a/power/faultmips.c b/power/faultmips.c
index 6aa767cad73a8d6bcd2187e99937847ef7f1ea20..11a9c4ce2c0cea8f8f1cf48aff87cddb5a92eb00 100644
--- a/power/faultmips.c
+++ b/power/faultmips.c
@@ -21,8 +21,12 @@ faultmips(Ureg *ur, int user, int code)
 
 	LEDON(LEDfault);
 	addr = ur->badvaddr;
-	if(addr & KZERO)
+	if(addr & KZERO){
 		LEDON(LEDkfault);
+		print("KZERO %s badvaddr=0x%lux r31=0x%lux\n", excname[code],
+			ur->badvaddr, ur->r31);
+		print("status=0x%lux pc=0x%lux sp=0x%lux\n", ur->status, ur->pc, ur->sp);
+	}
 	addr &= ~(BY2PG-1);
 	read = !(code==CTLBM || code==CTLBS);
 
@@ -34,8 +38,8 @@ faultmips(Ureg *ur, int user, int code)
 			LEDOFF(LEDfault);
 			return;
 		}
-		iprint("kernel %s badvaddr=0x%lux\n", excname[code], ur->badvaddr);
-		iprint("status=0x%lux pc=0x%lux sp=0x%lux\n", ur->status, ur->pc, ur->sp);
+		print("kernel %s badvaddr=0x%lux\n", excname[code], ur->badvaddr);
+		print("status=0x%lux pc=0x%lux sp=0x%lux\n", ur->status, ur->pc, ur->sp);
 		dumpregs(ur);
 		panic("fault");
 	}
diff --git a/power/trap.c b/power/trap.c
index 155a8409d0804f917218f67e02b95d86ec9493df..46f9e25655147de4084ec78794d3679da846b0a7 100644
--- a/power/trap.c
+++ b/power/trap.c
@@ -375,13 +375,13 @@ dumpregs(Ureg *ur)
 	ulong *l;
 
 	if(u)
-		iprint("registers for %s %d\n", u->p->text, u->p->pid);
+		print("registers for %s %d\n", u->p->text, u->p->pid);
 	else
-		iprint("registers for kernel\n");
+		print("registers for kernel\n");
 	l = &ur->status;
 	for(i=0; i<sizeof regname/sizeof(char*); i+=2, l+=2){
-		iprint("%s\t%.8lux\t%s\t%.8lux\n", regname[i], l[0], regname[i+1], l[1]);
-/*		prflush();/**/
+		print("%s\t%.8lux\t%s\t%.8lux\n", regname[i], l[0], regname[i+1], l[1]);
+		prflush();
 	}
 }