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:34:08 +00:00
parent c9ec055176
commit 0fc413c78a
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.ansi/stab.c
View file

@ -274,6 +274,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');
@ -288,10 +289,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 */