fix name in descriptor for unboxed lists of records if exporting local labels (again)

63ddd628 · John van Groningen · 4f46345b · 63ddd628
Commit 63ddd628 authored Sep 17, 2015 by John van Groningen
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

backendC/CleanCompilerSources/instructions.c backendC/CleanCompilerSources/instructions.c +1 -1

No files found.
--- a/backendC/CleanCompilerSources/instructions.c
+++ b/backendC/CleanCompilerSources/instructions.c
@@ -3143,7 +3143,7 @@ void GenUnboxedConsRecordDescriptor (SymbDef sdef,int tail_strict)
 		FPrintF (OutFile, "e_%s_" R_PREFIX "%s ",sdef->sdef_module,name);

 	if (ExportLocalLabels)
-		FPrintF (OutFile,tail_strict ? "\"_Cons#!%s\"" : "\"_Cons#\"",name);
+		FPrintF (OutFile,tail_strict ? "\"_Cons#!%s\"" : "\"_Cons#%s\"",name);
 	else
 		FPrintF (OutFile,tail_strict ? "\"[#%s!]\"" : "\"[#%s]\"",name);
 }