Mercurial > hg > xemacs-beta

comparison src/floatfns.c @ 4990:8f0cf4fd3d2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Automatic merge
author Ben Wing <ben@xemacs.org>
date Sat, 06 Feb 2010 04:01:46 -0600
parents e813cf16c015
children b5df3737028a
comparison
equal deleted inserted replaced
4989:d2ec55325515 4990:8f0cf4fd3d2c
2452 /* Not called from emacs-lisp float routines; do the default thing. */ 2452 /* Not called from emacs-lisp float routines; do the default thing. */
2453 return 0; 2453 return 0;
2454 2454
2455 /* if (!strcmp (x->name, "pow")) x->name = "expt"; */ 2455 /* if (!strcmp (x->name, "pow")) x->name = "expt"; */
2456 2456
2457 args = Fcons (build_string (x->name), 2457 args = Fcons (build_extstring (x->name, Qerror_message_encoding),
2458 Fcons (make_float (x->arg1), 2458 Fcons (make_float (x->arg1),
2459 ((in_float == 2) 2459 ((in_float == 2)
2460 ? Fcons (make_float (x->arg2), Qnil) 2460 ? Fcons (make_float (x->arg2), Qnil)
2461 : Qnil))); 2461 : Qnil)));
2462 switch (x->type) 2462 switch (x->type)