From c8524f52ada4416622e10d4015a369fb35dac1bd Mon Sep 17 00:00:00 2001
From: aiju <aiju@phicode.de>
Date: Sat, 5 Nov 2011 09:48:29 +0100
Subject: [PATCH] add -P flag to 5l to produce proper flat binaries

---
 sys/src/cmd/5l/asm.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/sys/src/cmd/5l/asm.c b/sys/src/cmd/5l/asm.c
index 32f2991cf..5aa051a80 100644
--- a/sys/src/cmd/5l/asm.c
+++ b/sys/src/cmd/5l/asm.c
@@ -77,6 +77,11 @@ asmb(void)
 	curtext = P;
 	switch(HEADTYPE) {
 	case 0:
+		if(debug['P']){
+			OFFSET = rnd(textsize, INITRND);
+			seek(cout, OFFSET, 0);
+			break;
+		}
 	case 1:
 	case 2:
 	case 5: