Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-compiler-and-rts
compiler
Commits
47676a52
Commit
47676a52
authored
Oct 05, 2001
by
John van Groningen
Browse files
generate t label for strict records with module and record name when ExportLocalLabels=True
parent
8024fd77
Changes
1
Hide whitespace changes
Inline
Side-by-side
backendC/CleanCompilerSources/instructions.c
View file @
47676a52
...
...
@@ -3118,17 +3118,17 @@ void GenLazyRecordDescriptorAndExport (SymbDef sdef)
put_directive_
(
Ddescn
);
if
(
DoDebug
){
FPrintF
(
OutFile
,
RECORD_D_PREFIX
"%s "
,
name
);
if
(
ExportLocalLabels
)
if
(
ExportLocalLabels
){
FPrintF
(
OutFile
,
"e_%s_"
RECORD_D_PREFIX
"%s "
,
CurrentModule
,
name
);
FPrintF
(
OutFile
,
"e_%s_"
RECORD_N_PREFIX
"%s "
,
CurrentModule
,
name
);
else
FPrintF
(
OutFile
,
RECORD_N_PREFIX
"%s "
,
name
);
}
else
FPrintF
(
OutFile
,
RECORD_D_PREFIX
"%s "
RECORD_N_PREFIX
"%s "
,
name
,
name
);
}
else
{
FPrintF
(
OutFile
,
RECORD_D_PREFIX
"%u "
,
sdef
->
sdef_number
);
if
(
ExportLocalLabels
)
if
(
ExportLocalLabels
){
FPrintF
(
OutFile
,
"e_%s_"
RECORD_D_PREFIX
"%s "
,
CurrentModule
,
name
);
FPrintF
(
OutFile
,
"e_%s_"
RECORD_N_PREFIX
"%s "
,
CurrentModule
,
name
);
else
FPrintF
(
OutFile
,
RECORD_
N_PREFIX
"%u "
,
sdef
->
sdef_number
);
}
else
FPrintF
(
OutFile
,
RECORD_
D_PREFIX
"%u "
RECORD_N_PREFIX
"%u "
,
sdef
->
sdef_number
,
sdef
->
sdef_number
);
}
FPrintF
(
OutFile
,
"%d 1
\"
%s
\"
"
,
arity
,
name
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment