From 42ba9afdb72290a54f59f6611009625d22ea48d7 Mon Sep 17 00:00:00 2001
From: johnvg
Date: Tue, 5 Apr 2016 14:26:02 +0000
Subject: use {}'s instead of ()'s in element type string for unboxed records

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@2683 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 backendC/CleanCompilerSources/instructions.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/backendC/CleanCompilerSources/instructions.c b/backendC/CleanCompilerSources/instructions.c
index c2e8b9f..3749dc8 100644
--- a/backendC/CleanCompilerSources/instructions.c
+++ b/backendC/CleanCompilerSources/instructions.c
@@ -1151,10 +1151,10 @@ static void GenABStackElemsForRecordDesc (StateS state)
 				return;
 			case RecordState:
 				argstates = state.state_record_arguments;
-				FPutC ('(', OutFile);
+				FPutC ('{', OutFile);
 				for (arity=0; arity < state.state_arity; ++arity)
 					GenABStackElemsForRecordDesc (argstates[arity]);
-				FPutC (')', OutFile);
+				FPutC ('}', OutFile);
 				return;
 			case ArrayState:
 				FPutC ('a', OutFile);
-- 
cgit v1.2.3