comparison src/eval.c @ 1849:21549d437f09

[xemacs-hg @ 2004-01-03 21:54:41 by james] GCPROd variables cannot be declared REGISTER. Thanks to James McPherson.
author james
date Sat, 03 Jan 2004 21:54:42 +0000
parents 68ed93de81b7
children 31d5f86eb303
comparison
equal deleted inserted replaced
1848:a186edab3fc8 1849:21549d437f09
967 whose values are discarded. 967 whose values are discarded.
968 */ 968 */
969 (args)) 969 (args))
970 { 970 {
971 /* This function can GC */ 971 /* This function can GC */
972 REGISTER Lisp_Object val; 972 Lisp_Object val;
973 struct gcpro gcpro1; 973 struct gcpro gcpro1;
974 974
975 val = Feval (XCAR (args)); 975 val = Feval (XCAR (args));
976 976
977 GCPRO1 (val); 977 GCPRO1 (val);
992 whose values are discarded. 992 whose values are discarded.
993 */ 993 */
994 (args)) 994 (args))
995 { 995 {
996 /* This function can GC */ 996 /* This function can GC */
997 REGISTER Lisp_Object val; 997 Lisp_Object val;
998 struct gcpro gcpro1; 998 struct gcpro gcpro1;
999 999
1000 Feval (XCAR (args)); 1000 Feval (XCAR (args));
1001 args = XCDR (args); 1001 args = XCDR (args);
1002 val = Feval (XCAR (args)); 1002 val = Feval (XCAR (args));