diff --git a/C/qlyr.c b/C/qlyr.c
index 80f551933..dc1d2f939 100755
--- a/C/qlyr.c
+++ b/C/qlyr.c
@@ -1148,6 +1148,8 @@ p_read_program( USES_REGS1 )
 int
 Yap_Restore(char *s, char *lib_dir)
 {
+  CACHE_REGS
+  
   IOSTREAM *stream  = Yap_OpenRestore(s, lib_dir);
   if (!stream)
     return -1;