Mercurial > hg > xemacs-beta

comparison src/bytecode.c @ 207:e45d5e7c476e r20-4b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b2
author cvs
date Mon, 13 Aug 2007 10:03:52 +0200
parents a2f645c6b9f8
children 2c611d1463a6
comparison
equal deleted inserted replaced
206:d3e9274cbc4e 207:e45d5e7c476e
1056 1056
1057 case Belt: 1057 case Belt:
1058 #if 0 1058 #if 0
1059 /* probably this code is OK, but nth_entry is commented 1059 /* probably this code is OK, but nth_entry is commented
1060 out above --ben */ 1060 out above --ben */
1061 /* #### will not work if cons type is an lrecord. */
1061 if (XTYPE (TOP) == Lisp_Type_Cons) 1062 if (XTYPE (TOP) == Lisp_Type_Cons)
1062 { 1063 {
1063 /* Exchange args and then do nth. */ 1064 /* Exchange args and then do nth. */
1064 v2 = POP; 1065 v2 = POP;
1065 v1 = TOP; 1066 v1 = TOP;