diff src/mocklisp.c @ 295:d63a5e102cab

*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Mon, 24 Jun 1991 23:22:15 +0000
parents 636408ebaaaa
children 9e60d5c117db
line wrap: on
line diff
--- a/src/mocklisp.c	Thu Jun 20 12:32:05 1991 +0000
+++ b/src/mocklisp.c	Mon Jun 24 23:22:15 1991 +0000
@@ -205,6 +205,10 @@
 {
   register int argnum;
   register Lisp_Object tem;
+  struct gcpro gcpro1;
+
+  GCPRO1 (*args);
+  gcpro1.nvars = nargs;
 
   for (argnum = 0; argnum < nargs; argnum++)
     {
@@ -220,6 +224,8 @@
 	  goto retry;
 	}
     }
+
+  UNGCPRO;
   return Qnil;
 }