comparison src/widget.c @ 398:74fd4e045ea6 r21-2-29

Import from CVS: tag r21-2-29
author cvs
date Mon, 13 Aug 2007 11:13:30 +0200
parents 8626e4521993
children 697ef44129c6
comparison
equal deleted inserted replaced
397:f4aeb21a5bad 398:74fd4e045ea6
99 struct gcpro gcpro1; 99 struct gcpro gcpro1;
100 100
101 newargs[0] = Fwidget_get (args[0], args[1]); 101 newargs[0] = Fwidget_get (args[0], args[1]);
102 newargs[1] = args[0]; 102 newargs[1] = args[0];
103 newargs[2] = Flist (nargs - 2, args + 2); 103 newargs[2] = Flist (nargs - 2, args + 2);
104 GCPRO1 ((newargs[2])); 104 GCPRO1 (newargs[2]);
105 RETURN_UNGCPRO (Fapply (3, newargs)); 105 RETURN_UNGCPRO (Fapply (3, newargs));
106 } 106 }
107 107
108 void 108 void
109 syms_of_widget (void) 109 syms_of_widget (void)