From 297ed3760678f90c3407b2fbca54c1eb39cf0873 Mon Sep 17 00:00:00 2001 From: johnvg Date: Mon, 10 Sep 2001 11:39:47 +0000 Subject: fix bug in printing brackets in function types git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@764 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- backendC/CleanCompilerSources/typeconv_2.c | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'backendC') diff --git a/backendC/CleanCompilerSources/typeconv_2.c b/backendC/CleanCompilerSources/typeconv_2.c index 88d0bc8..d63667e 100644 --- a/backendC/CleanCompilerSources/typeconv_2.c +++ b/backendC/CleanCompilerSources/typeconv_2.c @@ -539,10 +539,7 @@ static void PrintNode (TypeNode node, Bool brackets, Bool strict_context, Bool p { TypeNode arg_type_node = node -> type_node_arguments -> type_arg_node; if (brackets) FPutC ('(', StdListTypes); - if ((! arg_type_node -> type_node_is_var) && arg_type_node -> type_node_symbol -> symb_kind == fun_type) - PrintArgument (node -> type_node_arguments, cPrintBrackets, cNotInAStrictContext, cDoPrintAttribute); - else - PrintArgument (node -> type_node_arguments, cDontPrintBrackets, cNotInAStrictContext, cDoPrintAttribute); + PrintArgument (node -> type_node_arguments, cPrintBrackets, cNotInAStrictContext, cDoPrintAttribute); FPutS (" -> ", StdListTypes); PrintArgument (node -> type_node_arguments -> type_arg_next, cDontPrintBrackets, cNotInAStrictContext, cDoPrintAttribute); if (brackets) -- cgit v1.2.3