diff options
| author | johnvg | 2002-03-20 12:56:14 +0000 |
|---|---|---|
| committer | johnvg | 2002-03-20 12:56:14 +0000 |
| commit | 889d4d54c103652495f827fa500f74edd7f66f1a (patch) | |
| tree | 0f21f8b1449f92cc16667d0952c0705c08c35291 | |
| parent | bug fix for record updates in a lazy context with unboxed tuple fields (diff) | |
set sdef_exported bit for sdefs in the main dcl module to
generate the label name for an exported type when
the main module is on a cycle and a type exported from
this module is used in a function in another definition module
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1057 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
| -rw-r--r-- | backendC/CleanCompilerSources/backend.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/backendC/CleanCompilerSources/backend.c b/backendC/CleanCompilerSources/backend.c index c6104fa..dff3023 100644 --- a/backendC/CleanCompilerSources/backend.c +++ b/backendC/CleanCompilerSources/backend.c @@ -3277,6 +3277,8 @@ BEExportType (int dclTypeIndex, int iclTypeIndex) iclDef->sdef_dcl_icl = dclDef; dclDef->sdef_dcl_icl = iclDef; + + iclDef->sdef_exported = True; } /* BEExportType */ void |