Mercurial > hg > xemacs-beta

comparison src/callint.c @ 970:0dc7756a58c4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-08-22 11:31:39 by stephent] fix GCPRO in do_autoload <871y8rnndk.fsf@tleepslib.sk.tsukuba.ac.jp>
author stephent
date Thu, 22 Aug 2002 11:31:43 +0000
parents 79c6ff3eef26
children e22b0213b713
comparison
equal deleted inserted replaced
969:d41e92ee6d12 970:0dc7756a58c4
367 { 367 {
368 Lisp_Object funcar = Fcar (fun); 368 Lisp_Object funcar = Fcar (fun);
369 369
370 if (EQ (funcar, Qautoload)) 370 if (EQ (funcar, Qautoload))
371 { 371 {
372 struct gcpro gcpro1, gcpro2; 372 struct gcpro gcpro1;
373 GCPRO2 (function, prefix); 373 GCPRO1 (prefix);
374 /* do_autoload GCPROs both arguments */
374 do_autoload (fun, function); 375 do_autoload (fun, function);
375 UNGCPRO; 376 UNGCPRO;
376 goto retry; 377 goto retry;
377 } 378 }
378 else if (EQ (funcar, Qlambda)) 379 else if (EQ (funcar, Qlambda))