aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjohnvg2016-04-05 14:26:02 +0000
committerjohnvg2016-04-05 14:26:02 +0000
commit42ba9afdb72290a54f59f6611009625d22ea48d7 (patch)
treeed1e4a3f668c49fc6f38d2ee3044956ffff41dc7
parentdon't forget to transform (index) expressions in ArraySelection's of Selector's (diff)
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
-rw-r--r--backendC/CleanCompilerSources/instructions.c4
1 files 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);