diff --git a/bin/mktestsuite b/bin/mktestsuite
index 7722439dd2f399e6fd8ae6d78a17fd0753c8efd6..9d89aff18b606509e5d72fd2558b9826fab767d1 100755
--- a/bin/mktestsuite
+++ b/bin/mktestsuite
@@ -53,7 +53,7 @@ define(test_eval_error,[[DOTEST(EVAL_ERROR,dnl
 mixed a() { [[$1]]; })]])
 
 define(test_define_program,[[DOTEST(RUN,dnl
-void a() { master()->add_precompiled_program("[[$1]]",class {
+void a() { add_constant("[[$1]]",class {
   [[$2]]
 });})]])
 
@@ -66,7 +66,7 @@ define([[CONDITION]],[[COND $1
 $2
 define([[CONDITION]],[[]])
 ]])
-define(ifefun,[[cond([[all_efuns()->$1]],[[$2]])]])
+define(ifefun,[[cond([[all_constants()->$1]],[[$2]])]])
 
 define(TESTNO,0)