procentry/procexit were not called properly

This commit is contained in:
ceriel 1987-03-05 19:22:33 +00:00
parent f36ee6de55
commit 1a5d5ddec2

View file

@ -566,7 +566,7 @@ prc_entry(name)
if (options['p']) {
C_df_dlb(l1 = data_label());
C_rom_scon(name, (arith) (strlen(name) + 1));
C_lae_dlb(l1);
C_lae_dlb(l1, (arith) 0);
C_cal("procentry");
C_asp(pointer_size);
}
@ -575,7 +575,7 @@ prc_entry(name)
prc_exit()
{
if (options['p']) {
C_lae_dlb(l1);
C_lae_dlb(l1, (arith) 0);
C_cal("procexit");
C_asp(pointer_size);
}