diff options
Diffstat (limited to 'backendC/CleanCompilerSources/instructions.c')
| -rw-r--r-- | backendC/CleanCompilerSources/instructions.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/backendC/CleanCompilerSources/instructions.c b/backendC/CleanCompilerSources/instructions.c index b1a07f1..603f9b8 100644 --- a/backendC/CleanCompilerSources/instructions.c +++ b/backendC/CleanCompilerSources/instructions.c @@ -3676,6 +3676,9 @@ static void print_foreign_export_type (TypeNode type) if (symbol_p->symb_kind==int_type){ FPrintF (OutFile,"I"); return; + } else if (symbol_p->symb_kind==real_type){ + FPrintF (OutFile,"R"); + return; } else if (symbol_p->symb_kind==tuple_type){ TypeArgs type_arg_p; |