diff options
| author | cinap_lenrek <cinap_lenrek@felloff.net> | 2015-08-02 14:52:54 +0200 |
|---|---|---|
| committer | cinap_lenrek <cinap_lenrek@felloff.net> | 2015-08-02 14:52:54 +0200 |
| commit | 29a53a52fdc3f8fc9af3d19d0253ba33b1efccba (patch) | |
| tree | c926e7bd284da6f0c4e3e0937f13517ed2ae9c81 /sys/src/cmd/1c | |
| parent | 8234f9d9062cd21daafec5c360d7221e45e97469 (diff) | |
1c,2c,7c,kc,vc: honor suppress condition for outstring() in swt.c
Diffstat (limited to 'sys/src/cmd/1c')
| -rw-r--r-- | sys/src/cmd/1c/gc.h | 1 | ||||
| -rw-r--r-- | sys/src/cmd/1c/swt.c | 2 |
2 files changed, 3 insertions, 0 deletions
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++; |