diff --git a/src/las.c b/src/las.c
index 4152355b654f193c4a4e8aa42a386f5ccd5be9c3..8778bc5bd92c8c24651707b3d6307abca42bc331 100644
--- a/src/las.c
+++ b/src/las.c
@@ -3152,9 +3152,11 @@ static struct pike_string *get_name_of_function(node *n)
 	name = n->u.sval.u.efun->name;
       } else {
 	struct program *p = n->u.sval.u.object->prog;
+#ifdef PIKE_DEBUG
 	if (!p) {
 	  p = id_to_program(n->u.sval.u.object->program_id);
 	}
+#endif
 	if (p) {
 	  name = ID_FROM_INT(p, SUBTYPEOF(n->u.sval))->name;
 	} else {
diff --git a/src/program.c b/src/program.c
index 7dcb64f4734385e8340254d8a47462a65ecfa2e7..b69231d29d4d87969cabf014f0b82de9afe759a8 100644
--- a/src/program.c
+++ b/src/program.c
@@ -8347,7 +8347,9 @@ static int run_pass1(struct compilation *c)
     }else{
       free_program(c->placeholder->prog);
       add_ref(c->placeholder->prog=Pike_compiler->new_program);
+#ifdef PIKE_DEBUG
       c->placeholder->program_id = Pike_compiler->new_program->id;
+#endif
       debug_malloc_touch(c->placeholder);
     }
   }