Mercurial > hg > xemacs-beta

comparison src/floatfns.c @ 4959:bd169a24a554

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge
author Ben Wing <ben@xemacs.org>
date Thu, 28 Jan 2010 04:27:30 -0600
parents 304aebb79cd3
children e813cf16c015
comparison
equal deleted inserted replaced
4893:99f2102552d7 4959:bd169a24a554
2451 /* Not called from emacs-lisp float routines; do the default thing. */ 2451 /* Not called from emacs-lisp float routines; do the default thing. */
2452 return 0; 2452 return 0;
2453 2453
2454 /* if (!strcmp (x->name, "pow")) x->name = "expt"; */ 2454 /* if (!strcmp (x->name, "pow")) x->name = "expt"; */
2455 2455
2456 args = Fcons (build_string (x->name), 2456 args = Fcons (build_extstring (x->name, Qerror_message_encoding),
2457 Fcons (make_float (x->arg1), 2457 Fcons (make_float (x->arg1),
2458 ((in_float == 2) 2458 ((in_float == 2)
2459 ? Fcons (make_float (x->arg2), Qnil) 2459 ? Fcons (make_float (x->arg2), Qnil)
2460 : Qnil))); 2460 : Qnil)));
2461 switch (x->type) 2461 switch (x->type)