d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Use LCSYM for bss and STSYM for data, so that grind can see the diff

Browse source
This commit is contained in:
ceriel 1993-10-25 15:43:02 +00:00
parent 0fc413c78a
commit c689e34fa7
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lang/cem/cemcom/stab.c
View file

@ -273,6 +273,7 @@ stb_string(df, kind, str)
} }
else if (df->df_sc != AUTO && df->df_sc != REGISTER) { else if (df->df_sc != AUTO && df->df_sc != REGISTER) {
/* global */ /* global */
int stabtp = df->df_initialized ? N_STSYM : N_LCSYM;
if (df->df_sc == STATIC) { if (df->df_sc == STATIC) {
if (df->df_level >= L_LOCAL) { if (df->df_level >= L_LOCAL) {
addc_db_str('V'); addc_db_str('V');
@ -287,10 +288,10 @@ stb_string(df, kind, str)
stb_type(tp); stb_type(tp);
addc_db_str(';'); addc_db_str(';');
if (df->df_sc == STATIC && df->df_level >= L_LOCAL) { if (df->df_sc == STATIC && df->df_level >= L_LOCAL) {
C_ms_stb_dlb(db_str.base, N_LCSYM, 0, (label) df->df_address, (arith) 0); C_ms_stb_dlb(db_str.base, stabtp, 0, (label) df->df_address, (arith) 0);
} }
else { else {
C_ms_stb_dnam(db_str.base, N_LCSYM, 0, str, (arith) 0); C_ms_stb_dnam(db_str.base, stabtp, 0, str, (arith) 0);
} }
} }
else { /* local variable */ else { /* local variable */