Commit 831b3064 authored by andy's avatar andy
Browse files

[project @ 1999-10-28 22:37:27 by andy]

Wibble in printing of type contexts.
parent c26388c0
......@@ -10,8 +10,8 @@
* included in the distribution.
*
* $RCSfile: output.c,v $
* $Revision: 1.8 $
* $Date: 1999/10/20 02:16:02 $
* $Revision: 1.9 $
* $Date: 1999/10/28 22:37:27 $
* ------------------------------------------------------------------------*/
#include "prelude.h"
......@@ -640,6 +640,7 @@ Int fr; {
Bool useParens = len!=1;
#endif
if (useParens)
putChr('(');
for (; nonNull(ps); ps=tl(ps)) {
putPred(hd(ps),fr);
if (--c > 0) {
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment