godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Some fixes

Browse Source
This commit is contained in:
ceriel 1995-06-12 14:28:36 +00:00
parent b16b1c714e
commit 3ef8ae0b65
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lang/cem/cemcom.ansi/code.c
View File

@ -154,7 +154,7 @@ end_code()
/* floating point used */ /* floating point used */
C_ms_flt(); C_ms_flt();
} }
C_ms_src((int)(LineNumber - 2), FileName); C_ms_src((int)(LineNumber - 2), source);
C_close(); C_close();
} }
#endif /* LINT */ #endif /* LINT */
@ -554,6 +554,7 @@ loc_init(expr, id)
break; /* switch */ break; /* switch */
} else if (!tmpoffset) {/* first time for this variable */ } else if (!tmpoffset) {/* first time for this variable */
tmpoffset = df->df_address; tmpoffset = df->df_address;
if (unknownsize) tmpoffset = -1;
df->df_address = data_label(); df->df_address = data_label();
C_df_dlb((label)df->df_address); C_df_dlb((label)df->df_address);
} else { } else {