diff --git a/lang/cem/cemcom/code.c b/lang/cem/cemcom/code.c
index 8b3c88b9c..dc5dc0eaa 100644
--- a/lang/cem/cemcom/code.c
+++ b/lang/cem/cemcom/code.c
@@ -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);
 	}