diff options
| -rw-r--r-- | backendC/CleanCompilerSources/instructions.c | 4 |
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); |