diff --git a/tests/gpgscm/scheme.c b/tests/gpgscm/scheme.c
index 2cd177449..2c9fd0247 100644
--- a/tests/gpgscm/scheme.c
+++ b/tests/gpgscm/scheme.c
@@ -4610,7 +4610,8 @@ static struct scheme_interface vtbl ={
   setimmutable,
 
   scheme_load_file,
-  scheme_load_string
+  scheme_load_string,
+  port_from_file
 };
 #endif
 
diff --git a/tests/gpgscm/scheme.h b/tests/gpgscm/scheme.h
index 05ae7feb0..4ba2daa76 100644
--- a/tests/gpgscm/scheme.h
+++ b/tests/gpgscm/scheme.h
@@ -224,6 +224,7 @@ struct scheme_interface {
   void (*setimmutable)(pointer p);
   void (*load_file)(scheme *sc, FILE *fin);
   void (*load_string)(scheme *sc, const char *input);
+  pointer (*mk_port_from_file)(scheme *sc, FILE *f, int kind);
 };
 #endif