diff options
Diffstat (limited to 'backendC')
| -rw-r--r-- | backendC/CleanCompilerSources/instructions.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/backendC/CleanCompilerSources/instructions.c b/backendC/CleanCompilerSources/instructions.c index cf7c131..b076f5f 100644 --- a/backendC/CleanCompilerSources/instructions.c +++ b/backendC/CleanCompilerSources/instructions.c @@ -1148,11 +1148,12 @@ static void GenABStackElemsForRecordDesc (StateS state) } } FPutC (')', OutFile); + return; case RecordState: argstates = state.state_record_arguments; FPutC ('(', OutFile); for (arity=0; arity < state.state_arity; ++arity) - GenABStackElems (argstates[arity]); + GenABStackElemsForRecordDesc (argstates[arity]); FPutC (')', OutFile); return; case ArrayState: |