From 29a53a52fdc3f8fc9af3d19d0253ba33b1efccba Mon Sep 17 00:00:00 2001
From: cinap_lenrek <cinap_lenrek@felloff.net>
Date: Sun, 2 Aug 2015 14:52:54 +0200
Subject: 1c,2c,7c,kc,vc: honor suppress condition for outstring() in swt.c

---
 sys/src/cmd/1c/gc.h  | 1 +
 sys/src/cmd/1c/swt.c | 2 ++
 sys/src/cmd/2c/gc.h  | 1 +
 sys/src/cmd/2c/swt.c | 2 ++
 sys/src/cmd/7c/swt.c | 2 ++
 sys/src/cmd/kc/swt.c | 2 ++
 sys/src/cmd/vc/swt.c | 2 ++
 7 files changed, 12 insertions(+)

diff --git a/sys/src/cmd/1c/gc.h b/sys/src/cmd/1c/gc.h
index 3cb3fae50..254139f1f 100644
--- a/sys/src/cmd/1c/gc.h
+++ b/sys/src/cmd/1c/gc.h
@@ -200,6 +200,7 @@ EXTERN	long*	idom;
 EXTERN	Reg**	rpo2r;
 EXTERN	long	maxnr;
 EXTERN	Prog	zprog;
+EXTERN	int	suppress;
 
 EXTERN	uchar	regused[NREG];
 EXTERN	uchar	aregused[NREG];
diff --git a/sys/src/cmd/1c/swt.c b/sys/src/cmd/1c/swt.c
index 85622a4df..b3fdc3773 100644
--- a/sys/src/cmd/1c/swt.c
+++ b/sys/src/cmd/1c/swt.c
@@ -226,6 +226,8 @@ outstring(char *s, long n)
 {
 	long r;
 
+	if(suppress)
+		return nstring;
 	r = nstring;
 	while(n) {
 		string[mnstring] = *s++;
diff --git a/sys/src/cmd/2c/gc.h b/sys/src/cmd/2c/gc.h
index ed2c7b25c..4fda70d38 100644
--- a/sys/src/cmd/2c/gc.h
+++ b/sys/src/cmd/2c/gc.h
@@ -216,6 +216,7 @@ EXTERN	long*	idom;
 EXTERN	Reg**	rpo2r;
 EXTERN	long	maxnr;
 EXTERN	Prog	zprog;
+EXTERN	int	suppress;
 
 EXTERN	uchar	regused[NREG];
 EXTERN	uchar	aregused[NREG];
diff --git a/sys/src/cmd/2c/swt.c b/sys/src/cmd/2c/swt.c
index ce180d67f..b12302616 100644
--- a/sys/src/cmd/2c/swt.c
+++ b/sys/src/cmd/2c/swt.c
@@ -306,6 +306,8 @@ outstring(char *s, long n)
 {
 	long r;
 
+	if(suppress)
+		return nstring;
 	r = nstring;
 	while(n) {
 		string[mnstring] = *s++;
diff --git a/sys/src/cmd/7c/swt.c b/sys/src/cmd/7c/swt.c
index a7f20c9ef..229558d86 100644
--- a/sys/src/cmd/7c/swt.c
+++ b/sys/src/cmd/7c/swt.c
@@ -144,6 +144,8 @@ outstring(char *s, long n)
 {
 	long r;
 
+	if(suppress)
+		return nstring;
 	r = nstring;
 	while(n) {
 		string[mnstring] = *s++;
diff --git a/sys/src/cmd/kc/swt.c b/sys/src/cmd/kc/swt.c
index 05727dd8d..7cf91a521 100644
--- a/sys/src/cmd/kc/swt.c
+++ b/sys/src/cmd/kc/swt.c
@@ -128,6 +128,8 @@ outstring(char *s, long n)
 {
 	long r;
 
+	if(suppress)
+		return nstring;
 	r = nstring;
 	while(n) {
 		string[mnstring] = *s++;
diff --git a/sys/src/cmd/vc/swt.c b/sys/src/cmd/vc/swt.c
index 08d9f1d10..17c544dde 100644
--- a/sys/src/cmd/vc/swt.c
+++ b/sys/src/cmd/vc/swt.c
@@ -124,6 +124,8 @@ outstring(char *s, long n)
 {
 	long r;
 
+	if(suppress)
+		return nstring;
 	r = nstring;
 	while(n) {
 		string[mnstring] = *s++;
-- 
cgit v1.2.3